diff --git a/pack/acp/start/vimoutliner/.gitignore b/pack/acp/start/vimoutliner/.gitignore new file mode 100644 index 0000000..fdc5844 --- /dev/null +++ b/pack/acp/start/vimoutliner/.gitignore @@ -0,0 +1,16 @@ +# Vim +*.sw? +*.un? +tags + +# archives +*.zip +*.gz +*.gzip + +# osx noise +.DS_Store + +# Python +*.pyc +*~ diff --git a/pack/acp/start/vimoutliner/CHANGELOG b/pack/acp/start/vimoutliner/CHANGELOG new file mode 100644 index 0000000..3b52f7d --- /dev/null +++ b/pack/acp/start/vimoutliner/CHANGELOG @@ -0,0 +1,1556 @@ +CHANGELOG + + +Version 0.4.0 +Updated 2014-10-19 + * Additions/Changes: + - Added a list-based tags feature similar to org-mode + - Complete rewrite of the outline math plugin. + - Added colorscheme option to vimoutlinerrc and directory + - Modified to install.sh to: 1. Turn off backup functionality. + 2. Remove old backup clutter. 3. Remove old vo_base.vim files from + syntax, ftdetect and ftpluginAdd VimOutliner icons to the repository. + - Updated TODO.otl + - Move README.detailed to doc/votl.txt to make Pathogen working. + - Added information on pathogen installation to INSTALL file. + - Added syntax conceal for math equations. Concealed equations appear + as µ + - Add VimOutliner icons to the repository + - Add votl_maketags manpage + * Bug fixes: + - Small corrections and updates + - Removed unnecessary reserved mappings + - doc/votl_readme.txt is just a copy of old votl.txt, removed it. + - Fix for user-defined for command mappings. + - Moved loading of .vimoutlinerrc to before key mappings, other fixes + - Update in install.sh so that it installs vimoutlinerrc correctly. + - Correct votl_cheatsheet so that it is installed with helptags. + - Gramatical and stylistic corrections. + - Remove all remainders of localleader munging. + - Removed vimball install instructions from INSTALL and README files. + - Fix Help links + - Fix FSF address + + +Version 0.3.7 +Released 2014-04-05 + * Additions/Changes: + - Added new hoisting plugin. + - Added new tags plugin. + - Add weighted checkboxes. + - Now checkboxes calculations will ignore dash ([-]) marked items. + - Added new math plugin. + - Merged new clock plugin. + - Added new format plugin. + - Added new gtd plugin. + - Added updated smart_paste plugin. + - Added otl2latex script with files. + - New file type naming convention: vo_base to votl. + - Color fixes and updates. + - Updated vimoutlinerrc with more options for new plugins. + - Moved previous hoist plugin to prev directory, + - Made new TODO list + - Uploaded MediaWiki2otl script. + - Updated documentation. + * Bug fixes: + - Stop setting global options. + - Fixed checkboxes calculation to make it faster and more consistent. + - Strtime fix in vo_base.vim + - Corrections to READNE.detailed, readme, INSTALL and cheatsheet files. + - Corrections to install.sh. + - Replaced len() so it works with multibyte chars. + +Version 0.3.6 +Released 2011-05-09 + * Additions/Changes: + - Added updated comments and information to the user in the INSTALL + file. + - Added comments and information to the user in install.sh to align + with the new version. + - Added new light version of README and moved the more extensive file + to README.detailed + - Several updates and additions to the README, README.detailed and + doc/vo_readme.txt file. + * Bug fixes: + - Source only the first vimoutlinerrc found. + - Do not echo mappings. + - Fixed typo and updated reference in install.sh. + - Fixed several typos and updated reference in the + ftplugin/vo_base.vim + - Fixed typos and removed outdated references in the vo_hoist.otl and + vo_hoist.vim files. + - Fixed typos and removed outdated references in the vo_checkbox.otl + file. + - Fixed two mappings for sourcing rc file and writing file in + ftplugin/vo_base.vim. + - Fixed typos in colors/vo_base.vim + - Fixed errors when g:vo_modules_load is not defined, also updated the + plugin loading process to use lists. + +Version 0.3.5 +Released 2011-03-20 + * Additions/Changes: + - Moved all files inside $HOME/.vim. + - Added a cheat sheet to the documentation. + - Added smart-paste plugin. + - Added and updated post-processor scripts: + · fs2otl + · Node.pm + · otl2aft.awk + · otl2docbook.pl + · otl2html.py + · otl2lyx.awk + · otl2ooimpress.py + · otl2table.py + · otl2tags.py + · otlgrep.py + · otlhead.sh + · otlsplit.py + · otltail.sh + · otl_handler + · outline_calendar + · outline_freemind + · vo_maketags.pl + - Added syntax support for _ilink_. + - Hoist plugin disabled by default. + - Layout of vo_readme.txt made more similar to Vim help. + * Bug fixes: + - ,,S did not work. Fixed + +Version 0.3.4 +Released + * Additions/changes: + - added ,,cp as an alias to ,,c% + - Color schemes have been added + - Checkboxes and hoisting default to 'on' + - Modified ,,cb and ,,c% (and ,,cp) to work only on headings + - Fixed the ,,cz command to make the correct call + - Added descriptions of VO objects to help (headings, text, tables, + etc.) + * Bug fixes: + - W18 errors have been fixed + +============================================================================= +RCS file: /root/VimOutliner/VimOutliner/INSTALL,v +Working file: INSTALL +head: 1.2 +branch: +locks: strict +access list: +symbolic names: +keyword substitution: kv +total revisions: 2; selected revisions: 2 +description: +---------------------------- +revision 1.2 +date: 2004-11-27 19:30:43 +0000; author: noel; state: Exp; lines: +2 -2 + +Minor syntax and installation adjustments. +Change to vo_checkbox to fix a typo. +---------------------------- +revision 1.1 +date: 2004-02-17 22:00:15 +0000; author: noel; state: Exp; +These files are only in cvs for backup purposes. They should be extracted +from vo_readme.txt and never edited themselves: + INSTALL + LICENSE + VERSION +============================================================================= + +RCS file: /root/VimOutliner/VimOutliner/Attic/INSTALL.TXT,v +Working file: INSTALL.TXT +head: 1.3 +branch: +locks: strict +access list: +symbolic names: +keyword substitution: kv +total revisions: 3; selected revisions: 3 +description: +Quick installation instructions for developers. +---------------------------- +revision 1.3 +date: 2003-06-20 14:13:15 +0000; author: noel; state: dead; lines: +0 -0 +Final documentation tweaks for the final 0.3.0 release. +---------------------------- +revision 1.2 +date: 2003-06-18 13:50:55 +0000; author: noel; state: Exp; lines: +1 -1 +Modified the installation title. +---------------------------- +revision 1.1 +date: 2003-03-20 22:56:49 +0000; author: noel; state: Exp; +Initial revision +============================================================================= + +RCS file: /root/VimOutliner/VimOutliner/LICENSE,v +Working file: LICENSE +head: 1.2 +branch: +locks: strict +access list: +symbolic names: +keyword substitution: kv +total revisions: 2; selected revisions: 2 +description: +---------------------------- +revision 1.2 +date: 2004-11-27 19:30:43 +0000; author: noel; state: Exp; lines: +4 -2 + +Minor syntax and installation adjustments. +Change to vo_checkbox to fix a typo. +---------------------------- +revision 1.1 +date: 2004-02-17 22:00:15 +0000; author: noel; state: Exp; +These files are only in cvs for backup purposes. They should be extracted +from vo_readme.txt and never edited themselves: + INSTALL + LICENSE + VERSION +============================================================================= + +RCS file: /root/VimOutliner/VimOutliner/VERSION,v +Working file: VERSION +head: 1.4 +branch: +locks: strict +access list: +symbolic names: +keyword substitution: kv +total revisions: 4; selected revisions: 4 +description: +---------------------------- +revision 1.4 +date: 2005-06-07 17:48:50 +0000; author: noel; state: Exp; lines: +4 -0 +Updated to include help on VO objects. +---------------------------- +revision 1.3 +date: 2005-06-07 17:41:42 +0000; author: noel; state: Exp; lines: +10 -10 +Updated version. +---------------------------- +revision 1.2 +date: 2004-11-27 19:30:43 +0000; author: noel; state: Exp; lines: +9 -14 + +Minor syntax and installation adjustments. +Change to vo_checkbox to fix a typo. +---------------------------- +revision 1.1 +date: 2004-02-17 22:00:15 +0000; author: noel; state: Exp; +These files are only in cvs for backup purposes. They should be extracted +from vo_readme.txt and never edited themselves: + INSTALL + LICENSE + VERSION +============================================================================= + +RCS file: /root/VimOutliner/VimOutliner/install.sh,v +Working file: install.sh +head: 1.3 +branch: +locks: strict +access list: +symbolic names: +keyword substitution: kv +total revisions: 3; selected revisions: 3 +description: +---------------------------- +revision 1.3 +date: 2005-06-06 18:42:29 +0000; author: noel; state: Exp; lines: +3 -0 +Added support for color schemes. +---------------------------- +revision 1.2 +date: 2004-11-27 19:30:43 +0000; author: noel; state: Exp; lines: +2 -2 + +Minor syntax and installation adjustments. +Change to vo_checkbox to fix a typo. +---------------------------- +revision 1.1 +date: 2004-05-02 19:03:01 +0000; author: noel; state: Exp; +Added to the distro. +============================================================================= + +RCS file: /root/VimOutliner/VimOutliner/vimoutlinerrc,v +Working file: vimoutlinerrc +head: 1.6 +branch: +locks: strict +access list: +symbolic names: +keyword substitution: kv +total revisions: 6; selected revisions: 6 +description: +---------------------------- +revision 1.6 +date: 2005-06-07 12:39:01 +0000; author: noel; state: Exp; lines: +9 -78 +Enabled checkboxes and hoisting by default. +Added Vim colorscheme support. +---------------------------- +revision 1.5 +date: 2005-01-19 15:06:20 +0000; author: noel; state: Exp; lines: +4 -3 +Fixed another W18 error. +Enabled hoisting and checkboxes by default. +---------------------------- +revision 1.4 +date: 2004-05-24 15:56:34 +0000; author: noel; state: Exp; lines: +45 -0 +Added highlighting and folding support for: + Tables (marked with '|') + User-defined, wrapping text (marked with '>') + User-defined, non-wrapping text (marked with '<') +---------------------------- +revision 1.3 +date: 2004-05-17 17:27:55 +0000; author: noel; state: Exp; lines: +2 -2 +Fixed plugin loaders for checkboxes and hoisting. +---------------------------- +revision 1.2 +date: 2004-03-18 13:23:53 +0000; author: noel; state: Exp; lines: +1 -0 +Added a line to change the background. +---------------------------- +revision 1.1 +date: 2004-02-17 21:50:36 +0000; author: noel; state: Exp; +This file will be provided from now on to make it easy for people +to customize their settings. The install process will rename this file +to .vimoutlinerrc and put it into the user's home directory. +============================================================================= + +RCS file: /root/VimOutliner/VimOutliner/Attic/vo_INSTALL.TXT,v +Working file: vo_INSTALL.TXT +head: 1.2 +branch: +locks: strict +access list: +symbolic names: +keyword substitution: kv +total revisions: 2; selected revisions: 2 +description: +---------------------------- +revision 1.2 +date: 2005-06-07 17:24:05 +0000; author: noel; state: dead; lines: +0 -0 +*** empty log message *** +---------------------------- +revision 1.1 +date: 2003-06-26 19:52:07 +0000; author: noel; state: Exp; +Initial add to VimOutliner +============================================================================= + +RCS file: /root/VimOutliner/VimOutliner/Attic/vo_README.otl,v +Working file: vo_README.otl +head: 1.4 +branch: +locks: strict +access list: +symbolic names: +keyword substitution: kv +total revisions: 4; selected revisions: 4 +description: +---------------------------- +revision 1.4 +date: 2005-06-07 17:24:05 +0000; author: noel; state: dead; lines: +0 -0 +*** empty log message *** +---------------------------- +revision 1.3 +date: 2003-10-17 02:17:07 +0000; author: noel; state: Exp; lines: +2 -2 +Changed version numbers. +---------------------------- +revision 1.2 +date: 2003-06-20 14:13:15 +0000; author: noel; state: Exp; lines: +4 -41 +Final documentation tweaks for the final 0.3.0 release. +---------------------------- +revision 1.1 +date: 2003-06-18 13:55:03 +0000; author: noel; state: Exp; +Added this documentation to Vim Outliner. +============================================================================= + +RCS file: /root/VimOutliner/VimOutliner/add-ons/plugins/vo_checkbox.otl,v +Working file: add-ons/plugins/vo_checkbox.otl +head: 1.3 +branch: +locks: strict +access list: +symbolic names: +keyword substitution: kv +total revisions: 3; selected revisions: 3 +description: +---------------------------- +revision 1.3 +date: 2004-11-27 19:30:43 +0000; author: noel; state: Exp; lines: +12 -8 + +Minor syntax and installation adjustments. +Change to vo_checkbox to fix a typo. +---------------------------- +revision 1.2 +date: 2004-05-17 15:57:58 +0000; author: noel; state: Exp; lines: +6 -0 +Modified documentation to match current version. +---------------------------- +revision 1.1 +date: 2003-10-23 22:13:00 +0000; author: noel; state: Exp; +Instructions for vo_checkbox.vim +============================================================================= + +RCS file: /root/VimOutliner/VimOutliner/add-ons/plugins/vo_checkbox.vim,v +Working file: add-ons/plugins/vo_checkbox.vim +head: 1.18 +branch: +locks: strict +access list: +symbolic names: +keyword substitution: kv +total revisions: 18; selected revisions: 18 +description: +---------------------------- +revision 1.18 +date: 2005-06-07 15:08:59 +0000; author: noel; state: Exp; lines: +12 -45 +Fixed a bug that added checkboxes to body text, preformatted body text, +tables, user-defined text and user-defined preformatted text lines. +Fixed a bug where ,,cb would modify terms like 'test%' or ',,c%'. Now +it only modifies this term: ' [0-9]*%'. +---------------------------- +revision 1.17 +date: 2005-06-07 13:53:22 +0000; author: noel; state: Exp; lines: +8 -2 +Added ,,cp. It is the same as ,,c% +---------------------------- +revision 1.16 +date: 2004-05-27 22:22:48 +0000; author: noel; state: Exp; lines: +24 -4 +Made ,,cd smart so it would try to delete non-existent checkboxes. +Fixed a recursion bug in NewHMD to branches with a single child would +be computed properly. +---------------------------- +revision 1.15 +date: 2004-05-27 18:11:53 +0000; author: noel; state: Exp; lines: +25 -5 +Added smart (only the entire tree in which the child exists), automatic +completion calculations to the ,,cx command. +Added smart (only for parents, not children) '%' sign insertion for +,,c%. +---------------------------- +revision 1.14 +date: 2004-05-17 15:53:38 +0000; author: noel; state: Exp; lines: +13 -7 +Modified SwitchBox() to be more selective. +---------------------------- +revision 1.13 +date: 2004-05-17 15:43:23 +0000; author: noel; state: Exp; lines: +7 -3 +Fixed a broken key mapping: ,,c%. +---------------------------- +revision 1.12 +date: 2004-02-23 12:19:27 +0000; author: noel; state: Exp; lines: +26 -9 +Fixed Up-to-date problem. +Fixed 'Safely script names'. +---------------------------- +revision 1.11 +date: 2003-09-05 16:37:55 +0000; author: cepl; state: Exp; lines: +41 -2 +Added ,cp binding for the new function InsertCheckBoxPerCent, +which adds not only the checkbox but also percentage sign. +---------------------------- +revision 1.10 +date: 2003-08-23 16:42:15 +0000; author: noel; state: Exp; lines: +18 -17 +Modified completion percentages to be recursive. +This: +[_] 0% Project + [_] 33% Task + [_] Subtask + [X] Subtask + [X] Subtask + [_] 0% Task + [_] Subtask + [_] 50% Subtask + [X] Subsubtask + [_] Subsubtask + [X] Subsubtask + [_] Subsubtask + +Becomes this: +[_] 29% Project + [_] 33% Task + [_] Subtask + [X] Subtask + [X] Subtask + [_] 25% Task + [_] Subtask + [_] 50% Subtask + [X] Subsubtask + [_] Subsubtask + [X] Subsubtask + [_] Subsubtask +---------------------------- +revision 1.9 +date: 2003-08-16 13:49:53 +0000; author: noel; state: Exp; lines: +9 -7 +added ! to functions. +---------------------------- +revision 1.8 +date: 2003-08-11 19:16:28 +0000; author: noel; state: Exp; lines: +30 -5 +Fixed a bug in which any line that contained the letter x was counted as +completed. +---------------------------- +revision 1.7 +date: 2003-08-03 23:56:46 +0000; author: noel; state: Exp; lines: +89 -40 + +Replaced HowManyDone() with a new routine. The new routine is recursive, +ignores headings that don't have checkboxes and does not care what the +current folding states of the parent or children are. The heading at the +top of the tree does not even need to have a checkbox. This will work: + +Projects + [_] Software + [_] Input + [_] Processing + [_] Math + [_] Database + [_] Networking + [_] Output + [_] Hardware + [_] Keyboard + [_] Harddisk + [_] Processor + [_] Printer + +One only needs to ,,cx on Projects to update everything (everything shown). +As before, including a % on a parent heading with childred, will be replaced +with a percentage of completion. Nice work Matej! +---------------------------- +revision 1.6 +date: 2003-07-14 00:36:57 +0000; author: noel; state: Exp; lines: +9 -5 +Changed [x] to [X] to make it look more full. If the consensus is +[x], I'll gladly put it back. +---------------------------- +revision 1.5 +date: 2003-07-10 16:29:50 +0000; author: cepl; state: Exp; lines: +75 -3 +Calculation of the subtree completion added. The very first alpha +draft. +---------------------------- +revision 1.4 +date: 2003-07-08 23:48:43 +0000; author: noel; state: Exp; lines: +6 -3 +Fixed a bug in cd. It used to only delete unchecked boxes. +Now it does both. +---------------------------- +revision 1.3 +date: 2003-07-07 14:17:04 +0000; author: noel; state: Exp; lines: +11 -6 +Fixed the folding of the new headers. +---------------------------- +revision 1.2 +date: 2003-07-07 14:14:02 +0000; author: noel; state: Exp; lines: +24 -0 +Added appropriate headers. +---------------------------- +revision 1.1 +date: 2003-07-07 13:52:45 +0000; author: noel; state: Exp; +Changed checkbox.vim to vo_checkbox.vim +============================================================================= + +RCS file: /root/VimOutliner/VimOutliner/add-ons/plugins/vo_hoist.otl,v +Working file: add-ons/plugins/vo_hoist.otl +head: 1.1 +branch: +locks: strict +access list: +symbolic names: +keyword substitution: kv +total revisions: 1; selected revisions: 1 +description: +---------------------------- +revision 1.1 +date: 2003-10-23 22:12:20 +0000; author: noel; state: Exp; +Instructions for vo_hoist.vim. +============================================================================= + +RCS file: /root/VimOutliner/VimOutliner/add-ons/plugins/vo_hoist.vim,v +Working file: add-ons/plugins/vo_hoist.vim +head: 1.9 +branch: +locks: strict +access list: +symbolic names: +keyword substitution: kv +total revisions: 9; selected revisions: 9 +description: +---------------------------- +revision 1.9 +date: 2003-11-12 17:26:09 +0000; author: noel; state: Exp; lines: +6 -2 +Added a command to place the cursor on the first line of +a hoisted outline. +---------------------------- +revision 1.8 +date: 2003-11-12 17:10:51 +0000; author: noel; state: Exp; lines: +9 -3 +Fixed a bug that occurs on a level 1 heading with no children. +---------------------------- +revision 1.7 +date: 2003-10-23 22:14:14 +0000; author: noel; state: Exp; lines: +13 -5 +Minor changes to DeHoist() to compensate for current foldlevel settings. +---------------------------- +revision 1.6 +date: 2003-08-17 15:35:24 +0000; author: noel; state: Exp; lines: +10 -9 +Put the new mappings in the correct place this time. +Added a : and to the ZZ command. +---------------------------- +revision 1.5 +date: 2003-08-17 14:47:42 +0000; author: noel; state: Exp; lines: +8 -2 +Added ZZ, qa, and x to the list of commands that de-hoist the current +outline. +---------------------------- +revision 1.4 +date: 2003-08-17 00:07:31 +0000; author: noel; state: Exp; lines: +13 -10 +Added "silent" to commands generating tedious messages. +---------------------------- +revision 1.3 +date: 2003-08-16 20:08:06 +0000; author: noel; state: Exp; lines: +11 -6 +Removed a need to exclude fold level 1 headings. +---------------------------- +revision 1.2 +date: 2003-08-16 19:02:44 +0000; author: noel; state: Exp; lines: +84 -31 +First fully functional version. May need some tweaks but it works and is +quite easy to use. +---------------------------- +revision 1.1 +date: 2003-08-14 21:05:05 +0000; author: noel; state: Exp; +First publicly available, experiment verison +============================================================================= + +RCS file: /root/VimOutliner/VimOutliner/colors/vo_dark.vim,v +Working file: colors/vo_dark.vim +head: 1.2 +branch: +locks: strict +access list: +symbolic names: +keyword substitution: kv +total revisions: 2; selected revisions: 2 +description: +---------------------------- +revision 1.2 +date: 2005-06-07 15:24:30 +0000; author: noel; state: Exp; lines: +1 -1 +The color darkyellow does not appear to exist on some systems. This color +has been changed to darkred. +---------------------------- +revision 1.1 +date: 2005-06-06 18:45:11 +0000; author: noel; state: Exp; +These are the new color scheme files. +============================================================================= + +RCS file: /root/VimOutliner/VimOutliner/colors/vo_light.vim,v +Working file: colors/vo_light.vim +head: 1.2 +branch: +locks: strict +access list: +symbolic names: +keyword substitution: kv +total revisions: 2; selected revisions: 2 +description: +---------------------------- +revision 1.2 +date: 2005-06-07 15:24:30 +0000; author: noel; state: Exp; lines: +3 -3 +The color darkyellow does not appear to exist on some systems. This color +has been changed to darkred. +---------------------------- +revision 1.1 +date: 2005-06-06 18:45:11 +0000; author: noel; state: Exp; +These are the new color scheme files. +============================================================================= + +RCS file: /root/VimOutliner/VimOutliner/doc/vo_readme.txt,v +Working file: doc/vo_readme.txt +head: 1.9 +branch: +locks: strict +access list: +symbolic names: +keyword substitution: kv +total revisions: 9; selected revisions: 9 +description: +---------------------------- +revision 1.9 +date: 2005-06-07 17:48:21 +0000; author: noel; state: Exp; lines: +4 -0 +Added a better VERSION description. +---------------------------- +revision 1.8 +date: 2005-06-07 16:44:58 +0000; author: noel; state: Exp; lines: +294 -150 +Added a section about VO objects. +Added the ,,cp command. +---------------------------- +revision 1.7 +date: 2004-05-28 15:28:47 +0000; author: noel; state: Exp; lines: +274 -28 +Added complete help for vo_checkbox.vim. +---------------------------- +revision 1.6 +date: 2004-05-17 17:16:28 +0000; author: noel; state: Exp; lines: +1 -1 +Changed 0.3.2 to 0.3.3 in the tite. +---------------------------- +revision 1.5 +date: 2004-05-17 15:21:25 +0000; author: noel; state: Exp; lines: +75 -69 +Modified to reflecte 0.3.3 changes. +---------------------------- +revision 1.4 +date: 2004-02-17 21:52:41 +0000; author: noel; state: Exp; lines: +263 -111 +Modified heavily by Stefan Schiedl for 0.3.2. +---------------------------- +revision 1.3 +date: 2003-10-17 02:18:07 +0000; author: noel; state: Exp; lines: +44 -7 +Changed version numbers. +---------------------------- +revision 1.2 +date: 2003-06-20 14:13:15 +0000; author: noel; state: Exp; lines: +5 -42 +Final documentation tweaks for the final 0.3.0 release. +---------------------------- +revision 1.1 +date: 2003-06-18 13:55:03 +0000; author: noel; state: Exp; +Added this documentation to Vim Outliner. +============================================================================= + +RCS file: /root/VimOutliner/VimOutliner/experimental/Attic/checkbox.vim,v +Working file: experimental/checkbox.vim +head: 1.2 +branch: +locks: strict +access list: +symbolic names: +keyword substitution: kv +total revisions: 2; selected revisions: 2 +description: +---------------------------- +revision 1.2 +date: 2003-07-07 13:52:45 +0000; author: noel; state: dead; lines: +0 -0 +Changed checkbox.vim to vo_checkbox.vim +---------------------------- +revision 1.1 +date: 2003-07-07 01:22:35 +0000; author: noel; state: Exp; +Initial experimental version of checkboxes. +Contains only one function and two mappings. +The only capabilities are to add and delete check boxes from +the beginnings of headings. +============================================================================= + +RCS file: /root/VimOutliner/VimOutliner/filetype/Attic/filetype.vim,v +Working file: filetype/filetype.vim +head: 1.5 +branch: +locks: strict +access list: +symbolic names: + arelease: 1.1.1.1 + avendor: 1.1.1 + testfork: 1.3.0.2 +keyword substitution: kv +total revisions: 6; selected revisions: 6 +description: +VimOutliner filetype.vim +---------------------------- +revision 1.5 +date: 2005-06-07 17:26:52 +0000; author: noel; state: dead; lines: +5 -2 +*** empty log message *** +---------------------------- +revision 1.4 +date: 2003-03-01 17:37:17 +0000; author: noel; state: Exp; lines: +6 -3 +Changed the filetype name to our new standard: vo_base +---------------------------- +revision 1.3 +date: 2003-02-14 17:49:43 +0000; author: noel; state: Exp; lines: +6 -4 +Removed unnecessary filetype commands +---------------------------- +revision 1.2 +date: 2003-02-09 15:07:35 +0000; author: noel; state: Exp; lines: +8 -7 +Changed the auto commands. Setting the "filetype plugin indent on" +option here does not work with ftplugins. +---------------------------- +revision 1.1 +date: 2003-02-08 21:11:26 +0000; author: noel; state: Exp; +branches: 1.1.1; +Initial revision +---------------------------- +revision 1.1.1.1 +date: 2003-03-20 22:35:15 +0000; author: noel; state: Exp; lines: +17 -8 +no message +============================================================================= + +RCS file: /root/VimOutliner/VimOutliner/filetype/vo_base.vim,v +Working file: filetype/vo_base.vim +head: 1.1 +branch: +locks: strict +access list: +symbolic names: +keyword substitution: kv +total revisions: 1; selected revisions: 1 +description: +---------------------------- +revision 1.1 +date: 2005-01-19 16:12:37 +0000; author: noel; state: Exp; +Finally added to CVS. +Don't know how I missed this one. +============================================================================= + +RCS file: /root/VimOutliner/VimOutliner/ftplugin/vo_base.vim,v +Working file: ftplugin/vo_base.vim +head: 2.59 +branch: +locks: strict +access list: +symbolic names: +keyword substitution: kv +total revisions: 59; selected revisions: 59 +description: +Vim Outliner Main Program File +---------------------------- +revision 2.59 +date: 2005-06-07 19:50:45 +0000; author: noel; state: Exp; lines: +2 -1 +Re-removed the did_filetype() function. Restored the original variable-based +solution. +---------------------------- +revision 2.58 +date: 2005-06-07 12:47:38 +0000; author: noel; state: Exp; lines: +1 -2 +Modified switch that prevents the filetype from being loaded more than once. +---------------------------- +revision 2.57 +date: 2004-05-24 22:31:11 +0000; author: noel; state: Exp; lines: +0 -6 +Removed a redundant PreformattedBodyText() function. +---------------------------- +revision 2.56 +date: 2004-05-24 15:56:34 +0000; author: noel; state: Exp; lines: +78 -0 +Added highlighting and folding support for: + Tables (marked with '|') + User-defined, wrapping text (marked with '>') + User-defined, non-wrapping text (marked with '<') +---------------------------- +revision 2.55 +date: 2004-05-17 15:18:20 +0000; author: noel; state: Exp; lines: +20 -1 +Added Steve Litt's simple executable lines. +---------------------------- +revision 2.54 +date: 2004-05-17 14:18:27 +0000; author: noel; state: Exp; lines: +41 -16 +Replaced system calls to 'date' with strftime(). +Modified the time- and date-stamp functions. +normal t append the time to the current heading +normal T prepend the time to the current heading +insert t insert the time at the cursor +normal d append the date to the current heading +normal D prepend the date to the current heading +insert d insert the date at the cursor +---------------------------- +revision 2.53 +date: 2004-05-17 13:32:38 +0000; author: noel; state: Exp; lines: +2 -2 +Added to end of sort commands. +---------------------------- +revision 2.52 +date: 2004-05-17 13:30:12 +0000; author: noel; state: Exp; lines: +167 -2 +Added child-aware sorting functions. +Mapped s to sort ascending. +Mapped S to sort descending. +---------------------------- +revision 2.51 +date: 2004-03-18 13:25:46 +0000; author: noel; state: Exp; lines: +1 -1 +Fixed a mapping command for w +---------------------------- +revision 2.50 +date: 2004-02-17 21:47:31 +0000; author: noel; state: Exp; lines: +0 -217 +Removed the detailed revision log. It's getting too big. From now on +'cvs log' will need to be used to see the log. +---------------------------- +revision 2.49 +date: 2003-10-17 01:37:10 +0000; author: noel; state: Exp; lines: +24 -10 +Fixed a minor folding issue. +---------------------------- +revision 2.48 +date: 2003-08-04 13:25:17 +0000; author: noel; state: Exp; lines: +37 -7 +Corrected a type for w +---------------------------- +revision 2.47 +date: 2003-06-16 23:57:20 +0000; author: noel; state: Exp; lines: +7 -3 +Set UseSpaceColon=0. This is now the standard. +---------------------------- +revision 2.46 +date: 2003-06-04 11:54:25 +0000; author: noel; state: Exp; lines: +24 -6 +The behavior of the "d" and "t" commands have been improved and put into +functions. These commands are now mapped to call the improved functions. +---------------------------- +revision 2.45 +date: 2003-06-04 11:25:56 +0000; author: noel; state: Exp; lines: +12 -3 +Moved the modification to the tags path outside the "if" statement in +autocommands in ftplugin. Completely removed the line from syntax. +---------------------------- +revision 2.44 +date: 2003-05-27 13:33:34 +0000; author: noel; state: Exp; lines: +45 -29 +Added Vim style folds to both vo_base files to make them easier to read. +Added a mode line to the end of each to activate the folds. +Added a "Documentation" section that is mostly empty. This section will +eventually be extracted automatically to form the online help via Vim's +built-in help mechanisms. +---------------------------- +revision 2.43 +date: 2003-05-23 18:36:44 +0000; author: noel; state: Exp; lines: +7 -4 +More trouble with the ,,d function and retaining proper indentation. +---------------------------- +revision 2.42 +date: 2003-05-23 16:02:42 +0000; author: noel; state: Exp; lines: +8 -2 +Added tag file support for ~/.vimoutliner. +---------------------------- +revision 2.41 +date: 2003-05-23 13:55:25 +0000; author: noel; state: Exp; lines: +10 -6 +Modified the d and t commands. They did not work properly on closed folds. +Commented-out the d and t commands when in insert mode. I have not used them +and they don't work properly. +---------------------------- +revision 2.40 +date: 2003-05-17 23:29:25 +0000; author: noel; state: Exp; lines: +11 -6 +Modified date and time (,,d/,,t) to place date/time at beginning of +line instead of end of line to allow for sorting. +---------------------------- +revision 2.39 +date: 2003-05-17 22:49:26 +0000; author: noel; state: Exp; lines: +20 -16 +Changed ^M to in all occurrances. +Modified date (d) and time (t) to add date/time to end of +current line. +---------------------------- +revision 2.38 +date: 2003-03-05 17:58:22 +0000; author: cepl; state: Exp; lines: +6 -3 +Personal configuration file was not run from the user's $HOME directory. +Fixed. +---------------------------- +revision 2.37 +date: 2003-03-03 16:24:49 +0000; author: noel; state: Exp; lines: +6 -3 +Added ~/.vim and ~/.vimoutliner as places to look for tag files. +---------------------------- +revision 2.36 +date: 2003-03-01 17:37:41 +0000; author: noel; state: Exp; lines: +13 -5 +Changed the filetype name to our new standard: vo_base +---------------------------- +revision 2.35 +date: 2003-02-09 15:04:56 +0000; author: noel; state: Exp; lines: +70 -55 +Changed key mappings to be local to the current buffer only. They +will also be loaded for any subsequent .otl file. +Changed key mappings to use an easily modifiable leader. In this case +",,". +Changed the scope of some variables. They had a buffer scoping but now +have a function scope. +---------------------------- +revision 2.34 +date: 2003-02-08 22:07:47 +0000; author: noel; state: Exp; lines: +5 -63 +Removed spellfix functions. Perhaps I'll make them another plugin. +---------------------------- +revision 2.33 +date: 2003-02-08 21:31:01 +0000; author: noel; state: Exp; lines: +5 -116 +Split out syntax settings as Dillon originally showed. +---------------------------- +revision 2.32 +date: 2003-01-30 01:47:41 +0000; author: noel; state: Exp; lines: +6 -3 +modified switches sent to ispell to make it guess better. +---------------------------- +revision 2.31 +date: 2003-01-28 22:31:37 +0000; author: noel; state: Exp; lines: +6 -3 +Modified setlocal foldtext.... to set foldtext.... +---------------------------- +revision 2.30 +date: 2003-01-22 22:03:12 +0000; author: noel; state: Exp; lines: +8 -3 +Fixed bodytext folding method. +---------------------------- +revision 2.29 +date: 2003-01-21 00:18:50 +0000; author: noel; state: Exp; lines: +20 -7 +Fixed a problem with runtimepath. +Added a use_space_colon setting to that one can choose between bodytext +marked with a : or with a space-:. +---------------------------- +revision 2.28 +date: 2003-01-19 16:46:27 +0000; author: noel; state: Exp; lines: +11 -3 +Removed some strange escape characters from a revision comment. +---------------------------- +revision 2.27 +date: 2003-01-19 16:16:54 +0000; author: noel; state: Exp; lines: +101 -88 +Added detection of the color scheme and an alternative set of colors +for dark backgrounds. (well actually for non-"light" backgrounds) at +Dillon Jones' request. +Set the "current_syntax" at Dillon's request. +Modified the exe lines in the source to remove the debugging style I was +using. +---------------------------- +revision 2.26 +date: 2003-01-16 00:56:51 +0000; author: noel; state: Exp; lines: +26 -23 +Changed a bunch of set commands to setlocal commands at the +suggestion of Jeffrey Hood. Thanks, Jeffrey! +---------------------------- +revision 2.25 +date: 2003-01-13 17:05:08 +0000; author: noel; state: Exp; lines: +14 -11 +Fixed a problem with the new regex that define headings. +---------------------------- +revision 2.24 +date: 2003-01-12 19:08:32 +0000; author: noel; state: Exp; lines: +36 -25 +Converted from _ to : +---------------------------- +revision 2.23 +date: 2003-01-11 21:00:33 +0000; author: noel; state: Exp; lines: +55 -38 +Added Matej requirement for personalization settings via +.vimoutlinerrc. +Added Steve's style of bodytext that allows for wrapping and formatting +with have the headings wrap as well. It is currently set for "_" as +the bodytext marker. +Added ,,b to set all bodytext to Steve's style. +Added ,,B to set all bodytext to my style. This will also make it +possible for Steve's style to be quickly reformatted for pretty +printing with :ha. +---------------------------- +revision 2.22 +date: 2003-01-11 00:35:32 +0000; author: noel; state: Exp; lines: +7 -2 +[6~Added support for .vimoutlinerrc in both ~ and ~/.vimoutliner. +---------------------------- +revision 2.21 +date: 2002-12-12 13:38:58 +0000; author: noel; state: Exp; lines: +10 -3 +Fixed a spelling problem when words contain a '. +---------------------------- +revision 2.20 +date: 2002-12-11 23:33:16 +0000; author: noel; state: Exp; lines: +7 -3 +Removed a debug setting, again (sigh). +Added some iskeyword symbols so spell-check would work on things +like: don't +---------------------------- +revision 2.19 +date: 2002-12-11 22:55:19 +0000; author: noel; state: Exp; lines: +24 -11 +Fixed body text end error. I was checking for too specific a case. +---------------------------- +revision 2.18 +date: 2002-12-11 14:57:52 +0000; author: noel; state: Exp; lines: +7 -4 +Fixed wrapmargin setting and a line counter error during folding. +---------------------------- +revision 2.17 +date: 2002-12-11 00:42:47 +0000; author: noel; state: Exp; lines: +7 -3 +Removed a debug setting, again. +---------------------------- +revision 2.16 +date: 2002-12-10 22:21:09 +0000; author: noel; state: Exp; lines: +19 -14 +Moved body text up one tab level. It seems to be more intuitive +to others. +---------------------------- +revision 2.15 +date: 2002-12-10 19:24:13 +0000; author: noel; state: Exp; lines: +6 -2 +Added a function to auto-wrap lines. This could be a problem for entering long headings. +---------------------------- +revision 2.14 +date: 2002-12-10 18:11:13 +0000; author: noel; state: Exp; lines: +9 -3 +Removed a debug feature +---------------------------- +revision 2.13 +date: 2002-12-10 17:59:42 +0000; author: noel; state: Exp; lines: +45 -15 +Added bodytext. +Added bodytext folding. +Modified MyFoldText to show [TEXT] for folded bodytext. +Added an autocommand to re-sync the folding. +---------------------------- +revision 2.12 +date: 2002-12-09 18:16:49 +0000; author: noel; state: Exp; lines: +11 -4 +Fixed a typo and added an extra \ before & for adding upper cas3e +words. +---------------------------- +revision 2.11 +date: 2002-12-09 17:15:37 +0000; author: noel; state: Exp; lines: +13 -5 +Added ,,kA. +Swapped functions of ,,ka and ,,kA. + ,,ka add lowercase version of word to dictionary + ,,kA add word as it appears to dictionary +---------------------------- +revision 2.10 +date: 2002-12-09 17:08:47 +0000; author: noel; state: Exp; lines: +15 -8 +Fixed an error that occurs when there is just a single spelling checker. +---------------------------- +revision 2.9 +date: 2002-12-09 16:42:02 +0000; author: noel; state: Exp; lines: +13 -7 +Fixed error messages on searches with no matches. +This is part of the spell-check search. +---------------------------- +revision 2.8 +date: 2002-12-09 14:21:29 +0000; author: noel; state: Exp; lines: +11 -8 +Fixed spelling highlighting and and spelling searches so that only real matches are highlighed and possible to jump to with ,,kn and ,,kN (and n and N after +that). +Modified the "source" statement that load spellfix.vim. Spellfix.vim now +needs to be in ~/.vimoutliner. +---------------------------- +revision 2.7 +date: 2002-12-07 22:08:02 +0000; author: noel; state: Exp; lines: +30 -39 +finished integration of spellfix.vim +---------------------------- +revision 2.6 +date: 2002-12-07 16:46:47 +0000; author: noel; state: Exp; lines: +86 -6 +Added these commands to enhance the spelling checker + ,,kk speck-check document highlighting errors + ,,ka add the word under the cursor to the selected dictionary + ,,kn search forward to the next spelling error + N and n both work well with this + ,,kN search backward to the next spelling error + N and n both work well with this + ,,kq unhighlight the spelling errors +---------------------------- +revision 2.5 +date: 2002-11-27 22:54:28 +0000; author: noel; state: Exp; lines: +22 -16 +Changed date and time formats. +changed the mappings of ,,0-,,9 so that ,,1 corresponds to show only +1 level. +---------------------------- +revision 2.4 +date: 2002-11-26 00:36:08 +0000; author: noel; state: Exp; lines: +68 -62 +Added more comments. +Added Steve's GPL header. +Will keep the RCS info in my version but will remove it for +distribution. +---------------------------- +revision 2.3 +date: 2002-11-21 19:30:37 +0000; author: noel; state: Exp; lines: +21 -8 +Included a patchfile from Steve to: + move the if loaded behavior to a place in the file after the settings + add an if loaded behavior for the file extension autocommmand + added the nocindent setting + changed the ,,,, mapping + clear the indexexpr setting +---------------------------- +revision 2.2 +date: 2002-11-16 00:00:10 +0000; author: noel; state: Exp; lines: +215 -196 +Added more comments. +Switched the polarity of the if exists(loaded_outliner) function +Commented-out some experimental features. +Grouped the user preferences together and separated out the +VimOutliner operational settings. +---------------------------- +revision 2.1 +date: 2002-11-15 23:37:39 +0000; author: noel; state: Exp; +Version 2 Beta Candidate before pre-release modifications +============================================================================= + +RCS file: /root/VimOutliner/VimOutliner/otf/otf.vim,v +Working file: otf/otf.vim +head: 1.3 +branch: +locks: strict +access list: +symbolic names: +keyword substitution: kv +total revisions: 3; selected revisions: 3 +description: +---------------------------- +revision 1.3 +date: 2003-06-03 19:56:09 +0000; author: gabriel; state: Exp; lines: +2 -2 +changed bash function to perl,corrected file name error in otf.vi +---------------------------- +revision 1.2 +date: 2003-06-02 21:01:16 +0000; author: gabriel; state: Exp; lines: +9 -9 +created wishlist_demo.otl +changed output files of Createotl() in otf.vim so users need only a ~/bin directory +---------------------------- +revision 1.1 +date: 2003-06-01 13:16:32 +0000; author: gabriel; state: Exp; +new 'on the fly' files +============================================================================= + +RCS file: /root/VimOutliner/VimOutliner/otf/otfREADME,v +Working file: otf/otfREADME +head: 1.4 +branch: +locks: strict +access list: +symbolic names: +keyword substitution: kv +total revisions: 4; selected revisions: 4 +description: +---------------------------- +revision 1.4 +date: 2003-06-03 20:21:43 +0000; author: gabriel; state: Exp; lines: +2 -1 +instruction where to put otl.pl +---------------------------- +revision 1.3 +date: 2003-06-03 19:56:09 +0000; author: gabriel; state: Exp; lines: +2 -3 +changed bash function to perl,corrected file name error in otf.vi +---------------------------- +revision 1.2 +date: 2003-06-02 21:01:16 +0000; author: gabriel; state: Exp; lines: +12 -7 +created wishlist_demo.otl +changed output files of Createotl() in otf.vim so users need only a ~/bin directory +---------------------------- +revision 1.1 +date: 2003-06-01 13:16:32 +0000; author: gabriel; state: Exp; +new 'on the fly' files +============================================================================= + +RCS file: /root/VimOutliner/VimOutliner/otf/otl,v +Working file: otf/otl +head: 1.2 +branch: +locks: strict +access list: +symbolic names: +keyword substitution: kv +total revisions: 2; selected revisions: 2 +description: +---------------------------- +revision 1.2 +date: 2003-06-02 21:01:16 +0000; author: gabriel; state: Exp; lines: +2 -5 +created wishlist_demo.otl +changed output files of Createotl() in otf.vim so users need only a ~/bin directory +---------------------------- +revision 1.1 +date: 2003-06-01 13:16:32 +0000; author: gabriel; state: Exp; +new 'on the fly' files +============================================================================= + +RCS file: /root/VimOutliner/VimOutliner/otf/otl.pl,v +Working file: otf/otl.pl +head: 1.1 +branch: +locks: strict +access list: +symbolic names: +keyword substitution: kv +total revisions: 1; selected revisions: 1 +description: +---------------------------- +revision 1.1 +date: 2003-06-03 19:57:00 +0000; author: gabriel; state: Exp; +new script replacing otl +============================================================================= + +RCS file: /root/VimOutliner/VimOutliner/otf/wishlist_demo.otl,v +Working file: otf/wishlist_demo.otl +head: 1.3 +branch: +locks: strict +access list: +symbolic names: +keyword substitution: kv +total revisions: 3; selected revisions: 3 +description: +---------------------------- +revision 1.3 +date: 2003-06-03 20:21:43 +0000; author: gabriel; state: Exp; lines: +2 -1 +instruction where to put otl.pl +---------------------------- +revision 1.2 +date: 2003-06-02 21:29:49 +0000; author: gabriel; state: Exp; lines: +28 -18 +changed Otl fns branch so it had the correct parents +---------------------------- +revision 1.1 +date: 2003-06-02 21:01:16 +0000; author: gabriel; state: Exp; +created wishlist_demo.otl +changed output files of Createotl() in otf.vim so users need only a ~/bin directory +============================================================================= + +RCS file: /root/VimOutliner/VimOutliner/scripts/vo_maketags.pl,v +Working file: scripts/vo_maketags.pl +head: 1.1 +branch: +locks: strict +access list: +symbolic names: +keyword substitution: kv +total revisions: 1; selected revisions: 1 +description: +---------------------------- +revision 1.1 +date: 2003-06-20 14:13:15 +0000; author: noel; state: Exp; +Final documentation tweaks for the final 0.3.0 release. +============================================================================= + +RCS file: /root/VimOutliner/VimOutliner/syntax/vo_base.vim,v +Working file: syntax/vo_base.vim +head: 2.47 +branch: +locks: strict +access list: +symbolic names: +keyword substitution: kv +total revisions: 47; selected revisions: 47 +description: +Vim Outliner Main Program File +---------------------------- +revision 2.47 +date: 2005-06-07 15:24:30 +0000; author: noel; state: Exp; lines: +4 -4 +The color darkyellow does not appear to exist on some systems. This color +has been changed to darkred. +---------------------------- +revision 2.46 +date: 2005-01-19 15:03:55 +0000; author: noel; state: Exp; lines: +2 -1 +Fixed another W18 error. +---------------------------- +revision 2.45 +date: 2004-11-27 19:30:43 +0000; author: noel; state: Exp; lines: +6 -5 + +Minor syntax and installation adjustments. +Change to vo_checkbox to fix a typo. +---------------------------- +revision 2.44 +date: 2004-05-24 15:56:34 +0000; author: noel; state: Exp; lines: +142 -19 +Added highlighting and folding support for: + Tables (marked with '|') + User-defined, wrapping text (marked with '>') + User-defined, non-wrapping text (marked with '<') +---------------------------- +revision 2.43 +date: 2004-02-17 21:48:47 +0000; author: noel; state: Exp; lines: +0 -297 +Removed the embedded and out-of-date documentation. +Removed the detailed revision log. It's too large. From now on +'cvs log' will be needed to see the log. +---------------------------- +revision 2.42 +date: 2003-10-17 01:34:03 +0000; author: noel; state: Exp; lines: +43 -30 + +Modified highlighting to support extended character sets. +---------------------------- +revision 2.41 +date: 2003-06-04 11:25:56 +0000; author: noel; state: Exp; lines: +5 -3 +Moved the modification to the tags path outside the "if" statement in +autocommands in ftplugin. Completely removed the line from syntax. +---------------------------- +revision 2.40 +date: 2003-05-27 15:03:26 +0000; author: noel; state: Exp; lines: +88 -23 +Added some documentation on the commands. +---------------------------- +revision 2.39 +date: 2003-05-27 13:33:34 +0000; author: noel; state: Exp; lines: +73 -16 +Added Vim style folds to both vo_base files to make them easier to read. +Added a mode line to the end of each to activate the folds. +Added a "Documentation" section that is mostly empty. This section will +eventually be extracted automatically to form the online help via Vim's +built-in help mechanisms. +---------------------------- +revision 2.38 +date: 2003-05-23 16:02:42 +0000; author: noel; state: Exp; lines: +8 -3 +Added tag file support for ~/.vimoutliner. +---------------------------- +revision 2.37 +date: 2003-03-01 17:07:53 +0000; author: noel; state: Exp; lines: +34 -36 +Removed the bold and underline glamour. +It did not work with the level colorization nor properly cross line boundries. +---------------------------- +revision 2.36 +date: 2003-02-12 15:40:26 +0000; author: noel; state: Exp; lines: +41 -32 +Added some glamour. *word* make word bold and _word_ underlines a word. +---------------------------- +revision 2.35 +date: 2003-02-09 14:54:10 +0000; author: noel; state: Exp; lines: +7 -3 +Removed syntax highlighting for SpellErrors and BadWord. The plugins +include their own. +---------------------------- +revision 2.34 +date: 2003-02-08 21:59:25 +0000; author: noel; state: Exp; lines: +36 -31 +Added SpellErrors and BadWord to the contains attributes of headings +and bodytext. Now we're compatible with engspchk and vimspell. +---------------------------- +revision 2.33 +date: 2003-02-08 21:34:46 +0000; author: noel; state: Exp; lines: +5 -213 +Split out functions as Dillon originally showed. +---------------------------- +revision 2.32 +date: 2003-01-30 01:47:41 +0000; author: noel; state: Exp; lines: +6 -3 +modified switches sent to ispell to make it guess better. +---------------------------- +revision 2.31 +date: 2003-01-28 22:31:37 +0000; author: noel; state: Exp; lines: +6 -3 +Modified setlocal foldtext.... to set foldtext.... +---------------------------- +revision 2.30 +date: 2003-01-22 22:03:12 +0000; author: noel; state: Exp; lines: +8 -3 +Fixed bodytext folding method. +---------------------------- +revision 2.29 +date: 2003-01-21 00:18:50 +0000; author: noel; state: Exp; lines: +20 -7 +Fixed a problem with runtimepath. +Added a use_space_colon setting to that one can choose between bodytext +marked with a : or with a space-:. +---------------------------- +revision 2.28 +date: 2003-01-19 16:46:27 +0000; author: noel; state: Exp; lines: +11 -3 +Removed some strange escape characters from a revision comment. +---------------------------- +revision 2.27 +date: 2003-01-19 16:16:54 +0000; author: noel; state: Exp; lines: +101 -88 +Added detection of the color scheme and an alternative set of colors +for dark backgrounds. (well actually for non-"light" backgrounds) at +Dillon Jones' request. +Set the "current_syntax" at Dillon's request. +Modified the exe lines in the source to remove the debugging style I was +using. +---------------------------- +revision 2.26 +date: 2003-01-16 00:56:51 +0000; author: noel; state: Exp; lines: +26 -23 +Changed a bunch of set commands to setlocal commands at the +suggestion of Jeffrey Hood. Thanks, Jeffrey! +---------------------------- +revision 2.25 +date: 2003-01-13 17:05:08 +0000; author: noel; state: Exp; lines: +14 -11 +Fixed a problem with the new regex that define headings. +---------------------------- +revision 2.24 +date: 2003-01-12 19:08:32 +0000; author: noel; state: Exp; lines: +36 -25 +Converted from _ to : +---------------------------- +revision 2.23 +date: 2003-01-11 21:00:33 +0000; author: noel; state: Exp; lines: +55 -38 +Added Matej requirement for personalization settings via +.vimoutlinerrc. +Added Steve's style of bodytext that allows for wrapping and formatting +with have the headings wrap as well. It is currently set for "_" as +the bodytext marker. +Added ,,b to set all bodytext to Steve's style. +Added ,,B to set all bodytext to my style. This will also make it +possible for Steve's style to be quickly reformatted for pretty +printing with :ha. +---------------------------- +revision 2.22 +date: 2003-01-11 00:35:32 +0000; author: noel; state: Exp; lines: +7 -2 +[6~Added support for .vimoutlinerrc in both ~ and ~/.vimoutliner. +---------------------------- +revision 2.21 +date: 2002-12-12 13:38:58 +0000; author: noel; state: Exp; lines: +10 -3 +Fixed a spelling problem when words contain a '. +---------------------------- +revision 2.20 +date: 2002-12-11 23:33:16 +0000; author: noel; state: Exp; lines: +7 -3 +Removed a debug setting, again (sigh). +Added some iskeyword symbols so spell-check would work on things +like: don't +---------------------------- +revision 2.19 +date: 2002-12-11 22:55:19 +0000; author: noel; state: Exp; lines: +24 -11 +Fixed body text end error. I was checking for too specific a case. +---------------------------- +revision 2.18 +date: 2002-12-11 14:57:52 +0000; author: noel; state: Exp; lines: +7 -4 +Fixed wrapmargin setting and a line counter error during folding. +---------------------------- +revision 2.17 +date: 2002-12-11 00:42:47 +0000; author: noel; state: Exp; lines: +7 -3 +Removed a debug setting, again. +---------------------------- +revision 2.16 +date: 2002-12-10 22:21:09 +0000; author: noel; state: Exp; lines: +19 -14 +Moved body text up one tab level. It seems to be more intuitive +to others. +---------------------------- +revision 2.15 +date: 2002-12-10 19:24:13 +0000; author: noel; state: Exp; lines: +6 -2 +Added a function to auto-wrap lines. This could be a problem for entering long headings. +---------------------------- +revision 2.14 +date: 2002-12-10 18:11:13 +0000; author: noel; state: Exp; lines: +9 -3 +Removed a debug feature +---------------------------- +revision 2.13 +date: 2002-12-10 17:59:42 +0000; author: noel; state: Exp; lines: +45 -15 +Added bodytext. +Added bodytext folding. +Modified MyFoldText to show [TEXT] for folded bodytext. +Added an autocommand to re-sync the folding. +---------------------------- +revision 2.12 +date: 2002-12-09 18:16:49 +0000; author: noel; state: Exp; lines: +11 -4 +Fixed a typo and added an extra \ before & for adding upper cas3e +words. +---------------------------- +revision 2.11 +date: 2002-12-09 17:15:37 +0000; author: noel; state: Exp; lines: +13 -5 +Added ,,kA. +Swapped functions of ,,ka and ,,kA. + ,,ka add lowercase version of word to dictionary + ,,kA add word as it appears to dictionary +---------------------------- +revision 2.10 +date: 2002-12-09 17:08:47 +0000; author: noel; state: Exp; lines: +15 -8 +Fixed an error that occurs when there is just a single spelling checker. +---------------------------- +revision 2.9 +date: 2002-12-09 16:42:02 +0000; author: noel; state: Exp; lines: +13 -7 +Fixed error messages on searches with no matches. +This is part of the spell-check search. +---------------------------- +revision 2.8 +date: 2002-12-09 14:21:29 +0000; author: noel; state: Exp; lines: +11 -8 +Fixed spelling highlighting and and spelling searches so that only real matches are highlighed and possible to jump to with ,,kn and ,,kN (and n and N after +that). +Modified the "source" statement that load spellfix.vim. Spellfix.vim now +needs to be in ~/.vimoutliner. +---------------------------- +revision 2.7 +date: 2002-12-07 22:08:02 +0000; author: noel; state: Exp; lines: +30 -39 +finished integration of spellfix.vim +---------------------------- +revision 2.6 +date: 2002-12-07 16:46:47 +0000; author: noel; state: Exp; lines: +86 -6 +Added these commands to enhance the spelling checker + ,,kk speck-check document highlighting errors + ,,ka add the word under the cursor to the selected dictionary + ,,kn search forward to the next spelling error + N and n both work well with this + ,,kN search backward to the next spelling error + N and n both work well with this + ,,kq unhighlight the spelling errors +---------------------------- +revision 2.5 +date: 2002-11-27 22:54:28 +0000; author: noel; state: Exp; lines: +22 -16 +Changed date and time formats. +changed the mappings of ,,0-,,9 so that ,,1 corresponds to show only +1 level. +---------------------------- +revision 2.4 +date: 2002-11-26 00:36:08 +0000; author: noel; state: Exp; lines: +68 -62 +Added more comments. +Added Steve's GPL header. +Will keep the RCS info in my version but will remove it for +distribution. +---------------------------- +revision 2.3 +date: 2002-11-21 19:30:37 +0000; author: noel; state: Exp; lines: +21 -8 +Included a patchfile from Steve to: + move the if loaded behavior to a place in the file after the settings + add an if loaded behavior for the file extension autocommmand + added the nocindent setting + changed the ,,,, mapping + clear the indexexpr setting +---------------------------- +revision 2.2 +date: 2002-11-16 00:00:10 +0000; author: noel; state: Exp; lines: +215 -196 +Added more comments. +Switched the polarity of the if exists(loaded_outliner) function +Commented-out some experimental features. +Grouped the user preferences together and separated out the +VimOutliner operational settings. +---------------------------- +revision 2.1 +date: 2002-11-15 23:37:39 +0000; author: noel; state: Exp; +Version 2 Beta Candidate before pre-release modifications +============================================================================= + +RCS file: /root/VimOutliner/VimOutliner/tarballs/vimoutliner-0.3.2.tar.gz,v +Working file: tarballs/vimoutliner-0.3.2.tar.gz +head: 1.1 +branch: +locks: strict +access list: +symbolic names: +keyword substitution: kv +total revisions: 1; selected revisions: 1 +description: +---------------------------- +revision 1.1 +date: 2004-02-23 12:34:28 +0000; author: noel; state: Exp; +Adding for posterity's sake. +============================================================================= + +RCS file: /root/VimOutliner/VimOutliner/tarballs/vimoutliner-0.3.2a.tar.gz,v +Working file: tarballs/vimoutliner-0.3.2a.tar.gz +head: 1.1 +branch: +locks: strict +access list: +symbolic names: +keyword substitution: kv +total revisions: 1; selected revisions: 1 +description: +---------------------------- +revision 1.1 +date: 2004-02-23 12:34:28 +0000; author: noel; state: Exp; +Adding for posterity's sake. +============================================================================= + +RCS file: /root/VimOutliner/VimOutliner/tarballs/vimoutliner.0.3.1.tgz,v +Working file: tarballs/vimoutliner.0.3.1.tgz +head: 1.1 +branch: +locks: strict +access list: +symbolic names: +keyword substitution: kv +total revisions: 1; selected revisions: 1 +description: +---------------------------- +revision 1.1 +date: 2003-10-17 02:21:28 +0000; author: noel; state: Exp; +Official version 0.3.1 +============================================================================= + +" vim600: set noet ts=8 sw=8 sts=8 tw=78: diff --git a/pack/acp/start/vimoutliner/INSTALL b/pack/acp/start/vimoutliner/INSTALL new file mode 100644 index 0000000..c3e71c8 --- /dev/null +++ b/pack/acp/start/vimoutliner/INSTALL @@ -0,0 +1,137 @@ +Installing and Testing VimOutliner + + + Automatic Method |vo-auto-install| + Updating |vo-updating| + Manual Method |vo-manual-install| + Testing |vo-testing| + + +Automatic Method + +The automatic installation targets Unix-compatible platforms: + +From tar archive + + $ tar xzvf vimoutliner-0.3.x.tar.gz + $ cd vimoutliner + $ sh install.sh + +From zip archive + + $ unzip vimoutliner-0.3.x.zip + $ cd vimoutliner-0.3.x + $ sh install.sh + +Installing with pathogen + +If you have pathogen installed as your package manager you can clone the git repository in you +pathogen directory: + $ cd ~/.vim/bundle && git clone https://github.com/vimoutliner/vimoutliner.git + +Installing using install.sh: + +First you can decide whether to install the VimOutliner files or abort the +process leaving everything unchanged. Assuming you confirmed the +installation, the script creates the necessary directory tree and copies the +files which provide the core functionality and documentation. + +With the second question you decide whether you want to install some brand new +add-ons, currently implementing checkboxes(enabled), hoisting(disabled) +and smart paste(disabled), as well as several useful external scripts in the vimoutliner/scripts folder. + + +Updating + +Updating an existing installation might require some manual work. + +If you are already working with a previous VimOutliner release, there is a +slight chance that the current directory tree is different from your current +one. In this case, you will have to manually migrate your files to the new +locations. + +The installation script creates unique backups of files being replaced with +newer versions. So if you put some local customisations into, say +$HOME/.vim/vimoutliner/vimoutlinerrc, you'll probably have to merge the backup +with the new file by hand. + + +Manual Method + +You can also copy the files from the unpacked distribution tarball into their +destination folders by yourself. The following steps are a description of what +has to go where and assume some knowledge of your vim setup. + +If you encounter problems, please contact the mailing list for an immediate +solution and more complete future documentation. www.lists.vimoutliner.org + +If you want to setup VimOutliner on a system running Microsoft Windows, the +directory $HOME denotes the base folder of the vim installation. If you're on +Unix based system, $HOME is as usual. + +You need the following sub trees in your $HOME directory: + + $HOME/.vim/ + doc/ + ftdetect/ + ftplugin/ + syntax/ + vimoutliner/ + plugins/ + scripts/ + +The distribution tarball unpacks into a directory vimoutliner with the +following contents: + + vimoutliner/ + plugins/ (1) + scripts/ (1) + doc/ (1) + ftdetect/ (1) + ftplugin/ (1) + install.sh* + syntax/ (1) + syntax/ (1) + vimoutlinerrc (1) + +(1) The content of these folders should be copied to their namesakes in the +$HOME/.vim folder + +Your $HOME/.vimrc file should contain the lines + + filetype plugin indent on + syntax on + +Finally, you need to integrate the online help provided with VimOutliner into +the vim help system. Start vim and execute the following command: + + :helptags $HOME/.vim/doc + +At this point, VimOutliner should be functional. Type ":help vo" to get +started. To get a quick overview of all VimOutliner commands you can view the +cheatsheet with ":help votl_cheatsheet". + +Testing Base Functionality + +Create a text file and save it as a .otl file like vo_test.otl. Enter +some text and verify the following: +- Tabs indent the text +- Different indent levels are different colors +- Lines starting with a colon and space word-wrap + +Lines starting with colons are body text. They should word wrap and +should be a special color (typically green, but it can vary). Verify +that paragraphs of body text can be reformatted with the Vim gq +commands. + +You can test the different VimOutliner commands by looking at the examples +in the cheatsheet. "help votl_cheatsheet". + +Debian Installation + +Debian does include VimOutliner as a package. However some Debian versions +require this line to be added to your .vimrc file: + + syntax on + + diff --git a/pack/acp/start/vimoutliner/LICENSE b/pack/acp/start/vimoutliner/LICENSE new file mode 100644 index 0000000..e260844 --- /dev/null +++ b/pack/acp/start/vimoutliner/LICENSE @@ -0,0 +1,11 @@ +LICENSE + + VimOutliner + Copyright (C) 2001, 2003 by Steve Litt + Copyright (C) 2004 by Noel Henson + Licensed under the GNU General Public License (GPL), version 3 + Absolutely no warranty. + + If your distro doesn't come with the GPL file you can find it here: + HTML: http://www.gnu.org/copyleft/gpl.html + Text: http://www.gnu.org/copyleft/gpl.txt diff --git a/pack/acp/start/vimoutliner/README b/pack/acp/start/vimoutliner/README new file mode 100644 index 0000000..addfde3 --- /dev/null +++ b/pack/acp/start/vimoutliner/README @@ -0,0 +1,81 @@ + +VimOutliner README file + +Introduction + +VimOutliner is an outline processor with many of the same features +as Grandview, More, Thinktank, Ecco, etc. Features include tree +expand/collapse, tree promotion/demotion, level sensitive colors, +interoutline linking, and body text. + +What sets VimOutliner apart from the rest is that it's been constructed +from the ground up for fast and easy authoring. Keystrokes are quick and +easy, especially for someone knowing the Vim editor. VimOutliner can be +used without the mouse (but is supported to the extent that Vim supports +the mouse). + +Many of the VimOutliner commands start with a double comma ",," because +that's very quick to type. All VimOutliner files have the ".otl" +extension. For help on VimOutliner type ":h vo". For an overview of +all the most important VimOutliner commands you can type ":h votl_cheatsheet" +when you have opened an otl file. + + +* Usage + +VimOutliner has been reported to help with the following tasks: + + - Project management + - Password wallet + - To-do lists + - Account and cash book + - 'Plot device' for writing novels + - Inventory control + - Hierarchical database + - Web site management + +* Characteristics + + - Fast and effective + - Fully integrated with Vim + - Extensible through plugins + - Many post-processing scripts allow exporting to multiple formats + - Extensive documentation + +For more information on the use of VimOutliner see the README.detailed +file in this directory. + + +Installation details + +1. Zip file + +To install from the zip file do the following (exchange "x" with +version number from the package you have downloaded): + +$ unzip vimoutliner-0.3.x.zip $ cd vimoutliner-0.3.x $ sh install.sh + +2. Gzip archive + +To install from the gzip archive follow these steps: + +$ tar -xzvf vimoutliner-0.3.x.tgz $ cd vimoutliner-0.3.x $ sh install.sh + +Downloads + +zip archives are available here: + +https://github.com/vimoutliner/vimoutliner/downloads + +Download of all packages can also be done from the Freshmeat site: + +http://freecode.com/projects/vimoutliner + +For more detailed installation instructions see the INSTALL file in +this directory. + + + + + + diff --git a/pack/acp/start/vimoutliner/README.detailed b/pack/acp/start/vimoutliner/README.detailed new file mode 120000 index 0000000..5b34fec --- /dev/null +++ b/pack/acp/start/vimoutliner/README.detailed @@ -0,0 +1 @@ +doc/votl.txt \ No newline at end of file diff --git a/pack/acp/start/vimoutliner/TODO.otl b/pack/acp/start/vimoutliner/TODO.otl new file mode 100644 index 0000000..933fa04 --- /dev/null +++ b/pack/acp/start/vimoutliner/TODO.otl @@ -0,0 +1,27 @@ +TODO LIST + Updated: 20140916 + :This is just a preliminary roadmap, use the issue list at + :https://github.com/vimoutliner/vimoutliner/issues for suggesting new + :features and register issues or bugs + +Work planned for next version: + Cleanup code in plugins to more efficient vim script + Make plug mappings for all commands + Decide on common script language, and write scripts in new language + +Maybe/probably: + Include a list of vim plugins that are useful with VimOutliner + Templates + More sort functionality + Wiki plugin and documentation + Documentation on how to convert VO files to mindmap programs, Grapviz and Lyx + More colorschemes + vimoutliner-tutor + Documentation on how to use VO for writing + MetaData? + +Done: + Remove included RCS,logs etc. + + + diff --git a/pack/acp/start/vimoutliner/colors/votl_dark.vim b/pack/acp/start/vimoutliner/colors/votl_dark.vim new file mode 100644 index 0000000..a5d9868 --- /dev/null +++ b/pack/acp/start/vimoutliner/colors/votl_dark.vim @@ -0,0 +1,81 @@ +let g:colors_name="VO Dark" +hi normal guifg=white guibg=black ctermfg=gray ctermbg=black +hi StatusLine guifg=white guibg=black ctermfg=gray ctermbg=black +hi StatusLineNC guifg=white guibg=black ctermfg=gray ctermbg=black +hi VertSplit guifg=white guibg=black ctermfg=gray ctermbg=black +hi OL1 guifg=white ctermfg=gray +hi OL2 guifg=red ctermfg=darkred +hi OL3 guifg=lightblue ctermfg=darkblue +hi OL4 guifg=violet ctermfg=darkmagenta +hi OL5 guifg=white ctermfg=gray +hi OL6 guifg=red ctermfg=darkred +hi OL7 guifg=lightblue ctermfg=darkblue +hi OL8 guifg=violet ctermfg=darkmagenta +hi OL9 guifg=white ctermfg=gray + +" colors for tags +hi outlTags guifg=darkred ctermfg=darkred + +" color for body text +hi BT1 guifg=green ctermfg=darkgreen +hi BT2 guifg=green ctermfg=darkgreen +hi BT3 guifg=green ctermfg=darkgreen +hi BT4 guifg=green ctermfg=darkgreen +hi BT5 guifg=green ctermfg=darkgreen +hi BT6 guifg=green ctermfg=darkgreen +hi BT7 guifg=green ctermfg=darkgreen +hi BT8 guifg=green ctermfg=darkgreen +hi BT9 guifg=green ctermfg=darkgreen + +" color for pre-formatted text +hi PT1 guifg=blue ctermfg=darkcyan +hi PT2 guifg=blue ctermfg=darkcyan +hi PT3 guifg=blue ctermfg=darkcyan +hi PT4 guifg=blue ctermfg=darkcyan +hi PT5 guifg=blue ctermfg=darkcyan +hi PT6 guifg=blue ctermfg=darkcyan +hi PT7 guifg=blue ctermfg=darkcyan +hi PT8 guifg=blue ctermfg=darkcyan +hi PT9 guifg=blue ctermfg=darkcyan + +" color for tables +hi TA1 guifg=darkviolet ctermfg=darkcyan +hi TA2 guifg=darkviolet ctermfg=darkcyan +hi TA3 guifg=darkviolet ctermfg=darkcyan +hi TA4 guifg=darkviolet ctermfg=darkcyan +hi TA5 guifg=darkviolet ctermfg=darkcyan +hi TA6 guifg=darkviolet ctermfg=darkcyan +hi TA7 guifg=darkviolet ctermfg=darkcyan +hi TA8 guifg=darkviolet ctermfg=darkcyan +hi TA9 guifg=darkviolet ctermfg=darkcyan + +" color for user text (wrapping) +hi UT1 guifg=darkred ctermfg=darkcyan +hi UT2 guifg=darkred ctermfg=darkcyan +hi UT3 guifg=darkred ctermfg=darkcyan +hi UT4 guifg=darkred ctermfg=darkcyan +hi UT5 guifg=darkred ctermfg=darkcyan +hi UT6 guifg=darkred ctermfg=darkcyan +hi UT7 guifg=darkred ctermfg=darkcyan +hi UT8 guifg=darkred ctermfg=darkcyan +hi UT9 guifg=darkred ctermfg=darkcyan + +" color for user text (non-wrapping) +hi UB1 guifg=darkgray ctermfg=darkcyan +hi UB2 guifg=darkgray ctermfg=darkcyan +hi UB3 guifg=darkgray ctermfg=darkcyan +hi UB4 guifg=darkgray ctermfg=darkcyan +hi UB5 guifg=darkgray ctermfg=darkcyan +hi UB6 guifg=darkgray ctermfg=darkcyan +hi UB7 guifg=darkgray ctermfg=darkcyan +hi UB8 guifg=darkgray ctermfg=darkcyan +hi UB9 guifg=darkgray ctermfg=darkcyan + +" colors for folded sections +hi Folded guifg=darkcyan guibg=bg ctermfg=darkcyan ctermbg=black +hi FoldColumn guifg=darkcyan guibg=bg ctermfg=darkcyan ctermbg=black + +" colors for experimental spelling error highlighting +" this only works for spellfix.vim with will be cease to exist soon +hi spellErr gui=underline guifg=yellow cterm=underline ctermfg=darkyellow +hi BadWord gui=underline guifg=yellow cterm=underline ctermfg=darkyellow diff --git a/pack/acp/start/vimoutliner/colors/votl_light.vim b/pack/acp/start/vimoutliner/colors/votl_light.vim new file mode 100644 index 0000000..beef395 --- /dev/null +++ b/pack/acp/start/vimoutliner/colors/votl_light.vim @@ -0,0 +1,81 @@ +let g:colors_name="VO Light" +hi normal guifg=black guibg=white ctermfg=white ctermbg=black +hi StatusLine guifg=black guibg=white ctermfg=white ctermbg=black +hi StatusLineNC guifg=black guibg=white ctermfg=white ctermbg=black +hi VertSplit guifg=black guibg=white ctermfg=white ctermbg=black +hi OL1 guifg=black ctermfg=black +hi OL2 guifg=red ctermfg=red +hi OL3 guifg=blue ctermfg=blue +hi OL4 guifg=darkviolet ctermfg=magenta +hi OL5 guifg=black ctermfg=black +hi OL6 guifg=red ctermfg=red +hi OL7 guifg=blue ctermfg=blue +hi OL8 guifg=darkviolet ctermfg=magenta +hi OL9 guifg=black ctermfg=black + +" colors for tags +hi outlTags guifg=darkred ctermfg=darkred + +" color for body text +hi BT1 guifg=darkgreen ctermfg=green +hi BT2 guifg=darkgreen ctermfg=green +hi BT3 guifg=darkgreen ctermfg=green +hi BT4 guifg=darkgreen ctermfg=green +hi BT5 guifg=darkgreen ctermfg=green +hi BT6 guifg=darkgreen ctermfg=green +hi BT7 guifg=darkgreen ctermfg=green +hi BT8 guifg=darkgreen ctermfg=green +hi BT9 guifg=darkgreen ctermfg=green + +" color for pre-formatted text +hi PT1 guifg=darkblue ctermfg=cyan +hi PT2 guifg=darkblue ctermfg=cyan +hi PT3 guifg=darkblue ctermfg=cyan +hi PT4 guifg=darkblue ctermfg=cyan +hi PT5 guifg=darkblue ctermfg=cyan +hi PT6 guifg=darkblue ctermfg=cyan +hi PT7 guifg=darkblue ctermfg=cyan +hi PT8 guifg=darkblue ctermfg=cyan +hi PT9 guifg=darkblue ctermfg=cyan + +" color for tables +hi TA1 guifg=darkviolet ctermfg=cyan +hi TA2 guifg=darkviolet ctermfg=cyan +hi TA3 guifg=darkviolet ctermfg=cyan +hi TA4 guifg=darkviolet ctermfg=cyan +hi TA5 guifg=darkviolet ctermfg=cyan +hi TA6 guifg=darkviolet ctermfg=cyan +hi TA7 guifg=darkviolet ctermfg=cyan +hi TA8 guifg=darkviolet ctermfg=cyan +hi TA9 guifg=darkviolet ctermfg=cyan + +" color for user text (wrapping) +hi UT1 guifg=darkred ctermfg=cyan +hi UT2 guifg=darkred ctermfg=cyan +hi UT3 guifg=darkred ctermfg=cyan +hi UT4 guifg=darkred ctermfg=cyan +hi UT5 guifg=darkred ctermfg=cyan +hi UT6 guifg=darkred ctermfg=cyan +hi UT7 guifg=darkred ctermfg=cyan +hi UT8 guifg=darkred ctermfg=cyan +hi UT9 guifg=darkred ctermfg=cyan + +" color for user text (non-wrapping) +hi UB1 guifg=darkgray ctermfg=cyan +hi UB2 guifg=darkgray ctermfg=cyan +hi UB3 guifg=darkgray ctermfg=cyan +hi UB4 guifg=darkgray ctermfg=cyan +hi UB5 guifg=darkgray ctermfg=cyan +hi UB6 guifg=darkgray ctermfg=cyan +hi UB7 guifg=darkgray ctermfg=cyan +hi UB8 guifg=darkgray ctermfg=cyan +hi UB9 guifg=darkgray ctermfg=cyan + +" colors for folded sections +hi Folded guifg=darkcyan guibg=bg ctermfg=cyan ctermbg=white +hi FoldColumn guifg=darkcyan guibg=bg ctermfg=cyan ctermbg=white + +" colors for experimental spelling error highlighting +" this only works for spellfix.vim with will be cease to exist soon +hi spellErr gui=underline guifg=darkred cterm=underline ctermfg=darkred +hi BadWord gui=underline guifg=darkred cterm=underline ctermfg=darkred diff --git a/pack/acp/start/vimoutliner/colors/votl_test.vim b/pack/acp/start/vimoutliner/colors/votl_test.vim new file mode 100644 index 0000000..9866ace --- /dev/null +++ b/pack/acp/start/vimoutliner/colors/votl_test.vim @@ -0,0 +1,81 @@ +let g:colors_name="VO Light" +hi normal guifg=black guibg=white ctermfg=white ctermbg=black +hi StatusLine guifg=black guibg=white ctermfg=white ctermbg=black +hi StatusLineNC guifg=black guibg=white ctermfg=white ctermbg=black +hi VertSplit guifg=black guibg=white ctermfg=white ctermbg=black +hi OL1 guifg=black ctermfg=black +hi OL2 guifg=red ctermfg=red +hi OL3 guifg=blue ctermfg=blue +hi OL4 guifg=darkviolet ctermfg=magenta +hi OL5 guifg=black ctermfg=black +hi OL6 guifg=red ctermfg=red +hi OL7 guifg=blue ctermfg=blue +hi OL8 guifg=darkviolet ctermfg=magenta +hi OL9 guifg=black ctermfg=black + +" colors for tags +hi outlTags guifg=darkred ctermfg=darkred + +" color for body text +hi BT1 guifg=darkviolet ctermfg=magenta +hi BT2 guifg=black ctermfg=black +hi BT3 guifg=red ctermfg=red +hi BT4 guifg=blue ctermfg=blue +hi BT5 guifg=darkviolet ctermfg=magenta +hi BT6 guifg=black ctermfg=black +hi BT7 guifg=red ctermfg=red +hi BT8 guifg=blue ctermfg=blue +hi BT9 guifg=darkviolet ctermfg=magenta + +" color for pre-formatted text +hi PT1 guifg=darkblue ctermfg=cyan +hi PT2 guifg=darkblue ctermfg=cyan +hi PT3 guifg=darkblue ctermfg=cyan +hi PT4 guifg=darkblue ctermfg=cyan +hi PT5 guifg=darkblue ctermfg=cyan +hi PT6 guifg=darkblue ctermfg=cyan +hi PT7 guifg=darkblue ctermfg=cyan +hi PT8 guifg=darkblue ctermfg=cyan +hi PT9 guifg=darkblue ctermfg=cyan + +" color for tables +hi TA1 guifg=darkviolet ctermfg=cyan +hi TA2 guifg=darkviolet ctermfg=cyan +hi TA3 guifg=darkviolet ctermfg=cyan +hi TA4 guifg=darkviolet ctermfg=cyan +hi TA5 guifg=darkviolet ctermfg=cyan +hi TA6 guifg=darkviolet ctermfg=cyan +hi TA7 guifg=darkviolet ctermfg=cyan +hi TA8 guifg=darkviolet ctermfg=cyan +hi TA9 guifg=darkviolet ctermfg=cyan + +" color for user text (wrapping) +hi UT1 guifg=darkred ctermfg=cyan +hi UT2 guifg=darkred ctermfg=cyan +hi UT3 guifg=darkred ctermfg=cyan +hi UT4 guifg=darkred ctermfg=cyan +hi UT5 guifg=darkred ctermfg=cyan +hi UT6 guifg=darkred ctermfg=cyan +hi UT7 guifg=darkred ctermfg=cyan +hi UT8 guifg=darkred ctermfg=cyan +hi UT9 guifg=darkred ctermfg=cyan + +" color for user text (non-wrapping) +hi UB1 guifg=darkgray ctermfg=cyan +hi UB2 guifg=darkgray ctermfg=cyan +hi UB3 guifg=darkgray ctermfg=cyan +hi UB4 guifg=darkgray ctermfg=cyan +hi UB5 guifg=darkgray ctermfg=cyan +hi UB6 guifg=darkgray ctermfg=cyan +hi UB7 guifg=darkgray ctermfg=cyan +hi UB8 guifg=darkgray ctermfg=cyan +hi UB9 guifg=darkgray ctermfg=cyan + +" colors for folded sections +hi Folded guifg=darkcyan guibg=bg ctermfg=cyan ctermbg=white +hi FoldColumn guifg=darkcyan guibg=bg ctermfg=cyan ctermbg=white + +" colors for experimental spelling error highlighting +" this only works for spellfix.vim with will be cease to exist soon +hi spellErr gui=underline guifg=darkred cterm=underline ctermfg=darkred +hi BadWord gui=underline guifg=darkred cterm=underline ctermfg=darkred diff --git a/pack/acp/start/vimoutliner/doc/votl.txt b/pack/acp/start/vimoutliner/doc/votl.txt new file mode 100644 index 0000000..38671d7 --- /dev/null +++ b/pack/acp/start/vimoutliner/doc/votl.txt @@ -0,0 +1,1331 @@ +*votl_readme.txt* For Vim version 7.2 Last change: 2014-09-28 + + *vo* *votl* *vimoutliner* +VimOutliner 0.4.0 ~ + +VimOutliner is an outline processor designed with lighting fast authoring as +the main feature, it also has many of the same features as Grandview, More, +Thinktank, Ecco, etc. These features include tree expand/collapse, tree +promotion/demotion, level sensitive colors, interoutline linking, checkboxes +and body text. + + + License |votl-license| + Version |votl-version| + Installing and testing VimOutliner |votl-install| + Install via Pathogen |votl-pathogen-install| + Legacy Script Driven Method |votl-auto-install| + Updating |votl-updating| + Manual method |votl-manual-install| + Testing |votl-testing| + Debian |votl-debian| + Using VimOutliner on other file types |votl-other-files| + Troubleshooting |votl-troubleshooting| + VimOutliner philosophy |votl-philosophy| + Running VimOutliner |votl-running| + VimOutliner configuration file |vimoutlinerrc| + Comma comma commands |votl-command| + Basic VimOutliner activities |votl-activities| + Menu |votl-menu| + Vim Outliner objects |votl-objects| + Post Processors |votl-post-processors| + Advanced |votl-advanced| + Executable Lines |votl-executable-lines| + Plugins |votl-plugins| + Checkboxes |votl-checkbox| + Hoisting |votl-hoisting| + Clock |votl-clock| + Scripts |votl-scripts| + votl_maketags.pl |votl-maketags| + otl2html.py |otl2html| + Other information |votl-other-info| + + +============================================================================== +License *votl-license* + + +VimOutliner Copyright (C) 2001, 2003 by Steve Litt + Copyright (C) 2004, 2014 by Noel Henson +Licensed under the GNU General Public License (GPL), version 2 +Absolutely no warranty, see COPYING file for details. + + HTML: http://www.gnu.org/copyleft/gpl.html + Text: http://www.gnu.org/copyleft/gpl.txt + + +============================================================================== +Installing and Testing VimOutliner *votl-install* + + + Install via Pathogen |votl-pathogen-install| + Legacy Script Driven Method |votl-auto-install| + Updating |votl-updating| + Manual Method |votl-manual-install| + Testing |votl-testing| + + *votl-pathogen-install* +Install via Pathogen~ + +Preferred and most simple method of VimOutliner installation is using +Pathogen (developers of VimOutliner actually believe that Pathogen +(https://github.com/tpope/vim-pathogen), or Vundle, should be generally +the preferred way of installation of any vim plugin). + +Installation with working Pathogen should be just + + $ cd ~/.vim/bundle + # Or even better is to have whole ~/.vim/bundle as a separate repo + # and then plugins are added as submodules. + $ git clone git@github.com:vimoutliner/vimoutliner.git + +Restart vim and you should be good to go. If something does nott work, +please, let us know (either on the email list or file a ticket to the +GitHub issue tracker). + + *votl-auto-install* +Legacy Script Driven Method~ + +The automatic installation targets Unix-compatible platforms: > + +From tar archive + + $ tar xzvf vimoutliner-0.3.x.tar.gz + $ cd vimoutliner + $ sh install.sh + +From zip archive + + $ unzip vimoutliner-0.3.x.zip + $ cd vimoutliner-0.3.x + $ sh install.sh + +< +The install.sh script will ask you whether to install the VimOutliner files or +abort the process leaving everything unchanged. Assuming you confirmed the +installation, the script creates the necessary directory tree and copies the +files which provide the core functionality and documentation. + +With the second question you decide whether you want to install some brand new +add-ons, currently implementing hoisting and checkboxes. + + *votl-updating* +Updating~ + +Updating an existing installation might require some manual work. + +If you are already working with a previous VimOutliner release, there is a +slight chance that the current directory tree is different from your current +one. In this case, you will have to manually migrate your files to the new +locations. + +The installation script creates unique backups of files being replaced +with newer versions. So if you put some local customizations into +vimoutlinerrc in the directory where VimOutliner is run from (say +$HOME/.vim/vimoutliner/vimoutlinerrc), you'll probably have to merge the +backup with the new file by hand. Which is one good reason why it is +preferred to use for the custom configuration and extensions your own +copy of the |vimoutlinerrc| in some other location where the file is +sought for. + + *votl-manual-install* +Manual Method~ + +You can also copy the files from the unpacked distribution tar ball into their +destination folders by yourself. The following steps are a description of what +has to go where and assume some knowledge of your vim setup. + +If you encounter problems, please contact the mailing list for an immediate +solution and more complete future documentation. +https://groups.google.com/forum/#!forum/vimoutliner + +If you want to setup VimOutliner on a system running Microsoft Windows, the +directory $HOME denotes the base folder of the vim installation. If you're on +Unix based system, the location of $HOME is as usual. + +You need the following subtrees in your $HOME directory: > + + $HOME/.vim/ + doc/ + ftdetect/ + ftplugin/ + syntax/ + vimoutliner/ + plugins/ + scripts/ +< +The distribution tar ball unpacks into a directory vimoutliner with the +following contents: > + + vimoutliner/ + plugins/ (1) + scripts/ (1) + doc/ (1) + ftdetect/ (1) + ftplugin/ (1) + install.sh* + syntax/ (1) + syntax/ (1) + vimoutlinerrc (1) +< +(1) The content of these folders should be copied to their namesakes in the +$HOME/.vim folder + +Your $HOME/.vimrc file should contain the lines > + + filetype plugin indent on + syntax on +< +Finally, you need to integrate the online help provided with VimOutliner into +the vim help system. Start vim and execute the following command: > +> + :helptags $HOME/.vim/doc +< +At this point, VimOutliner should be functional. Type ":help vo" to get +started. You can also type ":help votl_cheatsheet" to a get a quick overview +of all the VimOutliner commands. + + *votl-testing* +Testing Base Functionality~ + +Open a new outline with the following: +> + rm $HOME/votl_test.otl + gvim $HOME/votl_test.otl or vim $HOME/votl_test.otl +< +Verify the following: +- Tabs indent the text +- Different indent levels are different colors +- Lines starting with a colon and space word-wrap + + Lines starting with colons are body text. They should word wrap and + should be a special color (typically green, but it can vary). Verify + that paragraphs of body text can be reformatted with the Vim gq + commands. + +Verify Interoutline Linking: + +Interoutline linking currently requires a working perl installation to +generate the necessary tag file. We are looking into porting this to vim's own +scripting language. + +Place the following two lines in $HOME/votl_test.otl: +> + _tag_newfile + $HOME/votl_newfile.otl +< +Note that in the preceding, the 2nd line should be indented from the first. + +To create VimOutliner's tag file $HOME/.vim/vimoutliner/votl_tags.tag, run +votl_maketags.pl, which resides in $HOME/.vimoutliner/scripts/: $ +$HOME/.vim/vimoutliner/scripts/votl_maketags.pl $HOME/votl_test.otl + +Try the following: +- In $HOME/votl_test.otl +- Cursor to the _tag_newfile marker +- Press CTRL-K + You should be brought to $HOME/votl_newfile.otl +- Press CTRL-N + You should be brought back to $HOME/votl_test.otl +Note: + CTRL-K is a VimOutliner synonym for CTRL-] + CTRL-N is a VimOutliner synonym for CTRL-T + +This might also be achieved more efficiently by using the UTL plugin for +linking to other files and text. Check out the plugin at: + +http://www.vim.org/scripts/script.php?script_id=293 + + *votl-debian* +Debian Installation~ + +Debian does include Vim Outliner as a package. However some Debian version +require this line to be added to your |vimrc| file: > + + syntax on +> + +============================================================================== +Using VimOutliner On Other File Types~ *votl-other-files* + +How to use VimOutliner on non .otl files~ + +Previous VimOutliner versions used the ol script to invoke VimOutliner. As of +VimOutliner 0.3.0, the ol script is no longer necessary nor provided. Instead, +VimOutliner is now a Vim plugin, so Vim does all the work. + +This makes VimOutliner much simpler to use in most cases, but Vim plugins are +file extension based, meaning that if you want to use VimOutliner on a file +extension other than .otl, you must declare that file extension in +$HOME/.vim/ftdetect/votl.vim. In this section we'll use the .emdl extension +(Easy Menu Definition Language) as an example. + +To enable VimOutliner work with .emdl files, do this: +> + vim $HOME/.vim/ftdetect/votl.vim +< +Right below the line reading: +> + au! BufRead,BufNewFile *.otl setfiletype votl +< +Insert the following line: +> + au! BufRead,BufNewFile *.emdl setfiletype votl +< +Save and exit +> + gvim $HOME/votl_test.emdl +< +You should get: +- level colors, +- body text (lines starting with colon) +- comma comma commands (try ,,2 and ,,1) + + +============================================================================== +Troubleshooting~ *votl-troubleshooting* + + +Q: I can't switch between colon based and space based body text. +A: See next question + +Q: My ,,b and ,,B don't do anything. How do I fix it? +A: Open vim like this: +> + vim $HOME/.vim/ftplugin/votl.vim +< + Search for use_space_colon + Make sure it is set to 0, not 1 + Rerun Vim, and ,,b and ,,B should work + +Q: I don't get VimOutliner features on files of extension .whatever. +A: Open vim like this: +> + vim $HOME/.vim/ftdetect/votl.vim +< + Right below the line reading: +> + au! BufRead,BufNewFile *.otl setfiletype votl +< + Insert the following line: +> + au! BufRead,BufNewFile *.whatever setfiletype votl +< + Save and exit. + + +============================================================================== +VimOutliner Philosophy~ *votl-philosophy* + + +Authoring Speed~ + +VimOutliner is an outline processor with many of the same features as +Grandview, More, Thinktank, Ecco, etc. Features include tree expand/collapse, +tree promotion/demotion, level sensitive colors, interoutline linking, and +body text. + +What sets VimOutliner apart from the rest is that it's been constructed from +the ground up for fast and easy authoring. Keystrokes are quick and easy, +especially for someone knowing the Vim editor. The mouse is completely +unnecessary (but is supported to the extent that Vim supports the mouse). Many +of the VimOutliner commands start with a double comma because that's very +quick to type. + +Many outliners are prettier than VimOutliner. Most other outliners are more +intuitive for the newbie not knowing Vim. Many outliners are more featureful +than VimOutliner (although VimOutliner gains features monthly and is already +very powerful). Some outliners are faster on lookup than VimOutliner. But as +far as we know, NO outliner is faster at getting information out of your mind +and into an outline than VimOutliner. + +VimOutliner will always give you lightning fast authoring. That's our basic, +underlying philosophy, and will never change, no matter what features are +added. + + +Vim Integration~ + +Earlier VimOutliner versions prided themselves on being stand alone +applications, self-contained in a single directory with a special script to +run everything. + +As of 0.3.0, VimOutliner is packaged as a Vim Plugin, eliminating the need for +the ol script, which many saw as clumsy. Given that all VimOutliner features +are produced by the Vim engine, it makes perfect sense to admit that +VimOutliner is an add-on to Vim. + +Therefore VimOutliner now prides itself in being a Vim plugin. With the +VimOutliner package installed, the Vim editor yields the VimOutliner feature +set for files whose extensions are listed as votl types in +$HOME/.vim/ftplugin/votl.vim. + + +============================================================================== +Running VimOutliner~ *votl-running* + + +Vim Knowledge~ + +You needn't be a Vim expert to use VimOutliner. If you know the basics -- +inserting and deleting line-wise and character-wise, moving between command and +insert modes, use of Visual Mode selections,and reformatting, you should be +well equipped to use VimOutliner. + +Run Vim or GVim and follow the instruction on :help |tutor| + +VimOutliner is a set of Vim scripts and configurations. Its features all come +from the Vim editor's engine. If you do not know Vim, you'll need to learn the +Vim basics before using VimOutliner. Start by taking the Vim tutorial. The +tutorial should take about 2 hours. + +VimOutliner is so fast, that if you often use outlining, you'll make up that +time within a week. + + *vimoutlinerrc* +VimOutliner configuration file~ + +Custom configuration (and small custom extensions) should be written to +the vimoutlinerrc file. It is a regular vimscript file and the first of +the files searched in the following locations will be used: + + * a file .vimoutlinerrc (notice the leading dot) in the users $HOME or + $HOME/.vimoutliner directory + * a file vimoutlinerrc (name without the leading dot) in the users + $HOME, $HOME/.vimoutliner, or $HOME/.vim directory + * a file vimoutlinerrc (again without the leading dot) in the folder + where the VimOutliner is run from (that could be again $HOME/.vim + directory with manual installation or for example + $HOME/.vim/bundle/vimoutliner when using pathogen) + +Many global variables can be also set in the normal vim manner in the +user’s $VIMRC file. See general vim documentation for more details for +individual variables. + + *votl-command* +Comma Comma Commands~ + +Traditionally (meaning in terms of the VimOutliner traditions ;)) all +VimOutliner were features accessed through keyboard commands starting +with two commas. The double comma followed by a character is incredibly +fast to type. However, with more widespread use of the VimOutliner some +developers felt that all idiosyncrasies should be eliminated and +VimOutliner should behave as a normal vim plugin. Therefore now we +don’t redefine this command leader (as it is called in the Vim lingo) +and unless the user redefines it on her own (in |vimoutlinerrc|) it +defaults to backslash. If you configure VimOutliner to use different key +combination, you have to mentally replace it everywhere in this +documentation. + +If you are friend of the ancient regime, then just uncomment the line in +|vimoutlinerrc| (see more about the locations where you should put it): + + "let maplocalleader = ',,' " uncomment for compatibility with + " previous versions of VO + +We expect to create more comma comma commands, so try not to create your own, +as they may clash with later comma comma commands. If you have an +exceptionally handy command, please report it to the VimOutliner list. Perhaps +others could benefit from it. + + Command List Description ~ + ,,D all VimOutliner reserved command + ,,H all reserved for manual de-hoisting (add-on) + ,,h all reserved for hoisting (add-on) + ,,1 all set foldlevel=0 + ,,2 all set foldlevel=1 + ,,3 all set foldlevel=2 + ,,4 all set foldlevel=3 + ,,5 all set foldlevel=4 + ,,6 all set foldlevel=5 + ,,7 all set foldlevel=6 + ,,8 all set foldlevel=7 + ,,9 all set foldlevel=8 + ,,0 all set foldlevel=99999 + ,,- all Draw dashed line + ,,f normal Directory listing of the current directory + ,,s normal Sort sub-tree under cursor ascending + ,,S normal Sort sub-tree under cursor descending + ,,t normal Append timestamp (HH:MM:SS) to heading + ,,T normal Pre-pend timestamp (HH:MM:SS) to heading + ,,T normal Pre-pend timestamp (HH:MM:SS) to heading + ,,t insert Insert timestamp (HH:MM:SS) at cursor + ,,d normal Append datestamp (YYYY-MM-DD) to heading + ,,d insert Insert datestamp (YYYY-MM-DD) at cursor + ,,D normal Pre-pend datestamp (YYYY-MM-DD) to heading + ,,B normal Make body text start with a space + ,,b normal Make body text start with a colon and space + ,,w insert Save changes and return to insert mode + ,,e normal Execute the executable tag line under cursor + + +Other VimOutliner Commands~ + +Naturally, almost all Vim commands work in VimOutliner. Additionally, +VimOutliner adds a few extra commands besides the comma comma commands +discussed previously. + +Command list: + CTRL-K Follow tag (Synonym for CTRL-]) + CTRL-N Return from tag (Synonym for CTRL-T) + Q Reformat (Synonym for gq) + + +To get a quick overview of all VimOutliner commands type ":help votl_cheatsheet" in vim. + + *votl-activities* +Basic VimOutliner activities~ + +How do I collapse a tree within command mode? + zc + (note: a full list of folding commands |fold-commands|) + +How do I expand a tree within command mode? + To expand one level: + zo + To expand all the way down + zO + +How do I demote a headline? + In command mode, >> + In insert mode at start of the line, press the Tab key + In insert mode within the headline, CTRL-T + +How do I promote a headline? + In command mode, << + In insert mode at start of the line, press the Backspace key + In insert mode within the headline, CTRL-D + +How do I promote or demote several consecutive headlines? + Highlight the lines with the V command + Press < to promote or > to demote. You can precede + the < or > with a count to promote or demote several levels + +How do I promote or demote an entire tree? + Collapse the tree + Use << or >> as appropriate + +How do I collapse an entire outline? + ,,1 + +How do I maximally expand an entire outline? + ,,0 + +How do I expand an outline down to the third level? + ,,3 + +How do I move a tree? + Use Vim's visual cut and paste + +How do I create body text? + Open a blank line below a headline + Start the line with a colon followed by a space + Continue to type. Your text will wrap + +How do I reformat body text? + Highlight (Shift+V) the body text to be reformatted + Use the gq command to reformat + +How do I reformat one paragraph of body text? + The safest way is highlighting. + DANGER! Other methods can reformat genuine headlines. + +How do I switch between colon based and space based body text? + ,,b for colon based, ,,B for space based + +What if ,,b and ,,B don't work + Change variable use_space_colon from 1 to 0 + in $HOME/.vim/ftplugin/votl.vim + +How do I perform a word count? + Use the command :w !wc + The space before the exclamation point is a MUST. + + *votl-menu* +Menu~ + +There is a simple menu included in Vim Outliner when running in GUI mode. +Named 'VO', you can usually find it right next to the 'Help' menu. There are +commands to change the fold level and select alternate color schemes. There is +also entries for common tools. + +The last tool item calls a shell script, 'myotl2html.sh'. This script should +be provided by the user and is not included in VO releases. A sample +myotl2html.sh script might look like this: +> + #!/bin/bash + otl2html.py -S pjtstat.css $1 > $HOME/public_html/$1.html +< +If you have several different types of reports you create regularly, you can +create your own menu entries. Just add lines like these to your +|vimoutlinerrc| file: > +> + amenu &VO.&Reports.&Big\ Project :!otl2html.py -S big.css % > %.html + amenu &VO.&Reports.&Hot\ List :!otl2html.py -S todo.css % > %.html + amenu &VO.&Reports.&Weekly :!otl2html.py -S weekly.css % > %.html +< +I'm sure you get the idea. + + *votl-objects* +Vim Outliner Objects~ + +There are several object/line types that VO supports. The most common on +simple headings and body text. Simple headings are tab-indented line that +start with any non-whitespace character except: : ; | < >. These characters +specify other objects. Here is a list of each of the non-heading types: + + Start Description~ + : body text (wrapping) + ; Pre-formatted body text (non-wrapping) + | table + > user-defined, text block (wrapping) + < user-defined, Pre-formatted text block (non-wrapping) + +The body text marker, :, is used to specify lines that are automatically +wrapped and reformatted. VO and post-processors are free to wrap and reformat +this text as well as use proportionally- spaced fonts. A post-processor will +probably change the appearance of what you have written. If you are writing a +book or other document, most of the information you enter will be body text. + +Here is an example: +> + Kirby the Wonder Dog + : Kirby is nine years old. He understand about 70-100 + : English words. Kirby also understands 11 different hand + : signals. He is affectionate, playful and attentive. + : + : His breeding is unknown. He appears to be a mix between + : a German shepherd and a collie. +< +When folded, body text looks something like this: +> + Kirby the Wonder Dog + [TEXT] -------------------------------- (6 lines) +< +The Pre-formatted text marker, ;, is used to mark text that should not be +reformatted nor wrapped by VO or any post-processor. A post- processor would +use a fixed-space font, like courier, to render these lines. A post-processor +will probably not change the appearance of what you have written. This is +useful for making text picture, program code or other format-dependent text. + +Here is an example: +> + Output waveform + ; _______ ______ + ; _____/ \______________/ + ; |-10us--|----35us------| +< +When folded, Pre-formatted body text looks something like this: +> + Output waveform + [TEXT BLOCK] -------------------------- (6 lines) +< +The table marker, |, is used to create tables. This is an excellent way to +show tabular data. The marker is used as if it were are real vertical line. A +|| (double-|) is optionally used to mark a table heading line. This is useful +for post-processors. + +Here is an example: +> + Pets + || Name | Age | Animal | Inside/Outside | + | Kirby | 9 | dog | both | + | Hoover | 1 | dog | both | + | Sophia | 9 | cat | inside | +< +There is no automatic alignment of columns yet. It must be done manually. The +post-processor, otl2thml.py, does have alignment functions. See its +documentation for more information. + +When folded, a table looks something like this: +> + Pets + [TABLE] ------------------------------- (4 lines) +< +User-defined text is similar to body text but more flexible and it's use is +not pre-defined by Vim Outliner. The basic, user-defined text block marker, >, +behaves just like body text. + +For example: +> + Kirby the Wonder Dog + > Kirby is nine years old. He understand about 70-100 + > English words. Kirby also understands 11 different hand + > signals. He is affectionate, playful and attentive. + > + > His breeding is unknown. He appears to be a mix between + > a German shepherd and a collie. +< +When folded, body text looks something like this: +> + Kirby the Wonder Dog + [USER] -------------------------------- (6 lines) +< +But unlike body text, user-defined text can be expanded. You could have +user-defined text types. If you were writing a book, in addition to body text +for paragraphs you might need special paragraphs for tips and warnings. +User-defined text blocks can accomplish this: +> + >Tips + > Don't forget to back up your computer daily. You don't + > need to back up the entire computer. You just need to + > backup up the files that have changed. + >Warning + >Never store you backup floppy disks on the side of you + >file cabinets by adhering them with magnets. +< +A post processor will know how to remove the style tags (Tips and Warning) and +you want the text to be formatted. + +When folded, the above would appear as: +> + [USER Tips] --------------------------- (4 lines) + [USER Warning]------------------------- (3 lines) +< +The user-defined, pre-formatted text block marker, <, behaves just like +pre-formatted text. But like >, it leaves the functional definition up to the +user. A simple user-defined, pre-formatted text block could be: +> + Tux + < _.._ + < .-' `-. + < : ; + < ; ,_ _, ; + < : \{" "}/ : + < ,'.'"=..=''.'. + < ; / \ / \ ; + < .' ; '.__.' ; '. + < .-' .' '. '-. + < .' ; ; '. + < / / \ \ + < ; ; ; ; + < ; `-._ _.-' ; + < ; ""--. .--"" ; + < '. _ ; ; _ .' + < {""..' '._.-. .-._.' '..""} + < \ ; ; / + < : : : : + < : :.__.: : + < \ /"-..-"\ / fsc + < '-.__.' '.__.-' +< +When folded it would be: +> + Tux + [USER BLOCK] -------------------------- (6 lines) +< +Like user-defined text, these blocks can be given user-defined styles. For +example: +> + + [USER BLOCK ASCIIart] ----------------- (22 lines) + [USER BLOCK Code] --------------------- (17 lines) +< + + *votl-post-processors* +VimOutliner Post-Processors~ + +There are already several post processors for Vim Outliner. Some are general +purpose in nature and others perform specific conversions. There are several of +the tested scripts now included in the $HOME/.vim/vimoutliner/scripts folder. +See also the scripts section. |votl-scripts| + + +============================================================================== +Advanced VimOutliner *votl-advanced* + + *votl-executable-lines* +Executable Lines~ + +Executable lines enable you to launch any command from a specially constructed +headline within VimOutliner. The line must be constructed like this: +> + Description _exe_ command +< +Here's an example to pull up Troubleshooters.Com: +> + Troubleshooters.Com _exe_ mozilla http://www.troubleshooters.com +< +Executable lines offer the huge benefit of a single-source knowledge tree, +where all your knowledge, no matter what its format, exists within a single +tree of outlines connected with inter-outline links and executable lines. + +A more efficient and feature rich way to achieve this might be to use the UTL +plugin for vim. See the scripts section at http://www.vim.org + + +============================================================================== +Plugins *votl-plugins* + + +The VimOutliner distribution currently includes plugins for easy handling +of checkboxes, hoisting (see below), smart paste, clocking, math and format. + +The checkboxes tags and smart paste plugins are enabled by default. The +hoisting, clocking, math and format plugins are disabled by default. To +enable these plugins look for the easy instructions for this in your +|vimoutlinerrc| file. + +More information below and in the plugin files in the directory where +the VimOutliner is run from (either $HOME/.vim/vimoutliner/plugin for +manual installation or $HOME/.vim/bundle/vimoutliner/plugin when using +pathogen). + + *votl-checkbox* +Checkboxes~ + +Checkboxes enable VimOutliner to understand tasks and calculate the current +status of todo-lists etc. Three special notations are used: +> + [_] an unchecked item or incomplete task + [X] a checked item or complete task + % a placeholder for percentage of completion +< +Several ,,-commands make up the user interface: +> + ,,cb Insert a check box on the current line or each line of the currently + selected range (including lines in selected but closed folds). This + command is currently not aware of body text. Automatic recalculation + of is performed for the entire root-parent branch that contains the + updated child. (see ,,cz) + ,,cx Toggle check box state (percentage aware) + ,,cd Delete check boxes + ,,c% Create a check box with percentage placeholder except on childless + parents + ,,cp Create a check box with percentage placeholder on all headings + ,,cz Compute completion for the tree below the current heading. +< +How do I use it? + +Start with a simple example. Let's start planning a small party, say a barbecue. + +1. Make the initial outline. +> + Barbecue + Guests + Bill and Barb + Larry and Louise + Marty and Mary + Chris and Christine + David and Darla + Noel and Susan + Food + Chicken + Ribs + Corn on the cob + Salad + Desert + Beverages + Soda + Iced Tea + Beer + Party Favors + Squirt guns + Hats + Name tags + Materials + Paper Plates + Napkins + Trash Containers +< + +2. Add the check boxes. + +This can be done by visually selecting them and typing ,,cb. When done, you +should see this: +> + [_] Barbecue + [_] Guests + [_] Bill and Barb + [_] Larry and Louise + [_] Marty and Mary + [_] Chris and Christine + [_] David and Darla + [_] Noel and Susan + [_] Food + [_] Chicken + [_] Ribs + [_] Corn on the cob + [_] Salad + [_] Desert + [_] Beverages + [_] Soda + [_] Iced Tea + [_] Beer + [_] Party Favors + [_] Squirt guns + [_] Hats + [_] Name tags + [_] Materials + [_] Paper Plates + [_] Napkins + [_] Trash Containers +< + +3. Now check off what's done. + +Checking off what is complete is easy with the +,,cx command. Just place the cursor on a heading and ,,cx it. Now you can see +what's done as long as the outline is fully expanded. +> + [_] Barbecue + [_] Guests + [X] Bill and Barb + [X] Larry and Louise + [X] Marty and Mary + [X] Chris and Christine + [X] David and Darla + [X] Noel and Susan + [_] Food + [X] Chicken + [X] Ribs + [_] Corn on the cob + [_] Salad + [X] Desert + [_] Beverages + [_] Soda + [X] Iced Tea + [X] Beer + [_] Party Favors + [_] Squirt guns + [_] Hats + [_] Name tags + [_] Materials + [X] Paper Plates + [_] Napkins + [X] Trash Containers +< + +4. Now summarize what's done. + +You can summarize what is done with the ,,cz command. Place the cursor on the +'Barbecue' heading and ,,cz it. The command will recursively process the +outline and update the check boxes of the parent headlines. You should see: +(Note: the only change is on the 'Guests' heading. It changed because all of +its children are complete.) +> + [_] Barbecue + [X] Guests + [X] Bill and Barb + [X] Larry and Louise + [X] Marty and Mary + [X] Chris and Christine + [X] David and Darla + [X] Noel and Susan + [_] Food + [X] Chicken + [X] Ribs + [_] Corn on the cob + [_] Salad + [X] Desert + [_] Beverages + [_] Soda + [X] Iced Tea + [X] Beer + [_] Party Favors + [_] Squirt guns + [_] Hats + [_] Name tags + [_] Materials + [X] Paper Plates + [_] Napkins + [X] Trash Containers +< + +5. Add percentages for a better view. + +You can get a much better view of what's going on, especially with collapsed +headings, if you add percentages. Place a % on each heading that has children +like this: +> + [_] % Barbecue + [X] % Guests + [X] Bill and Barb + [X] Larry and Louise + [X] Marty and Mary + [X] Chris and Christine + [X] David and Darla + [X] Noel and Susan + [_] % Food + [X] Chicken + [X] Ribs + [_] Corn on the cob + [_] Salad + [X] Desert + [_] % Beverages + [_] Soda + [X] Iced Tea + [X] Beer + [_] % Party Favors + [_] Squirt guns + [_] Hats + [_] Name tags + [_] % Materials + [X] Paper Plates + [_] Napkins + [X] Trash Containers +< + +6. Now compute the percentage of completion. + +After adding the % symbols, place the cursor on the 'Barbecue' heading and +execute ,,cz as before. Keep in mind that the recursive percentages are +weighted. You should see: +> + [_] 58% Barbecue + [X] 100% Guests + [X] Bill and Barb + [X] Larry and Louise + [X] Marty and Mary + [X] Chris and Christine + [X] David and Darla + [X] Noel and Susan + [_] 60% Food + [X] Chicken + [X] Ribs + [_] Corn on the cob + [_] Salad + [X] Desert + [_] 66% Beverages + [_] Soda + [X] Iced Tea + [X] Beer + [_] 0% Party Favors + [_] Squirt guns + [_] Hats + [_] Name tags + [_] 66% Materials + [X] Paper Plates + [_] Napkins + [X] Trash Containers +< + +7. Complete a few more just for fun. + +Mark Salad and Soda and you should see the outline below. Try playing around +with zc and zo to see the effects of opening and closing folds. Even if you +place the cursor on 'Barbecue' and zo it, you still have a good understanding +of how complete the project is. +> + [_] 69% Barbecue + [X] 100% Guests + [X] Bill and Barb + [X] Larry and Louise + [X] Marty and Mary + [X] Chris and Christine + [X] David and Darla + [X] Noel and Susan + [_] 80% Food + [X] Chicken + [X] Ribs + [_] Corn on the cob + [X] Salad + [X] Desert + [X] 100% Beverages + [X] Soda + [X] Iced Tea + [X] Beer + [_] 0% Party Favors + [_] Squirt guns + [_] Hats + [_] Name tags + [_] 66% Materials + [X] Paper Plates + [_] Napkins + [X] Trash Containers +< + *votl-hoisting* +Hoisting~ + +Hoisting is a way to focus on the offspring of the currently selected outline +item. The sub items will be presented as top level items in the automatically +extracted hoist-file located in the same directory as the main outline file. +You cannot hoist parts of an already hoisted file again. + +To enable this plugin uncomment the following line in |vimoutlinerrc|: +> + "let g:vo_modules_load .= ':newhoist' +< +Once it is enabled, you hoist the subtopics of the currently selected +item with + + ,,h Hoist the subtopics into a temporary file + +The changes are merged back into the original file by closing the temporary +hoist file with + + :q :wq :x ZZ + +If something went wrong, you can perform a manual de-hoisting with the +following procedure: + +Open the main file in VimOutliner Search for the line containing the __hoist +tag On this line, do + + ,,H Manual de-hoisting + + *votl-clock* +Clock~ + +The clock plugin is a little imitation of a nice feature from emacs org mode. +The clockpugin allows to track times and summarize them up in the parent +heading. + +To enable this plugin uncomment the following line in |vimoutlinerrc|: +> + "let g:vo_modules_load .= ':clock' +< +To start clocking you need to write a heading containing times in square +brackets like shown below. After the closing bracket -> indicates the place +where the calculated time is written. The arrow can be followed by a char to +indicate to unit in which the time is displayed. Use 's' for seconds, 'm' for +minutes, 'h' for hours and 'd' for days. If no unit is given hours are used. +> + Year 2011 -> d + January -> + Monday, 3th [08:30:00 -- 17:45:00] -> m + Tuesday, 3th [08:50:25 -- 18:00:02] -> s +< + +To summarize the times up within the outline headings ending with -> {char} +use + + ,,cu Clock update with the cursor somewhere in the hierarchy. + +After that the outline should look like this: +> + Year 2011 -> 0.77 d + January -> 18.41 h + Monday, 3th [08:30:00 -- 17:45:00] -> 555.00 m + Tuesday, 3th [08:50:25 -- 18:00:02] -> 32977 s +< +Every time the times are changed or the units where changed use ,,cu to update +all times within the hierarchy. + +Mappings for fast clocking: + + ,,cs Clock start. Date and current time as start and end time are + written at cursor position. Works in normal mode and insert mode. +> + Year 2011 -> 0.77 d + January -> 18.41 h + Monday, 3th [08:30:00 -- 17:45:00] -> 555.00 m + Tuesday, 3th [08:50:25 -- 18:00:02] -> 32977 s + 2011-10-11 [01:32:11 -- 01:32:11] -> +> +To set a new end time, place the cursor at the desired line and use following +mapping: + + ,,cS Clock stop. Set the end time to current time. This works also in + normal mode and insert mode. + +> + Year 2011 -> 0.77 d + January -> 18.41 h + Monday, 3th [08:30:00 -- 17:45:00] -> 555.00 m + Tuesday, 3th [08:50:25 -- 18:00:02] -> 32977 s + 2011-10-11 [01:32:11 -- 01:42:19] -> 0.17 h +> +At the moment there are no user defined time formats supported. And it's not +possible to clock times over the midnight like [22:25:00 -- 01:00:00], but +it's usable for the most important cases. + + +============================================================================== +Scripts *votl-scripts* + + +The VimOutliner distribution currently includes several useful external +scripts to support interoutline links, HTML export and more. All scripts are +included in your $HOME/.vim/vimoutliner/scripts folder. For more information +on these scripts see usage section in the scripts. You can also find several +of these scripts on this web site with links to their specific web site: +https://sites.google.com/site/vimoutlinerinfo/scripts-for-vimoutliner + + +Information on some of the scripts + +votl_maketags.pl *votl-maketags* + +A basic description of how to use this Perl script is given in section +|votl-testing|, subsection "Verify interoutline linking". + +otl2html.py *otl2html* + +This Python script transforms an outline into an HTML file. Use $ otl2html.py +--help to get detailed information. + +This script does not adhere to the VimOutliner naming convention with the +'votl_' prefix because it is not necessary for any VimOutliner functionality. +It is provided both as a useful tool for creating HTML pages and HTML slides +from outlines and as a working demonstration of how to convert .otl files to +other formats. + + +============================================================================== +Other Information *votl-other-info* + + +The VimOutliner Project~ + +- How do I add my own features? +Two ways -- by changing VimOutliner source code, or by inserting your own code +in |vimoutlinerrc|, which runs at the end of the VimOutliner startup +scripts. You might have to merge your personal vimoutlinerrc with future +versions to take advantage of new features. + +- How is VimOutliner licensed? +VimOutliner is licensed under the GNU General Public License. + +- How do I contribute to VimOutliner +Step 1 is to subscribe to our mailing list. Join up at +https://groups.google.com/forum/#!forum/vimoutliner. +Lurk for a few days or so to get the feel, then submit your idea/suggestion. +A lively discussion will ensue, after which your idea, probably in some modified +form, will be considered. The more of the actual work you have done, the more +likely your feature will go in the distribution in a timely manner. + + +- What's with the VimOutliner file names? +All VimOutliner files must begin with votl_ unless Vim itself requires them to +have a different name. A few older files from previous versions break this +rule, but over time these will be changed to our naming convention. + +In the old days, with the "self contained" philosophy, there was no naming +convention, because VimOutliner files were segregated into their own tree. +With the coming of the "vim plugin" philosophy, there's a need to identify +VimOutliner files for purposes of modification, upgrade and de-installation. +Hence our naming convention. + +- What if my feature doesn't make it into the VimOutliner distribution? +You can offer it on your own web site, or very possibly on +to the forthcoming new VimOutliner home page VimOutliner ships with its +core features, but many additional functionalities, especially those that +operate from Perl scripts (or bash or python) are available outside the +distro. For instance, right now there's an Executable Line feature that turns +VimOutliner into a true single tree information reservoir. The Executable Line +feature is available extra-distro on the VimOutliner home page. See also the +scripts included in the $HOME/.vim/vimoutliner/scripts folder. + + +Anticipated improvements in later versions~ + +Command-invoking headlines + Already prototyped + Probably coming next version + Allows you to press a key and get an html command in a browser + Enables a true single tree knowledge collection + Enables use of VimOutliner as a shell + +Groupware + Not yet well defined + Enables collaborative work on an outline + A pipe dream, but VimOutliner itself was once a pipe dream + +Easy mode + Let's Windows users operate VO like a common insert-only editor. This will + remove a great deal of VO's keyboarder- friendly features. But then, + they're Windows users: let them use the mouse. + +Headline to headline links + Not yet sanctioned, might never be implemented If implemented, this would + presumably create links not just between outlines, but between headlines, + either in the same outline or in a different one. This would be a start on + "neural networking". + +Headline numbering + Under feasibility investigation + Supported by external scripts + +Toolbar in gvim + Under feasibility investigation + + +Further information on outlines, outline processing and outliners~ + +http://www.vim.org/scripts/script.php?script_id=3515 +vim.org script site + +http://freecode.com/projects/vimoutliner +Main distribution website + +https://github.com/vimoutliner/vimoutliner +git repository + +http://www.troubleshooters.com/projects/alt-vimoutliner-litt/ +Preliminary main web site with links to other sites + +http://www.troubleshooters.com/tpromag/199911/199911.htm +Outlining discussion, not product specific + +http://www.troubleshooters.com/linux/olvim.htm +Discussion on how to use Vim for outlining + +http://www.troubleshooters.com/projects/vimoutliner.htm +Former Web page for the VimOutliner distro + +http://www.outliners.com +Discussion of (proprietary) outliners from days gone by. +Downloads for ancient versions of such outliners. +Unfortunately, all are DOS, Windows and Mac. + +http://members.ozemail.com.au/~caveman/Creative/Software/Inspiration/index.html +Discussion of (proprietary,Mac) Inspiration software +This page discusses many methods of thought/computer interaction: + Visual Outlining + Textual Outlining + Idea mapping + Mind Mapping + Brainstorming with Rapid Fire Entry + Concept Mapping + Story boarding + Diagrams (using rich symbol library) + +http://members.ozemail.com.au/~caveman/Creative/index.html +Not about outlines, but instead about how to use your brain. +The whole purpose of outlines is to use your brain. +New ways of using your brain produce new ways to use outlines. + +For the VimOutliner version information and history, see the CHANGELOG. + diff --git a/pack/acp/start/vimoutliner/doc/votl_cheatsheet.txt b/pack/acp/start/vimoutliner/doc/votl_cheatsheet.txt new file mode 100644 index 0000000..d9f877d --- /dev/null +++ b/pack/acp/start/vimoutliner/doc/votl_cheatsheet.txt @@ -0,0 +1,85 @@ + *votl_cheatsheet.txt* Last change: 2013-04-06 + +VIMOUTLINER CHEAT SHEET~ + +This overview has Vimoutliner specific commands for the available operations. +Remember that all Vim commands can be performed in Vimoutliner files. This is +especially useful for copying, pasting, moving around and similar commands. + +For more extensive descriptions of command uses in Vimoutliner do ':h vo-command'. |vo-command| + +List format explained: [command] [mode] [description] + + + +CHECKBOXES~ + +,,cb normal Insert a check box on the current line/range +,,cx normal Toggle check box state (percentage aware) +,,cd normal Delete check boxes +,,c% normal Create a check box with percentage placeholder +,,cp normal Create a check box with percentage placeholder on all +headings +,,cz normal Compute completion for the tree below the current +heading. + + +EXECUTABLE LINES~ + +,,e normal Execute the executable tag line under cursor + + +FOLDING~ + +,,1 all set foldlevel=0 +,,2 all set foldlevel=1 +,,3 all set foldlevel=2 +,,4 all set foldlevel=3 +,,5 all set foldlevel=4 +,,6 all set foldlevel=5 +,,7 all set foldlevel=6 +,,8 all set foldlevel=7 +,,9 all set foldlevel=8 +,,0 all set foldlevel=99999 + + +FORMATTING~ + +,,- all Draw dashed line +,,s normal Sort sub-tree under cursor ascending +,,S normal Sort sub-tree under cursor descending +,,B normal Make body text start with a space +,,b normal Make body text start with a colon and space +>> normal Demote headline +<< normal Promote headline + insert Demote headline + insert Promote headline +Q normal Reformat (Synonym for gq) + + +OTHER~ + +,,f normal Directory listing of the current directory +,,w insert Save changes and return to insert mode +,,D all VimOutliner reserved command + + +TAGGING/INTEROUTLINE~ + + normal Follow tag/interoutline (Synonym for Ctrl+]) + normal Return from tag (Synonym for Ctrl+T) + + +TIME AND DATE~ + +,,t normal Append timestamp (HH:MM:SS) to heading +,,T normal Prepend timestamp (HH:MM:SS) to heading +,,t insert Insert timestamp (HH:MM:SS) at cursor +,,d normal Append datestamp (YYYY-MM-DD) to heading +,,d insert Insert datestamp (YYYY-MM-DD) at cursor +,,D normal Prepend datestamp (YYYY-MM-DD) to heading + + + vim:set filetype=help textwidth=78: + + diff --git a/pack/acp/start/vimoutliner/ftdetect/votl.vim b/pack/acp/start/vimoutliner/ftdetect/votl.vim new file mode 100644 index 0000000..2897f50 --- /dev/null +++ b/pack/acp/start/vimoutliner/ftdetect/votl.vim @@ -0,0 +1,26 @@ +"# ####################################################################### +"# filetype.vim: filetype loader +"# version 0.4.0 +"# Copyright (C) 2001,2003 by Steve Litt (slitt@troubleshooters.com) +"# +"# This program is free software; you can redistribute it and/or modify +"# it under the terms of the GNU General Public License as published by +"# the Free Software Foundation; either version 2 of the License, or +"# (at your option) any later version. +"# +"# This program is distributed in the hope that it will be useful, +"# but WITHOUT ANY WARRANTY; without even the implied warranty of +"# MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the +"# GNU General Public License for more details. +"# +"# You should have received a copy of the GNU General Public License +"# along with this program; if not, see . +"# +"# Steve Litt, slitt@troubleshooters.com, http://www.troubleshooters.com +"# ####################################################################### + +augroup filetypedetect + au! BufRead,BufNewFile *.otl setfiletype votl + au! BufRead,BufNewFile *.oln setfiletype xoutliner +augroup END + diff --git a/pack/acp/start/vimoutliner/ftplugin/votl.vim b/pack/acp/start/vimoutliner/ftplugin/votl.vim new file mode 100644 index 0000000..84b69ad --- /dev/null +++ b/pack/acp/start/vimoutliner/ftplugin/votl.vim @@ -0,0 +1,679 @@ +"######################################################################### +"# ftplugin/votl.vim: VimOutliner functions, commands and settings +"# version 0.4.0 +"# Copyright (C) 2001,2003 by Steve Litt (slitt@troubleshooters.com) +"# Copyright (C) 2004,2014 by Noel Henson (noelwhenson@gmail.com) +"# +"# This program is free software; you can redistribute it and/or modify +"# it under the terms of the GNU General Public License as published by +"# the Free Software Foundation; either version 2 of the License, or +"# (at your option) any later version. +"# +"# This program is distributed in the hope that it will be useful, +"# but WITHOUT ANY WARRANTY; without even the implied warranty of +"# MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the +"# GNU General Public License for more details. +"# +"# You should have received a copy of the GNU General Public License +"# along with this program; if not, see . +"# +"# Steve Litt, slitt@troubleshooters.com, http://www.troubleshooters.com +"######################################################################### + +" Load the plugin {{{1 +" Prevent the plugin from being loaded twice +"if exists("b:did_ftplugin") +" finish +"endif +"let b:did_ftplugin = 1 +let b:current_syntax = "outliner" + +" Default Preferences {{{1 + +let use_space_colon=0 + +" End User Preferences + +" VimOutliner Standard Settings {{{1 +setlocal autoindent +"setlocal backspace=2 +setlocal wrapmargin=5 +setlocal wrap +setlocal tw=78 +setlocal noexpandtab +setlocal tabstop=4 " tabstop and shiftwidth must match +setlocal shiftwidth=4 " values from 2 to 8 work well +"setlocal nosmarttab +"setlocal softtabstop=0 +setlocal foldlevel=20 +setlocal foldcolumn=1 " turns on "+" at the beginning of close folds +setlocal foldmethod=expr +setlocal foldexpr=MyFoldLevel(v:lnum) +setlocal indentexpr= +setlocal nocindent +setlocal iskeyword=@,39,45,48-57,_,129-255 + +" Vim Outliner Functions {{{1 + +if !exists("loaded_vimoutliner_functions") +let loaded_vimoutliner_functions=1 + +" Sorting {{{2 +" IsParent(line) {{{3 +" Return 1 if this line is a parent +function! IsParent(line) + return (Ind(a:line)+1) == Ind(a:line+1) +endfunction +"}}}3 +" FindParent(line) {{{3 +" Return line if parent, parent line if not +function! FindParent(line) + if IsParent(a:line) + return a:line + else + let l:parentindent = Ind(a:line)-1 + let l:searchline = a:line + while (Ind(l:searchline) != l:parentindent) && (l:searchline > 0) + let l:searchline = l:searchline-1 + endwhile + return l:searchline + endif +endfunction +"}}}3 +" FindLastChild(line) {{{3 +" Return the line number of the last decendent of parent line +function! FindLastChild(line) + let l:parentindent = Ind(a:line) + let l:searchline = a:line+1 + while Ind(l:searchline) > l:parentindent + let l:searchline = l:searchline+1 + endwhile + return l:searchline-1 +endfunction +"}}}3 +" MoveDown() {{{3 +" Move a heading down by one +" Used for sorts and reordering of headings +function! MoveDown() + call cursor(line("."),0) + del x + put x +endfunction +"}}}3 +" DelHead() {{{3 +" Delete a heading +" Used for sorts and reordering of headings +function! DelHead(line) + let l:fstart = foldclosed(a:line) + if l:fstart == -1 + let l:execstr = a:line . "del x" + else + let l:fend = foldclosedend(a:line) + let l:execstr = l:fstart . "," . l:fend . "del x" + endif + exec l:execstr +endfunction +" PutHead() {{{3 +" Put a heading +" Used for sorts and reordering of headings +function! PutHead(line) + let l:fstart = foldclosed(a:line) + if l:fstart == -1 + let l:execstr = a:line . "put x" + exec l:execstr + else + let l:fend = foldclosedend(a:line) + let l:execstr = l:fend . "put x" + exec l:execstr + endif +endfunction +"}}}3 +" NextHead(line) {{{3 +" Return line of next heading +" Used for sorts and reordering of headings +function! NextHead(line) + let l:fend = foldclosedend(a:line) + if l:fend == -1 + return a:line+1 + else + return l:fend+1 + endif +endfunction +"}}}3 +" CompHead(line) {{{3 +" Compare this heading and the next +" Return 1: next is greater, 0 next is same, -1 next is less +function! CompHead(line) + let nexthead = NextHead(a:line) + let l:thisline=getline(a:line) + let l:nextline=getline(nexthead) + if indent(a:line) != indent(nexthead) + return 0 + elseif l:thisline <# l:nextline + return 1 + elseif l:thisline ># l:nextline + return -1 + else + return 0 + endif +endfunction + +"}}}3 +" Sort1Line(line) {{{3 +" Compare this heading and the next and swap if out of order +" Dir is 0 for forward, 1 for reverse +" Return a 1 if a change was made +function! Sort1Line(line,dir) + if (CompHead(a:line) == -1) && (a:dir == 0) + call DelHead(a:line) + call PutHead(a:line) + return 1 + elseif (CompHead(a:line) == 1) && (a:dir == 1) + call DelHead(a:line) + call PutHead(a:line) + return 1 + else + return 0 + endif +endfunction +"}}}3 +" Sort1Pass(start,end,dir) {{{3 +" Compare this heading and the next and swap if out of order +" Dir is 0 for forward, 1 for reverse +" Return a 0 if no change was made, other wise return the change count +function! Sort1Pass(fstart,fend,dir) + let l:i = a:fstart + let l:changed = 0 + while l:i < a:fend + let l:changed = l:changed + Sort1Line(l:i,a:dir) + let l:i = NextHead(l:i) + endwhile + return l:changed +endfunction +"}}}3 +" Sort(start,end,dir) {{{3 +" Sort this range of headings +" dir: 0 = ascending, 1 = decending +function! SortRange(fstart,fend,dir) + let l:changed = 1 + while l:changed != 0 + let l:changed = Sort1Pass(a:fstart,a:fend,a:dir) + endwhile +endfunction +"}}}3 +" SortChildren(dir) {{{3 +" Sort the children of a parent +" dir: 0 = ascending, 1 = descending +function! SortChildren(dir) + let l:oldcursor = line(".") + let l:fstart = FindParent(line(".")) + let l:fend = FindLastChild(l:fstart) + let l:fstart = l:fstart + if l:fend <= l:fstart + 1 + return + endif + call append(line("$"),"Temporary last line for sorting") + mkview + let l:execstr = "set foldlevel=" . foldlevel(l:fstart) + exec l:execstr + call SortRange(l:fstart + 1,l:fend,a:dir) + call cursor(line("$"),0) + del x + loadview + call cursor(l:oldcursor,0) +endfunction +"}}}3 +"}}}2 +" MakeChars() {{{2 +" Make a string of characters +" Used for strings of repeated characters +function MakeChars(count,char) + let i = 0 + let l:chars="" + while i < a:count + let l:chars = l:chars . a:char + let i = i + 1 + endwhile + return l:chars +endfunction +"}}}2 +" MakeSpaces() {{{2 +" Make a string of spaces +function MakeSpaces(count) + return MakeChars(a:count," ") +endfunction +"}}}2 +" MakeDashes() {{{2 +" Make a string of dashes +function MakeDashes(count) + return MakeChars(a:count,"-") +endfunction +"}}}2 +" MyFoldText() {{{2 +" Create string used for folded text blocks +function MyFoldText() + if exists('g:vo_fold_length') && g:vo_fold_length == "max" + let l:foldlength = winwidth(0) - 1 - &numberwidth - &foldcolumn + elseif exists('g:vo_fold_length') + let l:foldlength = g:vo_fold_length + else + let l:foldlength = 58 + endif + " I have this as an option, if the user wants to set "…" as the padding + " string, or some other string, like "(more)" + if exists('g:vo_trim_string') + let l:trimstr = g:vo_trim_string + else + let l:trimstr = "..." + endif + let l:MySpaces = MakeSpaces(&sw) + let l:line = getline(v:foldstart) + let l:bodyTextFlag=0 + if l:line =~ "^\t* \\S" || l:line =~ "^\t*\:" + let l:bodyTextFlag=1 + let l:MySpaces = MakeSpaces(&sw * (v:foldlevel-1)) + let l:line = l:MySpaces."[TEXT]" + elseif l:line =~ "^\t*\;" + let l:bodyTextFlag=1 + let l:MySpaces = MakeSpaces(&sw * (v:foldlevel-1)) + let l:line = l:MySpaces."[TEXT BLOCK]" + elseif l:line =~ "^\t*\> " + let l:bodyTextFlag=1 + let l:MySpaces = MakeSpaces(&sw * (v:foldlevel-1)) + let l:line = l:MySpaces."[USER]" + elseif l:line =~ "^\t*\>" + let l:ls = stridx(l:line,">") + let l:le = stridx(l:line," ") + if l:le == -1 + let l:l = strpart(l:line, l:ls+1) + else + let l:l = strpart(l:line, l:ls+1, l:le-l:ls-1) + endif + let l:bodyTextFlag=1 + let l:MySpaces = MakeSpaces(&sw * (v:foldlevel-1)) + let l:line = l:MySpaces."[USER ".l:l."]" + elseif l:line =~ "^\t*\< " + let l:bodyTextFlag=1 + let l:MySpaces = MakeSpaces(&sw * (v:foldlevel-1)) + let l:line = l:MySpaces."[USER BLOCK]" + elseif l:line =~ "^\t*\<" + let l:ls = stridx(l:line,"<") + let l:le = stridx(l:line," ") + if l:le == -1 + let l:l = strpart(l:line, l:ls+1) + else + let l:l = strpart(l:line, l:ls+1, l:le-l:ls-1) + endif + let l:bodyTextFlag=1 + let l:MySpaces = MakeSpaces(&sw * (v:foldlevel-1)) + let l:line = l:MySpaces."[USER BLOCK ".l:l."]" + elseif l:line =~ "^\t*\|" + let l:bodyTextFlag=1 + let l:MySpaces = MakeSpaces(&sw * (v:foldlevel-1)) + let l:line = l:MySpaces."[TABLE]" + endif + let l:sub = substitute(l:line,'\t',l:MySpaces,'g') + let l:sublen = strdisplaywidth(l:sub) + let l:end = " (" . ((v:foldend + l:bodyTextFlag)- v:foldstart) + if ((v:foldend + l:bodyTextFlag)- v:foldstart) == 1 + let l:end = l:end . " line)" + else + let l:end = l:end . " lines)" + endif + let l:endlen = strdisplaywidth(l:end) + + " Multiple cases: + " (1) Full padding with ellipse (...) or user defined string, + " (2) No point in padding, pad would just obscure the end of text, + " (3) Don't pad and use dashes to fill up the space. + if l:endlen + l:sublen > l:foldlength + let l:sub = strpart(l:sub, 0, l:foldlength - l:endlen - strdisplaywidth(l:trimstr)) + let l:sub = l:sub . l:trimstr + let l:sublen = strdisplaywidth(l:sub) + let l:sub = l:sub . l:end + elseif l:endlen + l:sublen == l:foldlength + let l:sub = l:sub . l:end + else + let l:sub = l:sub . " " . MakeDashes(l:foldlength - l:endlen - l:sublen - 1) . l:end + endif + return l:sub.repeat(' ', winwidth(0)-strdisplaywidth(l:sub)) +endfunction +"}}}2 +" InsertDate() {{{2 +" Insert today's date. +function InsertDate(ba) + let @x = strftime("%Y-%m-%d") + if a:ba == "0" + normal! "xp + else + normal! "xP + endif +endfunction +"}}}2 +" InsertSpaceDate() {{{2 +" Insert a space, then today's date. +function InsertSpaceDate() + let @x = " " + let @x = @x . strftime("%Y-%m-%d") + normal! "xp +endfunction +"}}}2 +" InsertTime() {{{2 +" Insert the time. +function InsertTime(ba) + let @x = strftime("%H:%M:%S") + if a:ba == "0" + normal! "xp + else + normal! "xP + endif +endfunction +"}}}2 +" InsertSpaceTime() {{{2 +" Insert a space, then the time. +function InsertSpaceTime() + let @x = " " + let @x = @x . strftime("%H:%M:%S") + normal! "xp +endfunction +"}}}2 +" Ind(line) {{{2 +" Determine the indent level of a line. +" Courtesy of Gabriel Horner +function! Ind(line) + return indent(a:line)/&tabstop +endfunction +"}}}2 +" BodyText(line) {{{2 +" Determine the indent level of a line. +function! BodyText(line) + return (match(getline(a:line),"^\t*:") == 0) +endfunction +"}}}2 +" PreformattedBodyText(line) {{{2 +" Determine the indent level of a line. +function! PreformattedBodyText(line) + return (match(getline(a:line),"^\t*;") == 0) +endfunction +"}}}2 +" PreformattedUserText(line) {{{2 +" Determine the indent level of a line. +function! PreformattedUserText(line) + return (match(getline(a:line),"^\t*<") == 0) +endfunction +"}}}2 +" PreformattedUserTextLabeled(line) {{{2 +" Determine the indent level of a line. +function! PreformattedUserTextLabeled(line) + return (match(getline(a:line),"^\t*<\S") == 0) +endfunction +"}}}2 +" PreformattedUserTextSpace(line) {{{2 +" Determine the indent level of a line. +function! PreformattedUserTextSpace(line) + return (match(getline(a:line),"^\t*< ") == 0) +endfunction +"}}}2 +" UserText(line) {{{2 +" Determine the indent level of a line. +function! UserText(line) + return (match(getline(a:line),"^\t*>") == 0) +endfunction +"}}}2 +" UserTextSpace(line) {{{2 +" Determine the indent level of a line. +function! UserTextSpace(line) + return (match(getline(a:line),"^\t*> ") == 0) +endfunction +"}}}2 +" UserTextLabeled(line) {{{2 +" Determine the indent level of a line. +function! UserTextLabeled(line) + return (match(getline(a:line),"^\t*>\S") == 0) +endfunction +"}}}2 +" PreformattedTable(line) {{{2 +" Determine the indent level of a line. +function! PreformattedTable(line) + return (match(getline(a:line),"^\t*|") == 0) +endfunction +"}}}2 +" MyFoldLevel(Line) {{{2 +" Determine the fold level of a line. +function MyFoldLevel(line) + let l:myindent = Ind(a:line) + let l:nextindent = Ind(a:line+1) + + if BodyText(a:line) + if (BodyText(a:line-1) == 0) + return '>'.(l:myindent+1) + endif + if (BodyText(a:line+1) == 0) + return '<'.(l:myindent+1) + endif + return (l:myindent+1) + elseif PreformattedBodyText(a:line) + if (PreformattedBodyText(a:line-1) == 0) + return '>'.(l:myindent+1) + endif + if (PreformattedBodyText(a:line+1) == 0) + return '<'.(l:myindent+1) + endif + return (l:myindent+1) + elseif PreformattedTable(a:line) + if (PreformattedTable(a:line-1) == 0) + return '>'.(l:myindent+1) + endif + if (PreformattedTable(a:line+1) == 0) + return '<'.(l:myindent+1) + endif + return (l:myindent+1) + elseif PreformattedUserText(a:line) + if (PreformattedUserText(a:line-1) == 0) + return '>'.(l:myindent+1) + endif + if (PreformattedUserTextSpace(a:line+1) == 0) + return '<'.(l:myindent+1) + endif + return (l:myindent+1) + elseif PreformattedUserTextLabeled(a:line) + if (PreformattedUserTextLabeled(a:line-1) == 0) + return '>'.(l:myindent+1) + endif + if (PreformattedUserText(a:line+1) == 0) + return '<'.(l:myindent+1) + endif + return (l:myindent+1) + elseif UserText(a:line) + if (UserText(a:line-1) == 0) + return '>'.(l:myindent+1) + endif + if (UserTextSpace(a:line+1) == 0) + return '<'.(l:myindent+1) + endif + return (l:myindent+1) + elseif UserTextLabeled(a:line) + if (UserTextLabeled(a:line-1) == 0) + return '>'.(l:myindent+1) + endif + if (UserText(a:line+1) == 0) + return '<'.(l:myindent+1) + endif + return (l:myindent+1) + else + if l:myindent < l:nextindent + return '>'.(l:myindent+1) + endif + if l:myindent > l:nextindent + "return '<'.(l:nextindent+1) + return (l:myindent) + "return '<'.(l:nextindent-1) + endif + return l:myindent + endif +endfunction +"}}}2 +" Spawn(line) {{{2 +" Execute an executable line +" Courtesy of Steve Litt +if !exists("loaded_steveoutliner_functions") + let loaded_steveoutliner_functions=1 +function Spawn() + let theline=getline(line(".")) + let idx=matchend(theline, "_exe_\\s*") + if idx == -1 + echo "Not an executable line" + else + let command=strpart(theline, idx) + let command="!".command + exec command + endif +endfunction +endif +"}}}2 +" This should be a setlocal but that doesn't work when switching to a new .otl file +" within the same buffer. Using :e has demonstrated this. +set foldtext=MyFoldText() + +"setlocal fillchars=|, + +endif " if !exists("loaded_vimoutliner_functions") +" End Vim Outliner Functions + +" Menu Entries {{{1 +" VO menu +amenu &VO.Expand\ Level\ &1 :set foldlevel=0 +amenu &VO.Expand\ Level\ &2 :set foldlevel=1 +amenu &VO.Expand\ Level\ &3 :set foldlevel=2 +amenu &VO.Expand\ Level\ &4 :set foldlevel=3 +amenu &VO.Expand\ Level\ &5 :set foldlevel=4 +amenu &VO.Expand\ Level\ &6 :set foldlevel=5 +amenu &VO.Expand\ Level\ &7 :set foldlevel=6 +amenu &VO.Expand\ Level\ &8 :set foldlevel=7 +amenu &VO.Expand\ Level\ &9 :set foldlevel=8 +amenu &VO.Expand\ Level\ &All :set foldlevel=99999 +amenu &VO.-Sep1- : +"Tools sub-menu +let s:path2scripts = expand(':p:h:h').'/vimoutliner/scripts' +" otl2html +exec 'amenu &VO.&Tools.otl2&html\.py\ (otl2html\.py\ thisfile\ -S\ html2otl_nnnnnn\.css\ >\ thisfile\.html) :!'.s:path2scripts.'/otl2html.py -S html2otl_nnnnnn.css % > %.html' +" otl2docbook +exec 'amenu &VO.&Tools.otl2&docbook\.pl\ (otl2docbook\.pl\ thisfile\ >\ thisfile\.dbk) :!'.s:path2scripts.'/otl2docbook.pl % > %.dbk' +" otl2table +exec 'amenu &VO.&Tools.otl2&table\.py\ (otl2table\.py\ thisfile\ >\ thisfile\.txt) :!'.s:path2scripts.'/otl2table.py % > %.txt' +" otl2tags => FreeMind +exec 'amenu &VO.&Tools.otl2tags\.py\ =>\ &FreeMind\ (otl2tags\.py\ \-c\ otl2tags_freemind\.conf\ thisfile\ >\ thisfile\.mm) :!'.s:path2scripts.'/otl2tags.py -c '.s:path2scripts.'/otl2tags_freemind.conf % > %.mm' +" otl2tags => Graphviz +exec 'amenu &VO.&Tools.otl2tags\.py\ =>\ &Graphviz\ (otl2tags\.py\ \-c\ otl2tags_graphviz\.conf\ thisfile\ >\ thisfile\.gv) :!'.s:path2scripts.'/otl2tags.py -c '.s:path2scripts.'/otl2tags_graphviz.conf % > %.gv' +amenu &VO.&Tools.&myotl2thml\.sh\ (myotl2html\.sh\ thisfile) :!myotl2html.sh % +amenu &VO.-Sep2- : +amenu &VO.&Color\ Scheme :popup Edit.Color\ Scheme +amenu &VO.-Sep3- : +amenu &VO.&Help.&Index :he vo +amenu &VO.&Help.&,,\ Commands :he votl-command +amenu &VO.&Help.&Checkboxes :he votl-checkbox +amenu &VO.&Help.&Hoisting :he votl-hoisting +amenu &Help.-Sep1- : +" Help menu additions +amenu &Help.&Vim\ Outliner.&Index :he votl +amenu &Help.&Vim\ Outliner.&,,\ Commands :he votl-command +amenu &Help.&Vim\ Outliner.&Checkboxes :he votl-checkbox +amenu &Help.&Vim\ Outliner.&Hoisting :he votl-hoisting +"}}}1 +" Auto-commands {{{1 +if !exists("autocommand_vo_loaded") + let autocommand_vo_loaded = 1 + au BufNewFile,BufRead *.otl setf votl +" au CursorHold *.otl syn sync fromstart + "set updatetime=500 +endif +"}}}1 + +" this command needs to be run every time so Vim doesn't forget where to look +setlocal tags^=$HOME/.vim/vimoutliner/vo_tags.tag + +" Added an indication of current syntax as per Dillon Jones' request +let b:current_syntax = "outliner" + +" Directory where VO is located now +let vo_dir = expand(":p:h:h") + +" Load rc file, only the first found. +let rcs = split(globpath('$HOME,$HOME/.vimoutliner','.vimoutlinerrc'), "\n") + + \ split(globpath('$HOME,$HOME/.vimoutliner,$HOME/.vim', 'vimoutlinerrc'), "\n") + + \ split(globpath(vo_dir, 'vimoutlinerrc'), "\n") + +if len(rcs) > 0 + exec 'source '.rcs[0] +else + runtime vimoutliner/vimoutlinerrc +endif +" Load modules +if exists('g:vo_modules_load') + for vo_module in split(g:vo_modules_load, '\s*:\s*') + exec "runtime! vimoutliner/plugin/votl_" . vo_module . ".vim" + endfor +unlet! vo_module +endif + +" Vim Outliner Key Mappings {{{1 +" insert the date +nmap d $:call InsertSpaceDate() +imap d ~x:call InsertDate(0)a +nmap D ^:call InsertDate(1)a + +" insert the time +nmap t $:call InsertSpaceTime() +imap t ~x:call InsertTime(0)a +nmap T ^:call InsertTime(1)a + +" sort a list naturally +map s :silent call SortChildren(0) +" sort a list, but you supply the options +map S :silent call SortChildren(1) + +" invoke the file explorer +map f :e . +imap f :e . + +" Insert a fence for segmented lists. +" this divider is used by otl2html.py to create '
' +map - o----------------------------------------0 +imap - ---------------------------------------- + +" switch document between the two types of bodytext styles +if use_space_colon == 1 + " First, convert document to the marker style + map b :%s/\(^\t*\) :/\1/e:%s/\(^\t*\) /\1 : /e:let @/="" + " Now, convert document to the space style + map B :%s/\(^\t*\) :/\1/e:let @/="" +else + " First, convert document to the marker style + map b :%s/\(^\t*\):/\1/e:%s/\(^\t*\) /\1: /e:let @/="" + " Now, convert document to the space style + map B :%s/\(^\t*\):/\1/e:let @/="" +endif + +" Steve's additional mappings start here +map +map +map 0 :set foldlevel=99999 +map 9 :set foldlevel=8 +map 8 :set foldlevel=7 +map 7 :set foldlevel=6 +map 6 :set foldlevel=5 +map 5 :set foldlevel=4 +map 4 :set foldlevel=3 +map 3 :set foldlevel=2 +map 2 :set foldlevel=1 +map 1 :set foldlevel=0 +"next line commented out due to hard-coded nature and ancient, nonexistent file +"map ,, :runtime vimoutliner/vimoutlinerrc +map! w :wa +nmap e :call Spawn() +" Steve's additional mappings end here + +" End of Vim Outliner Key Mappings }}}1 + +" The End +" vim600: set foldmethod=marker foldlevel=0: diff --git a/pack/acp/start/vimoutliner/install.sh b/pack/acp/start/vimoutliner/install.sh new file mode 100755 index 0000000..254b828 --- /dev/null +++ b/pack/acp/start/vimoutliner/install.sh @@ -0,0 +1,173 @@ +#!/bin/bash + +homedir=$HOME +vimdir=$homedir/.vim +vodir=$vimdir/vimoutliner +OS=`uname` + +backupargs="" + + +#SOME FUNCTIONS +sure () { + read REPLY + echo test $REPLY = "y" || test $REPLY = "Y" +} + +make_dir () { + test -d $1 || { + echo " creating: $1" + mkdir $1 + created=1 + } +} + +copyfile () { + echo " installing: $2/$1" + install $backupargs $1 $2/$1 +} + +copydir () { + files=`ls $1` + for i in $files; do + echo " installing: $2/$i" + if [ -d $1/$i ]; then + mkdir -p $2/$i + copydir $1/$i $2/$i + else + install $backupargs $1/$i $2 + fi + done +} + +#START THE INSTALLATION +cat <> $homedir/.vimrc + } +egrep -lq "syntax[[:space:]]+on" $homedir/.vimrc || \ + { modified=1 + echo "syntax on" >> $homedir/.vimrc + } +if [ $modified -eq 0 ] ; then + echo " not modified"; +else + echo " modifying $homedir/.vimrc" +fi + +#TWEAK $HOME/.vim/filetype.vim +modified=0 +echo checking/creating/modifying $homedir/.vim/filetype.vim +test -f $homedir/.vim/filetype.vim || \ + { echo " creating $homedir/.vim/filetype.vim" + touch $homedir/.vim/filetype.vim + } +egrep -lq "runtime\! ftdetect/\*.vim" $homedir/.vim/filetype.vim || \ + { echo " modifying $homedir/.vim/filetype.vim" + modified=1 + echo "runtime! ftdetect/*.vim" >> $homedir/.vim/filetype.vim + } +if [ $modified -eq 0 ] ; then echo " not modified"; fi + +#CLEANUP OLD INSTALLATIONS +echo "cleaning up old (<0.3.5) installations" +files=`find $vimdir -iname "vo_*"` +for file in $files; do + echo "removing $file" + rm -v $file +done + +#CLEANUP OLD BACKUPS +if [ -z $backupargs ]; then + echo "cleaning up old backups" + files=`find $vimdir -iname "vo*.old"` + for file in $files; do + echo "removing $file" + rm -v $file + done + files2=`find $vodir -iname "*.old"` + for file in $files; do + echo "removing $file" + rm -v $file + done +fi + +#COPY FILES +echo "installing files" +copyfile syntax/votl.vim $vimdir +copyfile ftplugin/votl.vim $vimdir +copyfile ftdetect/votl.vim $vimdir +copyfile colors/vo_light.vim $vimdir +copyfile colors/vo_dark.vim $vimdir +copyfile doc/votl.txt $vimdir +copyfile doc/votl_cheatsheet.txt $vimdir +copyfile vimoutlinerrc $vodir +copyfile vimoutliner/scripts/votl_maketags.pl $vimdir + +#INCORPORATE HELP DOCUMENTATION +echo "Installing vimoutliner documentation" +vim -c "helptags $HOME/.vim/doc" -c q + +#INSTALL THE ADD-ONS +cat <. +"# +"# Steve Litt, slitt@troubleshooters.com, http://www.troubleshooters.com +"######################################################################### + +" HISTORY {{{1 +"######################################################################### +"# V0.1.0 Pre-alpha +"# Set of outliner friendly settings +"# Steve Litt, 5/28/2001 +"# End of version 0.1.0 +"# +"# V0.1.1 Pre-alpha +"# No change +"# +"# Steve Litt, 5/28/2001 +"# End of version 0.1.1 +"# +"# V0.1.2 Pre-alpha +"# No Change +"# Steve Litt, 5/30/2001 +"# End of version 0.1.2 +"# V0.1.3 Pre-alpha +"# No Change +"# Steve Litt, 5/30/2001 +"# End of version 0.1.3 +"# V0.2.0 +"# Noel Henson adds code for outliner-friendly expand and +"# collapse, comma comma commands, color coding, hooks for a +"# spellchecker, sorting, and date insertion. +"# Noel Henson, 11/24/2002 +"# End of version 0.2.0 +"# END OF HISTORY +"# +"######################################################################### + +" Colors linked {{{1 +" Bill Powell, http://www.billpowellisalive.com +" Linked colors to normal groups. Different schemes will need tweaking. +" Occasionally certain groups will be rendered invisible. ;) +" +" Changelog {{{2 +"2007 Jan 23, 21:23 Tue - 0.3.0, Modified version 0.1 + " Linked syntax groups to standard Vim color groups, intsead of to + " particular colors. Now each colorscheme can work its own magic on + " a VO file. +"2007 Apr 30, 9:36 Mon - 0.3.0, Modified version 0.2 + " Changed a few linked groups to reduce chances of groups being invisible. + " No longer use Ignore group for anything. + " Still a little redundancy; different groups might linked to same color group. + " E.g., PT1 and UT1. But some color schemes (e.g. astronout) will differentiate between + " Special and Debug. Others will use the same colors for, say, Identifier and Debug. + " It just depends. + " To tweak these groups, try :h syntax and go to group-name. + " This shows the color groups, highlighted in your current colorscheme. +" }}} +hi link OL1 Statement +hi link OL2 Identifier +hi link OL3 Constant +hi link OL4 PreProc +hi link OL5 Statement +hi link OL6 Identifier +hi link OL7 Constant +hi link OL8 PreProc +hi link OL9 Statement + +"colors for tags +"hi link outlTags Tag +hi link outlTags Todo + +"color for body text +hi link BT1 Comment +hi link BT2 Comment +hi link BT3 Comment +hi link BT4 Comment +hi link BT5 Comment +hi link BT6 Comment +hi link BT7 Comment +hi link BT8 Comment +hi link BT9 Comment + +"color for pre-formatted text +hi link PT1 Special +hi link PT2 Special +hi link PT3 Special +hi link PT4 Special +hi link PT5 Special +hi link PT6 Special +hi link PT7 Special +hi link PT8 Special +hi link PT9 Special + +"color for tables +hi link TA1 Type +hi link TA2 Type +hi link TA3 Type +hi link TA4 Type +hi link TA5 Type +hi link TA6 Type +hi link TA7 Type +hi link TA8 Type +hi link TA9 Type + +"color for user text (wrapping) +hi link UT1 Debug +hi link UT2 Debug +hi link UT3 Debug +hi link UT4 Debug +hi link UT5 Debug +hi link UT6 Debug +hi link UT7 Debug +hi link UT8 Debug +hi link UT9 Debug + +"color for user text (non-wrapping) +hi link UB1 Underlined +hi link UB2 Underlined +hi link UB3 Underlined +hi link UB4 Underlined +hi link UB5 Underlined +hi link UB6 Underlined +hi link UB7 Underlined +hi link UB8 Underlined +hi link UB9 Underlined + +"colors for folded sections +"hi link Folded Special +"hi link FoldColumn Type + +"colors for experimental spelling error highlighting +"this only works for spellfix.vim with will be cease to exist soon +hi link spellErr Error +hi link BadWord Todo + +" Syntax {{{1 +syn clear +syn sync fromstart + +syn match outlTags '_tag_\w*' contained + +" Noel's style of body text {{{2 +syntax region BT1 start=+^ \S+ skip=+^ \S+ end=+^\S+me=e-1 end=+^\(\t\)\{1}\S+me=e-2 contains=spellErr,SpellErrors,BadWord contained +syntax region BT2 start=+^\(\t\)\{1} \S+ skip=+^\(\t\)\{1} \S+ end=+^\(\t\)*\S+me=s-1 contains=spellErr,SpellErrors,BadWord contained +syntax region BT3 start=+^\(\t\)\{2} \S+ skip=+^\(\t\)\{2} \S+ end=+^\(\t\)*\S+me=s-1 contains=spellErr,SpellErrors,BadWord contained +syntax region BT4 start=+^\(\t\)\{3} \S+ skip=+^\(\t\)\{3} \S+ end=+^\(\t\)*\S+me=s-1 contains=spellErr,SpellErrors,BadWord contained +syntax region BT5 start=+^\(\t\)\{4} \S+ skip=+^\(\t\)\{4} \S+ end=+^\(\t\)*\S+me=s-1 contains=spellErr,SpellErrors,BadWord contained +syntax region BT6 start=+^\(\t\)\{5} \S+ skip=+^\(\t\)\{5} \S+ end=+^\(\t\)*\S+me=s-1 contains=spellErr,SpellErrors,BadWord contained +syntax region BT7 start=+^\(\t\)\{6} \S+ skip=+^\(\t\)\{6} \S+ end=+^\(\t\)*\S+me=s-1 contains=spellErr,SpellErrors,BadWord contained +syntax region BT8 start=+^\(\t\)\{7} \S+ skip=+^\(\t\)\{7} \S+ end=+^\(\t\)*\S+me=s-1 contains=spellErr,SpellErrors,BadWord contained +syntax region BT9 start=+^\(\t\)\{8} \S+ skip=+^\(\t\)\{8} \S+ end=+^\(\t\)*\S+me=s-1 contains=spellErr,SpellErrors,BadWord contained + +"comment-style bodytext as per Steve Litt {{{2 +syntax region BT1 start=+^:+ skip=+^:+ end=+^\S+me=e-1 end=+^\(\t\)\{1}\S+me=s-1 contains=spellErr,SpellErrors,BadWord contained +syntax region BT2 start=+^\(\t\)\{1}:+ skip=+^\(\t\)\{1}:+ end=+^\(\t\)*\S+me=s-1 contains=spellErr,SpellErrors,BadWord contained +syntax region BT3 start=+^\(\t\)\{2}:+ skip=+^\(\t\)\{2}:+ end=+^\(\t\)*\S+me=s-1 contains=spellErr,SpellErrors,BadWord contained +syntax region BT4 start=+^\(\t\)\{3}:+ skip=+^\(\t\)\{3}:+ end=+^\(\t\)*\S+me=s-1 contains=spellErr,SpellErrors,BadWord contained +syntax region BT5 start=+^\(\t\)\{4}:+ skip=+^\(\t\)\{4}:+ end=+^\(\t\)*\S+me=s-1 contains=spellErr,SpellErrors,BadWord contained +syntax region BT6 start=+^\(\t\)\{5}:+ skip=+^\(\t\)\{5}:+ end=+^\(\t\)*\S+me=s-1 contains=spellErr,SpellErrors,BadWord contained +syntax region BT7 start=+^\(\t\)\{6}:+ skip=+^\(\t\)\{6}:+ end=+^\(\t\)*\S+me=s-1 contains=spellErr,SpellErrors,BadWord contained +syntax region BT8 start=+^\(\t\)\{7}:+ skip=+^\(\t\)\{7}:+ end=+^\(\t\)*\S+me=s-1 contains=spellErr,SpellErrors,BadWord contained +syntax region BT9 start=+^\(\t\)\{8}:+ skip=+^\(\t\)\{8}:+ end=+^\(\t\)*\S+me=s-1 contains=spellErr,SpellErrors,BadWord contained + +"Preformatted body text {{{2 +syntax region PT1 start=+^;+ skip=+^;+ end=+^\S+me=e-1 end=+^\(\t\)\{1}\S+me=s-1 contains=spellErr,SpellErrors,BadWord contained +syntax region PT2 start=+^\(\t\)\{1};+ skip=+^\(\t\)\{1};+ end=+^\(\t\)*\S+me=s-1 contains=spellErr,SpellErrors,BadWord contained +syntax region PT3 start=+^\(\t\)\{2};+ skip=+^\(\t\)\{2};+ end=+^\(\t\)*\S+me=s-1 contains=spellErr,SpellErrors,BadWord contained +syntax region PT4 start=+^\(\t\)\{3};+ skip=+^\(\t\)\{3};+ end=+^\(\t\)*\S+me=s-1 contains=spellErr,SpellErrors,BadWord contained +syntax region PT5 start=+^\(\t\)\{4};+ skip=+^\(\t\)\{4};+ end=+^\(\t\)*\S+me=s-1 contains=spellErr,SpellErrors,BadWord contained +syntax region PT6 start=+^\(\t\)\{5};+ skip=+^\(\t\)\{5};+ end=+^\(\t\)*\S+me=s-1 contains=spellErr,SpellErrors,BadWord contained +syntax region PT7 start=+^\(\t\)\{6};+ skip=+^\(\t\)\{6};+ end=+^\(\t\)*\S+me=s-1 contains=spellErr,SpellErrors,BadWord contained +syntax region PT8 start=+^\(\t\)\{7};+ skip=+^\(\t\)\{7};+ end=+^\(\t\)*\S+me=s-1 contains=spellErr,SpellErrors,BadWord contained +syntax region PT9 start=+^\(\t\)\{8};+ skip=+^\(\t\)\{8};+ end=+^\(\t\)*\S+me=s-1 contains=spellErr,SpellErrors,BadWord contained + +"Preformatted tables {{{2 +syntax region TA1 start=+^|+ skip=+^|+ end=+^\S+me=e-1 end=+^\(\t\)\{1}\S+me=s-1 contains=spellErr,SpellErrors,BadWord contained +syntax region TA2 start=+^\(\t\)\{1}|+ skip=+^\(\t\)\{1}|+ end=+^\(\t\)*\S+me=s-1 contains=spellErr,SpellErrors,BadWord contained +syntax region TA3 start=+^\(\t\)\{2}|+ skip=+^\(\t\)\{2}|+ end=+^\(\t\)*\S+me=s-1 contains=spellErr,SpellErrors,BadWord contained +syntax region TA4 start=+^\(\t\)\{3}|+ skip=+^\(\t\)\{3}|+ end=+^\(\t\)*\S+me=s-1 contains=spellErr,SpellErrors,BadWord contained +syntax region TA5 start=+^\(\t\)\{4}|+ skip=+^\(\t\)\{4}|+ end=+^\(\t\)*\S+me=s-1 contains=spellErr,SpellErrors,BadWord contained +syntax region TA6 start=+^\(\t\)\{5}|+ skip=+^\(\t\)\{5}|+ end=+^\(\t\)*\S+me=s-1 contains=spellErr,SpellErrors,BadWord contained +syntax region TA7 start=+^\(\t\)\{6}|+ skip=+^\(\t\)\{6}|+ end=+^\(\t\)*\S+me=s-1 contains=spellErr,SpellErrors,BadWord contained +syntax region TA8 start=+^\(\t\)\{7}|+ skip=+^\(\t\)\{7}|+ end=+^\(\t\)*\S+me=s-1 contains=spellErr,SpellErrors,BadWord contained +syntax region TA9 start=+^\(\t\)\{8}|+ skip=+^\(\t\)\{8}|+ end=+^\(\t\)*\S+me=s-1 contains=spellErr,SpellErrors,BadWord contained + +"wrapping user text {{{2 +syntax region UT1 start=+^>+ skip=+^>+ end=+^\S+me=e-1 end=+^\(\t\)\{1}\S+me=s-1 contains=spellErr,SpellErrors,BadWord contained +syntax region UT2 start=+^\(\t\)\{1}>+ skip=+^\(\t\)\{1}>+ end=+^\(\t\)*\S+me=s-1 contains=spellErr,SpellErrors,BadWord contained +syntax region UT3 start=+^\(\t\)\{2}>+ skip=+^\(\t\)\{2}>+ end=+^\(\t\)*\S+me=s-1 contains=spellErr,SpellErrors,BadWord contained +syntax region UT4 start=+^\(\t\)\{3}>+ skip=+^\(\t\)\{3}>+ end=+^\(\t\)*\S+me=s-1 contains=spellErr,SpellErrors,BadWord contained +syntax region UT5 start=+^\(\t\)\{4}>+ skip=+^\(\t\)\{4}>+ end=+^\(\t\)*\S+me=s-1 contains=spellErr,SpellErrors,BadWord contained +syntax region UT6 start=+^\(\t\)\{5}>+ skip=+^\(\t\)\{5}>+ end=+^\(\t\)*\S+me=s-1 contains=spellErr,SpellErrors,BadWord contained +syntax region UT7 start=+^\(\t\)\{6}>+ skip=+^\(\t\)\{6}>+ end=+^\(\t\)*\S+me=s-1 contains=spellErr,SpellErrors,BadWord contained +syntax region UT8 start=+^\(\t\)\{7}>+ skip=+^\(\t\)\{7}>+ end=+^\(\t\)*\S+me=s-1 contains=spellErr,SpellErrors,BadWord contained +syntax region UT9 start=+^\(\t\)\{8}>+ skip=+^\(\t\)\{8}>+ end=+^\(\t\)*\S+me=s-1 contains=spellErr,SpellErrors,BadWord contained + +"non-wrapping user text {{{2 +syntax region UB1 start=+^<+ skip=+^<+ end=+^\S+me=e-1 end=+^\(\t\)\{1}\S+me=s-1 contains=spellErr,SpellErrors,BadWord contained +syntax region UB2 start=+^\(\t\)\{1}<+ skip=+^\(\t\)\{1}<+ end=+^\(\t\)*\S+me=s-1 contains=spellErr,SpellErrors,BadWord contained +syntax region UB3 start=+^\(\t\)\{2}<+ skip=+^\(\t\)\{2}<+ end=+^\(\t\)*\S+me=s-1 contains=spellErr,SpellErrors,BadWord contained +syntax region UB4 start=+^\(\t\)\{3}<+ skip=+^\(\t\)\{3}<+ end=+^\(\t\)*\S+me=s-1 contains=spellErr,SpellErrors,BadWord contained +syntax region UB5 start=+^\(\t\)\{4}<+ skip=+^\(\t\)\{4}<+ end=+^\(\t\)*\S+me=s-1 contains=spellErr,SpellErrors,BadWord contained +syntax region UB6 start=+^\(\t\)\{5}<+ skip=+^\(\t\)\{5}<+ end=+^\(\t\)*\S+me=s-1 contains=spellErr,SpellErrors,BadWord contained +syntax region UB7 start=+^\(\t\)\{6}<+ skip=+^\(\t\)\{6}<+ end=+^\(\t\)*\S+me=s-1 contains=spellErr,SpellErrors,BadWord contained +syntax region UB8 start=+^\(\t\)\{7}<+ skip=+^\(\t\)\{7}<+ end=+^\(\t\)*\S+me=s-1 contains=spellErr,SpellErrors,BadWord contained +syntax region UB9 start=+^\(\t\)\{8}<+ skip=+^\(\t\)\{8}<+ end=+^\(\t\)*\S+me=s-1 contains=spellErr,SpellErrors,BadWord contained + +"comment-style bodytext formatting as per Steve Litt +syntax match Comment "^\s*:.*$" +setlocal fo-=t fo+=crqno +setlocal com=sO:\:\ -,mO:\:\ \ ,eO:\:\:,:\:,sO:\>\ -,mO:\>\ \ ,eO:\>\>,:\> + +" Headings {{{2 +syntax region OL1 start=+^[^:\t]+ end=+^[^:\t]+me=e-1 contains=outlTags,BT1,BT2,PT1,PT2,TA1,TA2,UT1,UT2,UB1,UB2,spellErr,SpellErrors,BadWord,OL2 keepend +syntax region OL2 start=+^\t[^:\t]+ end=+^\t[^:\t]+me=s-1 contains=outlTags,BT2,BT3,PT2,PT3,TA2,TA3,UT2,UT3,UB2,UB3,spellErr,SpellErrors,BadWord,OL3 keepend +syntax region OL3 start=+^\(\t\)\{2}[^:\t]+ end=+^\(\t\)\{2}[^:\t]+me=e-3 contains=outlTags,BT3,BT4,PT3,PT4,TA3,TA4,UT3,UT4,UB3,UB4,spellErr,SpellErrors,BadWord,OL4 keepend +syntax region OL4 start=+^\(\t\)\{3}[^:\t]+ end=+^\(\t\)\{3}[^:\t]+me=e-4 contains=outlTags,BT4,BT5,PT4,PT5,TA4,TA5,UT4,UT5,UB4,UB5,spellErr,SpellErrors,BadWord,OL5 keepend +syntax region OL5 start=+^\(\t\)\{4}[^:\t]+ end=+^\(\t\)\{4}[^:\t]+me=e-5 contains=outlTags,BT5,BT6,PT5,PT6,TA5,TA6,UT5,UT6,UB5,UB6,spellErr,SpellErrors,BadWord,OL6 keepend +syntax region OL6 start=+^\(\t\)\{5}[^:\t]+ end=+^\(\t\)\{5}[^:\t]+me=e-6 contains=outlTags,BT6,BT7,PT6,PT7,TA6,TA7,UT6,UT7,UB6,UB7,spellErr,SpellErrors,BadWord,OL7 keepend +syntax region OL7 start=+^\(\t\)\{6}[^:\t]+ end=+^\(\t\)\{6}[^:\t]+me=e-7 contains=outlTags,BT7,BT8,PT7,PT8,TA7,TA8,UT7,UT8,UB7,UB8,spellErr,SpellErrors,BadWord,OL8 keepend +syntax region OL8 start=+^\(\t\)\{7}[^:\t]+ end=+^\(\t\)\{7}[^:\t]+me=e-8 contains=outlTags,BT8,BT9,PT8,PT9,TA8,TA9,UT8,UT9,UB8,UB9,spellErr,SpellErrors,BadWord,OL9 keepend +syntax region OL9 start=+^\(\t\)\{8}[^:\t]+ end=+^\(\t\)\{8}[^:\t]+me=e-9 contains=outlTags,BT9,PT9,TA9,UT9,UB9,spellErr,SpellErrors,BadWord keepend + +" Auto-commands {{{1 +if !exists("autocommand_vo_loaded") + let autocommand_vo_loaded = 1 + au BufNewFile,BufRead *.otl setf outliner +" au CursorHold *.otl syn sync fromstart +" set updatetime=500 +endif + +" The End +" vim600: set foldmethod=marker foldlevel=0: diff --git a/pack/acp/start/vimoutliner/vimoutliner/images/Vimoutliner_logo.png b/pack/acp/start/vimoutliner/vimoutliner/images/Vimoutliner_logo.png new file mode 100644 index 0000000..5831d93 Binary files /dev/null and b/pack/acp/start/vimoutliner/vimoutliner/images/Vimoutliner_logo.png differ diff --git a/pack/acp/start/vimoutliner/vimoutliner/images/Vimoutliner_logo_tiny.png b/pack/acp/start/vimoutliner/vimoutliner/images/Vimoutliner_logo_tiny.png new file mode 100644 index 0000000..4c942ad Binary files /dev/null and b/pack/acp/start/vimoutliner/vimoutliner/images/Vimoutliner_logo_tiny.png differ diff --git a/pack/acp/start/vimoutliner/vimoutliner/images/favicon.ico b/pack/acp/start/vimoutliner/vimoutliner/images/favicon.ico new file mode 100644 index 0000000..fd42fab Binary files /dev/null and b/pack/acp/start/vimoutliner/vimoutliner/images/favicon.ico differ diff --git a/pack/acp/start/vimoutliner/vimoutliner/plugin/prev/votl_hoist.otl b/pack/acp/start/vimoutliner/vimoutliner/plugin/prev/votl_hoist.otl new file mode 100644 index 0000000..9b0dd67 --- /dev/null +++ b/pack/acp/start/vimoutliner/vimoutliner/plugin/prev/votl_hoist.otl @@ -0,0 +1,77 @@ +Hoisting +What is it? + : Hoisting is a way to focus on a particular area of an outline. Only the + : offspring from a selected parent will be shown. The offspring are + : left-justified just as if they were the top level headings and had no + : parent. +Installation + The hoist plugin is included in the VimOutliner plugin directory + This plugin is disabled by default + See information in the ~/.vimoutlinerrc on how to enable it + Optionally set the hoistParanoia variable + : If you are really paranoid about loosing your data during shakedown + : of vo_hoist.vim, you can add this to your ~/.vimoutlinerrc file. It + : will prevent VO from automatically removing the temporary hoist + : files. This will have a tendency to hugely increase the number of + : files in your working directory (but if you're paranoid... ;) ) + let g:hoistParanoia = 1 +How do I use it? + Hoisting + : Whenever you open a VO document, hoisting will be available. + Invocation + Place the cursor on the parent to be hoisted + ,,h + You will need to hit to accept some informational messages + You should now see the children of the selected parent ready for editing + Treat this document just like a normal .otl file + De-hoisting + : From within the hoisted document you simply need to quit. The + : hoisted data will be saved in place of the old children. The cursor + : will be returned to the hoisted parent. + Invocation + The :q, :wq, :x and ZZ perform a de-hoist operation + A write will automatically be done to save any changes + Manual De-hoisting + : Should the de-hoisting ever fail or should an operator quit Vim (by + : closing the window with the mouse, say), a manual de-hoisting will + : need to be performed. + You can find a currently hoisted parent by searching for __hoist + Place the cursor on the parent with the __hoist tag + ,,H + The edited, hoisted offspring will replace the current offspring + The __hoist tag will be removed +The Hoist Tag + Example Tag + : The hoist tag is added to a hoisted parent for error recovery. It + : includes a filename, a line number and a timestamp. + Example Tag + __hoist:vo_hoist.46.20030816124249.otl + Tag Components + Tag Marker + __hoist: + Easy search and replace + Filename Prefix + vo_hoist. + Needed to comply with VO standards for file naming + Parent Line Number (at time of hoisting) + 46. + Timestamp + 20030816124249 + YYYYMMDDhhmmss + Filename Suffix + .otl + Duh +The Log Files + : Log files of the hoists are created to aid in error recovery should that + : become necessary. They are created in the same directory as the working + : .otl file. + Log Filename + .vo_hoist..log + Example Log Filename + .vo_hoist.test.otl.log + Contents + There is one line per hoist operation + Each is comprised of a parent with a __hoist tag +Limitations + 1 Level Deep + : Until debug is complete, hoisting is limited to one level. diff --git a/pack/acp/start/vimoutliner/vimoutliner/plugin/prev/votl_hoist.vim b/pack/acp/start/vimoutliner/vimoutliner/plugin/prev/votl_hoist.vim new file mode 100755 index 0000000..c4064d1 --- /dev/null +++ b/pack/acp/start/vimoutliner/vimoutliner/plugin/prev/votl_hoist.vim @@ -0,0 +1,251 @@ +"###################################################################### +"# VimOutliner Hoisting +"# Copyright (C) 2003 by Noel Henson noel@noels-lab.com +"# The file is currently an experimental part of Vim Outliner. +"# +"# This program is free software; you can redistribute it and/or modify +"# it under the terms of the GNU General Public License as published by +"# the Free Software Foundation; either version 2 of the License, or +"# (at your option) any later version. +"# +"# This program is distributed in the hope that it will be useful, +"# but WITHOUT ANY WARRANTY; without even the implied warranty of +"# MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the +"# GNU General Public License for more details. +"###################################################################### + +" Load the plugin {{{1 +" mappings {{{1 +map h :call Hoist(line(".")) +map H :call DeHoistThis(line(".")) +"}}}1 +if exists("g:did_vo_hoist") + finish +endif +if !exists("g:hoistParanoia") + let g:hoistParanoia=0 +endif +let g:did_vo_hoist = 1 +" Functions {{{1 +" RemoveTabsLine(line,tabs) {{{2 +" remove specified number of tabs from the beginning of line +function! RemoveTabsLine(line,tabs) + return substitute(getline(a:line),"^\\(\\t\\)\\{".a:tabs."}", "", "") +endfunction +"}}}2 +" MakeTempFilename(line) {{{2 +" return a string to use as the temporary filename for the hoisted area +function! MakeTempFilename(line) + return "vo_hoist.".a:line.strftime(".%Y%m%d%H%M%S").".otl" +endfunction +"}}}2 +" AddHoistFilename(line) {{{2 +" Add a temporary filename to a parent line to indicate hoisting +function! AddHoistFilename(line) + let l:newparent = getline(a:line)." __hoist:".MakeTempFilename(a:line) + call setline(a:line,l:newparent) +endfunction +"}}}2 +"}}}2 +" DeleteHoistFilename(line) {{{2 +" Delete a temporary filename from a parent line +function! DeleteHoistFilename(line) + call setline(a:line,substitute(getline(a:line)," __hoist:.*","","")) +endfunction +"}}}2 +" ExtractHoistFilename(line) {{{2 +" Extract a filename from a hoisted parent +function! ExtractHoistFilename(line) + return substitute(getline(a:line),".* __hoist:","","") +endfunction +"}}}2 +" IsParent(line) {{{2 +" Return 1 if this line is a parent +function! IsParent(line) + return (Ind(a:line)+1) == Ind(a:line+1) +endfunction +"}}}2 +" IsHoistedParent(line) {{{2 +" Return 1 if this line is a parent with hoisted children +function! IsHoistParent(line) + return match(getline(a:line)," __hoist:","") != -1 +endfunction +"}}}2 +" FindParent(line) {{{2 +" Return line if parent, parent line if not +function! FindParent(line) + if IsParent(a:line) + return a:line + else + let l:parentindent = Ind(a:line)-1 + let l:searchline = a:line + while (Ind(l:searchline) != l:parentindent) && (l:searchline > 0) + let l:searchline = l:searchline-1 + endwhile + return l:searchline + endif +endfunction +"}}}2 +" FindLastChild(line) {{{2 +" Return the line number of the last descendent of parent line +function! FindLastChild(line) + let l:parentindent = Ind(a:line) + let l:searchline = a:line+1 + while Ind(l:searchline) > l:parentindent + let l:searchline = l:searchline+1 + endwhile + return l:searchline-1 +endfunction +"}}}2 +"}}}2 +" Hoist(line) {{{2 +" Write the offspring of a parent to a new file, open it and remove the +" leading tabs. +function! Hoist(line) + let l:parent = FindParent(a:line) + if l:parent == 0 + return + endif + call cursor(l:parent,1) + let l:firstline = l:parent+1 + let l:childindent = Ind(l:firstline) + let l:lastline = FindLastChild(l:parent) + let l:filename = MakeTempFilename(l:parent) + echo l:firstline.",".l:lastline."w! ".l:filename + let l:folded = foldclosed(l:parent) + call cursor(l:parent,1) + normal zo + exe l:firstline.",".l:lastline."w! ".l:filename + call AddHoistFilename(l:parent) + silent write + " log what we did in case we need to recover manually + let l:doit = l:parent."write! >> .vo_hoist.".bufname(bufnr("%")).".log" + exe l:doit + let l:parentbuffer = bufnr("%") + "WARNING: switching files + let l:doit = "silent e +%s/^\\\\(\\\t\\\\)\\\\{" + let l:doit = l:doit.l:childindent."}// ".l:filename." | " + let l:doit = l:doit."let b:myParentBuffer = ".l:parentbuffer." | " + let l:doit = l:doit."let b:myParentLine = ".l:parent." | " + let l:doit = l:doit."call cursor(1,1)|" + let l:doit = l:doit."let b:hoisted = 1" + exe l:doit + silent write +endfunction +"}}}2 +" DeleteChildren(line) {{{2 +" Delete the existing offspring of a parent +function! DeleteChildren(line) + let l:parent = FindParent(a:line) + let l:firstline = l:parent+1 + let l:lastline = FindLastChild(l:parent) + exe l:firstline.",".l:lastline."d" +endfunction +"}}}2 +" MakeTabString(n) {{{2 +" Return a string of n tabs +function! MakeTabString(n) + let l:string = "" + let l:i = 0 + while l:i < a:n + let l:string = l:string."\t" + let l:i = l:i +1 + endwhile + return l:string +endfunction +"}}}2 +" AddChildren(line) {{{2 +" Add left-justified children to parent. The filename is extracted from the +" end of the parent line. The parent is assumed to have no children at this +" point. +function! AddChildren(line) + let l:filename = ExtractHoistFilename(a:line) + if filereadable(l:filename) == 1 + if a:line == line("$") + exe "read ".l:filename + if a:line != line("$") + exe a:line+1.",$"." s/^/".MakeTabString(Ind(a:line)+1)."/" + endif + else + exe a:line+1."ma v" + call cursor(a:line,1) + exe "read ".l:filename + if a:line+1 != line("'v") + exe a:line+1.",'v-1"." s/^/".MakeTabString(Ind(a:line)+1)."/" + endif + endif + endif +endfunction +"}}}2 +" DeleteHoistFile(line) {{{2 +" Delete a temporary filename from a parent line +function! DeleteHoistFile(line) + if g:hoistParanoia + return + endif + let l:filename = ExtractHoistFilename(a:line) + call delete(l:filename) + let l:filename = l:filename."~" + call delete(l:filename) +endfunction +"}}}2 +" DeHoistThis(line) {{{2 +" Remove the old children, add the new children and remove the __hoist data +" leading tabs from this file. +function! DeHoistThis(line) + let l:parent = FindParent(a:line) + let l:folded = foldclosed(l:parent) + call cursor(l:parent,1) + if l:folded == l:parent + normal zo + endif + call DeleteChildren(l:parent) + call AddChildren(l:parent) + call DeleteHoistFile(l:parent) + call DeleteHoistFilename(l:parent) + if l:folded == l:parent + normal zc + endif +endfunction +"}}}2 +" DeHoist() {{{2 +" Remove the old children, add the new children and remove the __hoist data +" leading tabs from the calling file. +function! DeHoist() + silent write + if bufexists(b:myParentBuffer) == 0 + return + endif + let l:myParentBuffer = b:myParentBuffer + let l:myParentLine = b:myParentLine + bdelete + " Warning switching files + exe "buffer ".l:myParentBuffer + call cursor(l:myParentLine,1) + let l:parent = FindParent(l:myParentLine) + let l:folded = foldclosed(l:parent) + call cursor(l:parent,1) +" if l:folded == l:parent +" normal zo +" endif + normal zv + silent call DeleteChildren(l:parent) + silent call AddChildren(l:parent) + silent call DeleteHoistFile(l:parent) + silent call DeleteHoistFilename(l:parent) + if l:folded == l:parent + call cursor(l:parent,1) + normal zc + endif + silent write +endfunction +"}}}2 +"}}}1 +" Autocommands {{{1 + au BufReadPost vo_hoist.*.otl cmap wq call DeHoist() + au BufReadPost vo_hoist.*.otl cmap qa call DeHoist() + au BufReadPost vo_hoist.*.otl cmap q call DeHoist() + au BufReadPost vo_hoist.*.otl cmap x call DeHoist() + au BufReadPost vo_hoist.*.otl nmap ZZ :call DeHoist() +"}}}1 +" vim600: set foldlevel=0 foldmethod=marker: diff --git a/pack/acp/start/vimoutliner/vimoutliner/plugin/votl_checkbox.otl b/pack/acp/start/vimoutliner/vimoutliner/plugin/votl_checkbox.otl new file mode 100644 index 0000000..0a135b4 --- /dev/null +++ b/pack/acp/start/vimoutliner/vimoutliner/plugin/votl_checkbox.otl @@ -0,0 +1,310 @@ +Checkboxes: votl_checkbox +What is it? + : Checkboxes is a plugin for project, task and list managment. It add an + : understanding of check boxes and percentage of task completion to Vim + : Outliner. It adds just three tags and six commands. +Installation + This should already be included in your Vim Outliner package + The newest, stable version is included with this package in the plugin directory + The pluging is already enabled in your ~/.vimoutlinerrc +Tag Syntax + [_] an unchecked item or incomplete task + [X] a checked item or complete task + [-] a canceled item - removes this item/branch from completion calculations + % a placeholder for percentage of completion + n% a percentage of completion, used in calculating parent completion + n%w a percentage with a weighting factor - e.g.: 10%2 + [tag] a tag than can be replaced from a list of tags + [tag] also the default tag name - will be replaced by tag[0] of tag list[0] + [tag] [tag] tags must be separated by whitespace +Example g:cbTags (put in .vimoutlinerrc) + let g:cbTags = [ + \ ['TODO','FEEDBACK','VERIFY','DELEGATED','HOLDING'] + \,['Feature','Enhancement','Bug'] + \,['Low','Normal','High','URGENT'] + \,['Home','Lab','Work','Shopping'] + \] +Checkbox Commands + : The default for VimOutliner is ,, so we will use this + : leader in the command discussions. + ,,cb Create a check box + : This works for the current heading or selected range of lines + : including folds. Visual selection of the range of headings works + : nicely. This command is currently not aware of body text. This + : limited awareness needs to be fixed before this plugin can be + : included in the standard Vim Outliner plugins. + ,,cB Create a check box (even if one exists) + ,,c% Create a checkbox and % symbol + : This works just like ,,cb but add a % symbol for use in completion + : calculations. + ,,cp Create a checkbox and % symbol + : This works just like ,,cb but add a % symbol for use in completion + : calculations; even on childless headings. + ,,cx Change check box state + : If there is a checkbox on the line the cursor is on, change its + : state. If it's checked, uncheck it and vice-versa. Then recompute + : the completion of the entire branch starting from the root parent. + ,,cd Delete a checkbox + : Delete the left-most check box on the selected heading(s). + ,,cz Compute completion + : Starting at the heading the cursor is on, recursively compute the + : completion level of all sub-headings. + ,,c1 Set completion to 10% + : Set the completion to 10%, if a percentage already exists. + ,,c2 Set completion to 20% + : Set the completion to 20%, if a percentage already exists. + ,,c3 Set completion to 30% + : Set the completion to 30%, if a percentage already exists. + ,,c4 Set completion to 40% + : Set the completion to 40%, if a percentage already exists. + ,,c5 Set completion to 50% + : Set the completion to 50%, if a percentage already exists. + ,,c6 Set completion to 60% + : Set the completion to 60%, if a percentage already exists. + ,,c7 Set completion to 70% + : Set the completion to 70%, if a percentage already exists. + ,,c8 Set completion to 80% + : Set the completion to 80%, if a percentage already exists. + ,,c9 Set completion to 90% + : Set the completion to 90%, if a percentage already exists. + ,,c+ Increment the completion by 10% + : Increment the completion by 10%, if a percentage already exists. + ,,c- Decrement the completion by 10% + : Decrement the completion by 10%, if a percentage already exists. + ,,ct Set tag to next tag in current tag list + : Set the tag under the cursor to the next tag in the list that + : contains the current tag. This command is not mapped if g:cbTags + : does not exist. + ,,cT Set tag to next tag list + : Set the tag under the cursor to the first tag in the next tag list. + : This command is not mapped if g:cbTags does not exist. +How do I use it? + Start with a simple example + : Let's start with planning a small party; say a barbeque. + Make the initial outline + Barbeque + Guests + Bill and Barb + Larry and Louise + Marty and Mary + Food + Chicken + Ribs + Corn on the cob + Beverages + Soda + Iced Tea + Beer + Party Favors + Squirt guns + Hats + Name tags + Materials + Paper Plates + Napkins + Trash Containers + Add the check boxes + : This can be done by visually selecting them and typing ,,cb. + : When done, you should see this: + [_] Barbeque + [_] Guests + [_] Bill and Barb + [_] Larry and Louise + [_] Marty and Mary + [_] Food + [_] Chicken + [_] Ribs + [_] Corn on the cob + [_] Beverages + [_] Soda + [_] Iced Tea + [_] Beer + [_] Party Favors + [_] Squirt guns + [_] Hats + [_] Name tags + [_] Materials + [_] Paper Plates + [_] Napkins + [_] Trash Containers + Now check off what's done + : Checking off what is complete is easy with the ,,cx command. + : Just place the cursor on a heading and ,,cx it. Now you can see + : what's done as long as the outline is fully expanded. + [_] Barbeque + [X] Guests + [X] Bill and Barb + [X] Larry and Louise + [X] Marty and Mary + [_] Food + [X] Chicken + [X] Ribs + [_] Corn on the cob + [_] Beverages + [_] Soda + [X] Iced Tea + [X] Beer + [_] Party Favors + [_] Squirt guns + [_] Hats + [_] Name tags + [_] Materials + [X] Paper Plates + [_] Napkins + [X] Trash Containers + Getting more advanced + Now summarize what's done + : You can summarize what is done with the ,,cz command. Place the + : cursor on the 'Barbeque' heading and ,,cz it. The command will + : recursively process the outline and update the check boxes of + : the parent headlines. You should see: + : (Note: the only change is on the 'Guests' heading. It changed + : because all of its children are complete.) + [_] Barbeque + [X] Guests + [X] Bill and Barb + [X] Larry and Louise + [X] Marty and Mary + [_] Food + [X] Chicken + [X] Ribs + [_] Corn on the cob + [_] Beverages + [_] Soda + [X] Iced Tea + [X] Beer + [_] Party Favors + [_] Squirt guns + [_] Hats + [_] Name tags + [_] Materials + [X] Paper Plates + [_] Napkins + [X] Trash Containers + Add percentages for a better view + : You can get a much better view of what's going on, especially + : with collapsed headings, if you add percentages. Place a 0% on + : each heading that has children like this: + [_] 59% Barbeque + [X] 100% Guests + [X] Bill and Barb + [X] Larry and Louise + [X] Marty and Mary + [_] 66% Food + [X] Chicken + [X] Ribs + [_] Corn on the cob + [_] 66% Beverages + [_] Soda + [X] Iced Tea + [X] Beer + [_] 0% Party Favors + [_] Squirt guns + [_] Hats + [_] Name tags + [_] 66% Materials + [X] Paper Plates + [_] Napkins + [X] Trash Containers + Now compute the percentage of completion + : After adding the 0% symbols, place the cursor on the 'Barbeque' + : heading and execute ,,cz as before. Keep in mind that the + : recursive percentages are weighted. You should see: + [_] 59% Barbeque + [X] 100% Guests + [X] Bill and Barb + [X] Larry and Louise + [X] Marty and Mary + [_] 66% Food + [X] Chicken + [X] Ribs + [_] Corn on the cob + [_] 66% Beverages + [_] Soda + [X] Iced Tea + [X] Beer + [_] 0% Party Favors + [_] Squirt guns + [_] Hats + [_] Name tags + [_] 66% Materials + [X] Paper Plates + [_] Napkins + [X] Trash Containers + Complete a few more just for fun + : Mark Salad and Soda and recompute with ,,cz and you should + : see the ouline below. + : + : Try playng around with zc and zo to see the effects of opening + : and closing folds. Even if you place the cursor on 'Barbeque' + : and zo it, you still have a good understanding of how complete + : the project is. + [_] 66% Barbeque + [X] 100% Guests + [X] Bill and Barb + [X] Larry and Louise + [X] Marty and Mary + [_] 66% Food + [X] Chicken + [X] Ribs + [_] Corn on the cob + [X] 100% Beverages + [X] Soda + [X] Iced Tea + [X] Beer + [_] 0% Party Favors + [_] Squirt guns + [_] Hats + [_] Name tags + [_] 66% Materials + [X] Paper Plates + [_] Napkins + [X] Trash Containers + Getting way more advanced + Weighted Tasks + Here is a simple outline to track a project + [_] 22% Garage Upgrade + [_] 66% Clean out old junk + [X] 100% empty garage + [X] 100% sort junk + [_] 0% dispose of junk + [_] 0% Build Shelves + [_] 0% Oranize Junk + [_] 0% oranize saved junk + [_] 0% put junk on shelves + What if some tasks take more effort? + : Assume that you know that it will take twice as long to sort + : junk as it does to remove it from the garage or to dispose + : of it. This can be represented with weights. Notice the + : completion percentage of 'Clean out old junk' once a weight + : has been added. Each percentage can be weighted. + [_] 25% Garage Upgrade + [_] 75% Clean out old junk + [X] 100% empty garage + [X] 100%2 sort junk + [_] 0% dispose of junk + [_] 0% Build Shelves + [_] 0% Oranize Junk + [_] 0% oranize saved junk + [_] 0% put junk on shelves + Complex weighting + [_] 83% Garage Upgrade + [_] 75%2 Clean out old junk + [X] 100% empty garage + [X] 100%2 sort junk + [_] 0% dispose of junk + [X] 100%2 Build Shelves + [_] 66% Oranize Junk + [X] 100%2 oranize saved junk + [_] 0% put junk on shelves + Tags: Add more information to a heading + : Additional information and workflow information can easily + : be added to headings with tags. The command ,,ct can be used + : to cycle a tag among it sibling tags in g:cbTags. ,,cT can + : be be used to cycle a tag to a different list of sibling + : tags. + My Software Project + [_] 33% To Do + [X] Misspellings in documention [Bug] [High] + [_] Installation infects all networked systems with app [Feature] [Normal] + [_] Clean garage [Low] [@Home] diff --git a/pack/acp/start/vimoutliner/vimoutliner/plugin/votl_checkbox.vim b/pack/acp/start/vimoutliner/vimoutliner/plugin/votl_checkbox.vim new file mode 100755 index 0000000..e97ae57 --- /dev/null +++ b/pack/acp/start/vimoutliner/vimoutliner/plugin/votl_checkbox.vim @@ -0,0 +1,475 @@ +"###################################################################### +"# VimOutliner Checkboxes +"# Copyright (C) 2003 by Noel Henson noel@noels-lab.com +"# The file is currently an experimental part of Vim Outliner. +"# +"# This program is free software; you can redistribute it and/or modify +"# it under the terms of the GNU General Public License as published by +"# the Free Software Foundation; either version 2 of the License, or +"# (at your option) any later version. +"# +"# This program is distributed in the hope that it will be useful, +"# but WITHOUT ANY WARRANTY; without even the implied warranty of +"# MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the +"# GNU General Public License for more details. +"###################################################################### + +" mappings {{{1 +" insert a chechbox +noremap cb :call SafelyInsertCheckBox() +noremap c% :call SafelyInsertCheckBoxPercent() +noremap cp :call SafelyInsertCheckBoxPercentAlways() +noremap cB :call InsertCheckBox() + +" delete a chechbox +noremap cd :call DeleteCheckbox() + +" switch the status of the box and adjust percentages +if !exists('g:vo_checkbox_fast_calc') || g:vo_checkbox_fast_calc == 1 + " Use new and faster method + noremap cx :call SwitchBox() call CalculateMyBranch(line(".")) + noremap c+ :call IncPercent(".") call CalculateMyBranch(line(".")) + noremap c- :call DecPercent(".") call CalculateMyBranch(line(".")) + noremap c1 :call SetPercent(".",10)call CalculateMyBranch(line('.')) + noremap c2 :call SetPercent(".",20)call CalculateMyBranch(line('.')) + noremap c3 :call SetPercent(".",30)call CalculateMyBranch(line('.')) + noremap c4 :call SetPercent(".",40)call CalculateMyBranch(line('.')) + noremap c5 :call SetPercent(".",50)call CalculateMyBranch(line('.')) + noremap c6 :call SetPercent(".",60)call CalculateMyBranch(line('.')) + noremap c7 :call SetPercent(".",70)call CalculateMyBranch(line('.')) + noremap c8 :call SetPercent(".",80)call CalculateMyBranch(line('.')) + noremap c9 :call SetPercent(".",90)call CalculateMyBranch(line('.')) +else + " Use the old method + noremap cx :call SwitchBox() call NewHMD(FindRootParent(line("."))) + noremap c+ :call IncPercent(".") call NewHMD(FindRootParent(line("."))) + noremap c- :call DecPercent(".") call NewHMD(FindRootParent(line("."))) + noremap c1 :call SetPercent(".",10)call NewHMD(FindRootParent(line("."))) + noremap c2 :call SetPercent(".",20)call NewHMD(FindRootParent(line("."))) + noremap c3 :call SetPercent(".",30)call NewHMD(FindRootParent(line("."))) + noremap c4 :call SetPercent(".",40)call NewHMD(FindRootParent(line("."))) + noremap c5 :call SetPercent(".",50)call NewHMD(FindRootParent(line("."))) + noremap c6 :call SetPercent(".",60)call NewHMD(FindRootParent(line("."))) + noremap c7 :call SetPercent(".",70)call NewHMD(FindRootParent(line("."))) + noremap c8 :call SetPercent(".",80)call NewHMD(FindRootParent(line("."))) + noremap c9 :call SetPercent(".",90)call NewHMD(FindRootParent(line("."))) +endif + +" calculate the proportion of work done on the subtree +noremap cz :call NewHMD(FindRootParent(line("."))) + +" tag list key mappings +if exists("g:cbTags") + noremap ct :call SetNextTag() + noremap cT :call SetNextList() +endif + +"}}}1 +" Load guard for functions {{{1 +if exists('s:loaded') + finish +endif +let s:loaded = 1 + +" InsertCheckBox() {{{1 +" Insert a checkbox at the beginning of a header without disturbing the +" current folding. +function! InsertCheckBox() + let @x = "[_] " + normal! ^"xP +endfunction +"}}}1 +" Safely InsertCheckBox() {{{1 +" Insert a checkbox at the beginning of a header without disturbing the +" current folding only if there is no checkbox already. +function! SafelyInsertCheckBox() + if match(getline("."),"^\t\t*\[<>:;|\]") != -1 + return + endif + if match(getline("."),"[\[X_\]]") == -1 + let @x = "[_] " + normal! ^"xP + endif +endfunction +"}}}1 +" Safely InsertCheckBoxPercent() {{{1 +" Insert a checkbox and % sign at the beginning of a header without disturbing +" the current folding only if there is no checkbox already. +function! SafelyInsertCheckBoxPercent() + if match(getline("."),"^\t\t*\[<>:;|\]") != -1 + return + endif + if match(getline("."), "[\[X_\]]") == -1 + if Ind(line(".")+1) > Ind(line(".")) + let @x = "[_] % " + else + let @x = "[_] " + endif + normal! ^"xP + endif +endfunction +"}}}1 +" Safely InsertCheckBoxPercentAlways() {{{1 +" Insert a checkbox and % sign at the beginning of a header without disturbing +" the current folding only if there is no checkbox already. Include the +" checkbox even on childless headings. +function! SafelyInsertCheckBoxPercentAlways() + if match(getline("."),"^\t\t*\[<>:;|\]") != -1 + return + endif + if match(getline("."), "[\[X_\]]") == -1 + let @x = "[_] % " + normal! ^"xP + endif +endfunction +"}}}1 +" SetBox(char) {{{1 +" Switch the state of the checkbox on the current line. +function! SetBox(char) + substitute/\[.\]/\="[".expand(a:char)."]"/ + if a:char == 'X' + call SetPercent(".",100) + elseif a:char == '_' + call SetPercent(".",0) + endif +endfunction + +"}}}1 +" SwitchBox() {{{1 +" Switch the state of the checkbox on the current line. +function! SwitchBox() + let l:line = getline(".") + let questa = strridx(l:line,"[_]") + let questb = strridx(l:line,"[X]") + if (questa != -1) || (questb != -1) + if (questa != -1) + call SetBox('X') + else + call SetBox('_') + endif + endif +endfunction +"}}}1 +" DeleteCheckbox() {{{1 +" Delete a checkbox if one exists +function! DeleteCheckbox() + let questa = strridx(getline("."),"[_]") + let questb = strridx(getline("."),"[X]") + if (questa != -1) || (questb != -1) + if (questa != -1) + substitute/\(^\s*\)\[_\] \(.*\)/\1\2/ + else + substitute/\(^\s*\)\[X\] \(.*\)/\1\2/ + endif + endif +endfunction +"}}}1 +" Ind(line) {{{1 +" Return the index of the line. +" Remove it when using the new version of VO +function! Ind(line) + return indent(a:line) / &tabstop +endf +" FindMyParent(line) {{{1 +" returns the line number of the parent of the current node +function! FindMyParent(line) + let l:mylevel = Ind(a:line) + if l:mylevel == 0 + return (a:line) + endif + let l:i = a:line + while Ind(l:i) >= l:mylevel + let l:i -= 1 + endwhile + return l:i +endf + +" FindRootParent(line) {{{1 +" returns the line number of the root parent for any child +function! FindRootParent(line) + if Ind(a:line) == 0 + return (a:line) + endif + let l:i = a:line + while l:i > 1 && Ind(l:i) > 0 + let l:i = l:i - 1 + endwhile + return l:i +endf + +" LimitPercent(percent) {{{1 +" Limits percentage values to between 0 and 100 +function! LimitPercent(val) + if a:val > 100 + return 100 + elseif a:val < 0 + return 0 + else + return a:val + endif +endf + +" GetPercent(line) {{{1 +" Get the percent complete from a line +function! GetPercent(line) + let l:proportion = 0 + let mbegin=match(getline(a:line), " [0-9]*%") + if mbegin + let mend=matchend(getline(a:line), " [0-9]*%") + let l:proportion=getline(a:line)[mbegin+1 : mend-1] + let l:proportion=str2nr(l:proportion) + endif + return l:proportion +endf + +" SetPercent(line,proportion) {{{1 +" Set the percent complete for a line +function! SetPercent(line,proportion) + let mbegin=match(getline(a:line), " [0-9]*%") + if mbegin + call setline(a:line,substitute(getline(a:line)," [0-9]*%"," ".a:proportion."%","")) + endif +endf + +" IncPercent(line) {{{1 +" Increments the percent doneness by 10% +function! IncPercent(line) + if match(getline(a:line), " [0-9]*%") + call SetPercent(a:line,LimitPercent(GetPercent(a:line)+10)) + endif +endf + +" DecPercent(line) {{{1 +" Decrements the percent doneness by 10% +function! DecPercent(line) + if match(getline(a:line), " [0-9]*%") + let l:percent = GetPercent(a:line) + call setline(a:line,substitute(getline(a:line),"\\[X\\]","[_]","")) + call SetPercent(a:line,LimitPercent(l:percent-10)) + endif +endf + +" ComputePW(line,count,done) {{{1 +" Computes proportion and weight of a node +" Returns (proportion,weight) proportion could be a flag of -1 +function! ComputePW(line,count,done) + let l:proportion=0 + let l:haspercent = 0 + " get the percent + let mbegin=match(getline(a:line), " [0-9]*%") + if mbegin != -1 + let l:haspercent = 1 + let mend=matchend(getline(a:line), " [0-9]*%") + let l:proportion=str2nr(getline(a:line)[mbegin+1 : mend-1]) + endif + " get the weight + let l:weight=1 + let mbegin=match(getline(a:line), "%[0-9]\\+") + if mbegin != -1 + let mend=matchend(getline(a:line), "%[0-9]\\+\s") + let l:weight=str2nr(getline(a:line)[mbegin+1 : mend-1]) + endif + " compute the proportion + if a:count>0 + let l:proportion = ((a:done*100)/a:count)/100 + elseif match(getline(a:line),"\\[X\\]") != -1 + let l:proportion = 100 + elseif match(getline(a:line),"\\[-\\]") != -1 + let l:weight = 0 + endif + " update non-ignored items + let l:questa = strridx(getline(a:line),"[-]") + if l:questa == -1 + call setline(a:line,substitute(getline(a:line)," [0-9]*%"," ".l:proportion."%","")) + endif + " Limit proportion to 0 or 100 if there is not a percentage sign + if !haspercent && (!exists('g:vo_checkbox_fast_calc') || g:vo_checkbox_fast_calc == 1) + let l:proportion = l:proportion == 100 ? l:proportion : 0 + endif + " update the completion + if l:questa != -1 + return [100,l:weight] + elseif l:proportion == 100 + call setline(a:line,substitute(getline(a:line),"\\[_\\]","[X]","")) + return [100,l:weight] + elseif l:proportion == 0 && a:count == 0 + if match(getline(a:line),"\\[X\\]") != -1 + return [100,l:weight] + elseif match(getline(a:line),"\\[_\\]") != -1 + return [0,l:weight] + else + return [-1,l:weight] + endif + else + call setline(a:line,substitute(getline(a:line),"\\[X\\]","[_]","")) + return [l:proportion,l:weight] + endif +endf + +" CalculateMyChildren(line) {{{1 +" Calculates percent completion only on the immediate children of the +" parent specified by line. +function! CalculateMyChildren(line) + let l:done = 0 + let l:count = 0 + let l:line = a:line + 1 + let l:mylevel = Ind(a:line) + let l:childlevel = l:mylevel+1 + while l:mylevel < Ind(l:line) " I have children + if l:childlevel == Ind(l:line) + let l:childstat = ComputePW(l:line,0,0) + let l:childdoneness = l:childstat[0] * l:childstat[1] + if l:childdoneness >= 0 + let l:done += l:childdoneness + let l:count += l:childstat[1] + endif + endif + let l:line += 1 + endwhile + return ComputePW(a:line,l:count,l:done) " returns with (proportion,weight) +endf + +" CalculateMyBranch(line) {{{1 +" Calculate from the leaf, up unlke NewHMD +function! CalculateMyBranch(line) + call NewHMD(a:line) " compute and adjust my children, if I have any + let l:line = a:line + while Ind(l:line) > 0 + let l:line = FindMyParent(l:line) + call CalculateMyChildren(l:line) + endwhile +endf + +" NewHMD(line) {{{1 +" (New How Many Done) +" Calculates proportion of already done work in the subtree +" Recursive, but slow because it computes an entire branch of an outline +" from level 1. +" Returns (proportion,weight) proportion could be a flag of -1 +function! NewHMD(line) + let l:done = 0 + let l:count = 0 + let l:line = a:line+1 + let l:mylevel = Ind(a:line) + let l:childlevel = l:mylevel+1 + while l:mylevel < Ind(l:line) " I have children + if l:childlevel == Ind(l:line) + let l:childstat = NewHMD(l:line) + let l:childdoneness = l:childstat[0] * l:childstat[1] + if l:childdoneness >= 0 + let l:done += l:childdoneness + let l:count += l:childstat[1] + endif + endif + let l:line += 1 + endwhile + return ComputePW(a:line,l:count,l:done) " returns with (proportion,weight) +endf + +" Experimental Heading Tags {{{1 + +if !exists('g:cbTags') + finish +endif + +" GetTag() {{{2 +" return the tag word under the cursor +function! GetTag() + let word = expand("") + if word[0] == '[' && word[-1:] == ']' + return word[1:-2] + endif + return "" +endfunction + +" WhereInLists(word) {{{2 +" return a single-entry list with a pair of values [listIndex,tagIndex] +" return -1,-1 if tag word not found +function! WhereInLists(word) + let lidx = 0 + for list in g:cbTags + let tidx = index(list,a:word) + if tidx >= 0 + return [lidx,tidx] + endif + let lidx += 1 + endfor + return [-1,-1] +endfunction + +" NextTagIdx(lidx,tidx) {{{2 +" return the index of the next tag in the current list +function! NextTagIdx(lidx,tidx) + if a:tidx >= 0 + let llen = len(g:cbTags[a:lidx]) + let tidx = (a:tidx + 1)%llen + endif + return tidx +endfunction + +" GetNextTag(word) {{{2 +" return the next tag word (from a:word) in the list +function! GetNextTag(word) + if a:word == 'tag' + return g:cbTags[0][0] + endif + let liti = WhereInLists(a:word) + if liti[1] == -1 + return "" + endif + let liti[1] = NextTagIdx(liti[0],liti[1]) + let nextword = g:cbTags[liti[0]][liti[1]] + return nextword +endfunction + +" SetNextTag() {{{2 +" set the current tag to the next tag in the same list +" this is circular, the last tag will roll to the first tag +function! SetNextTag() + let oldtag = GetTag() + let newtag = GetNextTag(oldtag) + if newtag == "" + return + endif + let sub = "normal!ci[".newtag + exec sub +endfunction + +" NextListIdx(lidx) {{{2 +" return the index of the next list +function! NextListIdx(lidx) + if a:lidx >= 0 + let llen = len(g:cbTags) + let lidx = (a:lidx + 1)%llen + endif + return lidx +endfunction + +" GetNextList(word) {{{2 +" return the next tag word (from a:word) in the list +function! GetNextList(word) + if a:word == 'tag' + return g:cbTags[0][0] + endif + let liti = WhereInLists(a:word) + if liti[1] == -1 + return "" + endif + let liti[0] = NextListIdx(liti[0]) + let nextword = g:cbTags[liti[0]][0] + return nextword +endfunction + +" SetNextList() {{{2 +" set the current tag to the first tag in the next list +" this is circular, the last list will roll to the first list +function! SetNextList() + let oldtag = GetTag() + let newtag = GetNextList(oldtag) + if newtag == "" + return + endif + let sub = "normal!ci[".newtag + exec sub +endfunction +" vim600: set foldlevel=0 foldmethod=marker: diff --git a/pack/acp/start/vimoutliner/vimoutliner/plugin/votl_clock.vim b/pack/acp/start/vimoutliner/vimoutliner/plugin/votl_clock.vim new file mode 100644 index 0000000..fe16968 --- /dev/null +++ b/pack/acp/start/vimoutliner/vimoutliner/plugin/votl_clock.vim @@ -0,0 +1,139 @@ +"###################################################################### +"# VimOutliner Clock +"# Copyright (C) 2011 by Daniel Carl +"# The file is currently an experimental part of Vim Outliner. +"# +"# This program is free software; you can redistribute it and/or modify +"# it under the terms of the GNU General Public License as published by +"# the Free Software Foundation; either version 2 of the License, or +"# (at your option) any later version. +"# +"# This program is distributed in the hope that it will be useful, +"# but WITHOUT ANY WARRANTY; without even the implied warranty of +"# MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the +"# GNU General Public License for more details. +"###################################################################### +" Shortlog{{{1 +" +" This plugin of vimoutliner allow the simple tracking of times and the +" calculation of them in seconds, minutes, hours or days +" Exmaple : +" May -> 64.75 h +" Working time week 51 -> 46.00 h +" Working time week 52 -> 18.75 h +" 2010-05-03 [08:00:00 -- 17:45:00] -> 9.75 h +" 2010-05-04 [09:00:00 -- 18:00:00] -> 9.00 h +" +" TODO: Use better date calculation to track also time around 00:00 +" [23:00:00 -- 03:00:00] that will at the time lead to negative +" hours. +" TODO: change the clocking format so that times over several days could +" be calculated - [2010-05-03 08:00:00 -- 2010-05-23 26:30:45] or +" a shorter dateformat - this seems to need a more complex +" datehandling +" TODO: write a helppage for the vimoutliner that describes the votd_clock +" TODO: allow the user to select his own dateformat +"}}}1 +" ClockStart(space) {{{1 +" Insert a space, then the datetime. +function! ClockStart(space) + let @x = "" + if a:space == 1 + let @x = " " + endif + let @x = @x . strftime("%Y-%m-%d [%T -- %T] ->") + normal! "xp +endfunction +"}}}1 +" ClockStop() {{{1 +" Insert a space, then the datetime. +function! ClockStop() + if match(getline("."), "\\[.* -- .*\\]\\s*-\>") != -1 + call setline(".",substitute(getline(".")," -- .*]\\s*-\>"," -- ".strftime("%T] ->"),"")) + endif +endfunction +"}}}1 +" CalculateSeconds(str) {{{1 +" Calculates the seconds between the start and the end time. +function! CalculateSeconds(str) + let l:parts = split(a:str,"\ --\ ") + let l:startparts = split(l:parts[0],":") + let l:endparts = split(l:parts[1],":") + + let l:seconds = (str2nr(l:endparts[2]) - str2nr(l:startparts[2])) + let l:seconds = (str2nr(l:endparts[1]) - str2nr(l:startparts[1])) * 60 + l:seconds + let l:seconds = (str2nr(l:endparts[0]) - str2nr(l:startparts[0])) * 3600 + l:seconds + return l:seconds +endfunction +" }}}1 +" CalculateDuration() {{{1 +" insert date time +function! CalculateDuration(line) + let l:seconds=0 + let l:count=0 + let l:i = 1 + while Ind(a:line) < Ind(a:line+l:i) + if (Ind(a:line)+1) == (Ind(a:line+l:i)) + let l:childseconds = CalculateDuration(a:line+l:i) + if l:childseconds >= 0 + let l:seconds = l:seconds + l:childseconds + let l:count = l:count+1 + endif + endif + let l:i = l:i+1 + endwhile + + " if no childs found calculate the seconds for the line + let l:lineString = getline(a:line) + if match(l:lineString,"\\s*-\>") != -1 + let l:times = matchstr(l:lineString,"\\[.* -- .*\\]\\s*-\>") + if l:times != "" + " calculate the real time difference + let l:seconds = CalculateSeconds(substitute(l:times,"\\[\\(.*\\)\\]","\\1","")) + endif + " don't add summarized time to text lines + if match(l:lineString,"^\t*[;:<>]") == -1 + if match(l:lineString," -\> [0-9 .]*s") != -1 + call setline(a:line,substitute(l:lineString," -\>.*s"," -> ".l:seconds." s","")) + elseif match(getline(a:line)," -\> [0-9 .]*m") != -1 + call setline(a:line,substitute(l:lineString," -\>.*m"," -> ".printf("%.2f",l:seconds/60.0)." m","")) + elseif match(getline(a:line)," -\> [0-9 .]*d") != -1 + call setline(a:line,substitute(l:lineString," -\>.*"," -> ".printf("%.2f",(l:seconds/86400.0))." d","")) + else + call setline(a:line,substitute(l:lineString," -\>.*"," -> ".printf("%.2f",(l:seconds/3600.0))." h","")) + endif + endif + " else + " return -1 + endif + return l:seconds +endf +"}}}1 +" FindRootParent(line) {{{1 +" returns the line number of the root parent for any child +function! FindRootParent(line) + if Ind(a:line) == 0 + return (a:line) + endif + let l:i = a:line + while l:i > 1 && Ind(l:i) > 0 + let l:i = l:i - 1 + endwhile + return l:i +endf +"}}}1 +" UpdateTimes() {{{1 +" initiates the update of all times in the tree where the cursur is located +function! UpdateTimes() + call CalculateDuration(FindRootParent(line("."))) +endf +"}}}1 +" Mappings {{{1 +nmap cs $:call ClockStart(1) +imap cs ~x:call ClockStart(0)a +nmap cS $:call ClockStop():call UpdateTimes() +imap cS ~x:call ClockStop():call UpdateTimes()i +nmap cu $:call UpdateTimes() +"}}}1 +" The End +" vim600: set foldmethod=marker foldlevel=0: diff --git a/pack/acp/start/vimoutliner/vimoutliner/plugin/votl_format.vim b/pack/acp/start/vimoutliner/vimoutliner/plugin/votl_format.vim new file mode 100755 index 0000000..a59fb33 --- /dev/null +++ b/pack/acp/start/vimoutliner/vimoutliner/plugin/votl_format.vim @@ -0,0 +1,157 @@ +"###################################################################### +"# VimOutliner Format plugin +"# Copyright (C) 2011 by Jostein Berntsen +"# The file is currently an experimental part of Vim Outliner. +"# +"# This program is free software; you can redistribute it and/or modify +"# it under the terms of the GNU General Public License as published by +"# the Free Software Foundation; either version 2 of the License, or +"# (at your option) any later version. +"# +"# This program is distributed in the hope that it will be useful, +"# but WITHOUT ANY WARRANTY; without even the implied warranty of +"# MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the +"# GNU General Public License for more details. +"###################################################################### +" Documentation{{{1 +" +" This script inserts bullets, dashes, and arrows in front of lines, including +" VO body text. To insert markers for several lines, select the lines with V +" and execute the mapping. Indents will be kept as they are. +" You can also use the MakeText function to make body text from headers or +" lists. +" +" There are also functions for +" 1) Aligning text in a paragraph to a level 1 header +" 2) Insert checkboxes for all headings in a paragraph +" 3) Indent text in a paragraph/branch to the right +" 4) Indent text in a paragraph/branch to the left +" +"}}}1 +" Load guard for functions {{{1 +if exists("g:loaded_votl_format") || &cp + finish +endif +let g:loaded_votl_format= 1 +let s:keepcpo = &cpo +set cpo&vim + +" Mappings {{{1 + +""" Command mappings +" +" Insert bullets on selected text +map :call InsertBullet() +" Insert dashes on selected text +map :call InsertDash() +" Insert arrows on selected text +map :call InsertArrow() +" Insert colons before selected text +map :call MakeText() +" Align text in a paragraph and indent 1 level +map V}k:leV}> +" Insert checkboxes for text lines in a paragraph +map V}k,,cb +" Indent text in a paragraph 1 level to the right and keep indentation +map :call VOindentright() +" Indent text in a paragraph 1 level to the level and keep indentation +map :call VOindentleft() + +"}}}1 +" InsertBullet() {{{1 +" Insert bullets on selected text. + +function! InsertBullet() + if match(getline("."),"^[\t]*:") != -1 + let @x = ": * " + normal! ^"xPex + else + let @x = "* " + normal! ^"xP + endif +endfunction + +"}}}1 +" InsertDash() {{{1 +" Insert dashes on selected text. + +function! InsertDash() + if match(getline("."),"^[\t]*:") != -1 + let @x = ": - " + normal! ^"xPex + else + let @x = "- " + normal! ^"xP + endif +endfunction + +"}}}1 +" InsertArrow() {{{1 +" Insert arrows on selected text. + +function! InsertArrow() + if match(getline("."),"^[\t]*:") != -1 + let @x = ": --> " + normal! ^"xPex + else + let @x = "--> " + normal! ^"xP + endif +endfunction + +"}}}1 +" MakeText() {{{1 +" Make selected lines body text. + +function! MakeText() + let @x = ":" + normal! ^"xP +endfunction + +"}}}1 +" VOindentright() {{{1 +" Indent branch 1 level to the right. + +function! VOindentright() + let thisLine = line(".") + if (foldclosed(thisLine) == -1) && IsParent(thisLine) + normal! zc + let fold_cursor = getpos(".") + normal! >> + let get_cursor = getpos(".") + call setpos('.',fold_cursor) + normal! zo + call setpos('.',get_cursor) + set foldlevel=3 + else + normal! >> + endif +endfunction + + +"}}}1 +" VOindentleft() {{{1 +" Indent branch 1 level to the left. + +function! VOindentleft() + let thisLine = line(".") + if (foldclosed(thisLine) == -1) && IsParent(thisLine) + normal! zc + let fold_cursor = getpos(".") + normal! << + let get_cursor = getpos(".") + call setpos('.',fold_cursor) + normal! zo + call setpos('.',get_cursor) + set foldlevel=3 + else + normal! << + endif +endfunction + +"}}}1 +" The End +" vim600: set foldmethod=marker foldlevel=0: + + + diff --git a/pack/acp/start/vimoutliner/vimoutliner/plugin/votl_gtd.vim b/pack/acp/start/vimoutliner/vimoutliner/plugin/votl_gtd.vim new file mode 100644 index 0000000..acdef8b --- /dev/null +++ b/pack/acp/start/vimoutliner/vimoutliner/plugin/votl_gtd.vim @@ -0,0 +1,219 @@ +"###################################################################### +"# VimOutliner GTD +"# Copyright (C) 2003 by Noel Henson noel@noels-lab.com +"# The file is currently an experimental part of Vim Outliner. +"# +"# This program is free software; you can redistribute it and/or modify +"# it under the terms of the GNU General Public License as published by +"# the Free Software Foundation; either version 2 of the License, or +"# (at your option) any later version. +"# +"# This program is distributed in the hope that it will be useful, +"# but WITHOUT ANY WARRANTY; without even the implied warranty of +"# MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the +"# GNU General Public License for more details. +"###################################################################### + +" InsertElem() {{{1 +" Insert a elem without disturbing the current folding. +function! InsertElem(elem) + let @x = a:elem + normal! ^"xP +endfunction +"}}}1 + +" DeleteCheckbox() {{{1 +" Delete a checkbox with all its marks (team/completion) +" if one exists +function! DeleteCheckbox() + :-1/\[[X_?-]\%(,[<>=] [^]]*\)\?\] \%(\d*%\)\?/s/// +endfunction +"}}}1 + +let g:reOutline = "^\t\+\[<>:;|\]" +let g:reBox = "[\[X_?-\]" +let g:reTeam = ",\[<>=\] \[^]\]*" +let g:rePercent = "\\d*% " + +" Safe Insert *Box() {{{1 +" Insert a element at the beginning of a header without disturbing the +" current folding only if there is no element already. +function! InsertSwitch(elem) + if match(getline("."),g:reOutline) != -1 + return + endif +" if match(getline("."),"[".a:elem."\\%(".g:reTeam."\\)\\?"."] ") != -1 +" return +" endif + if match(getline("."),g:reBox."\\%(".g:reTeam."\\)\\?"."] ") != -1 + substitute/\[./\="[".a:elem/ + else + call InsertElem("[".a:elem."] ") + endif +endfunction +"}}}1 + +" Safe Add Team Indicator() {{{1 +" Insert a work with("="), for (">"), waiting for ("<") +" in a checkbox (created if needed) at the beginning of a header +" without disturbing the current folding. +function! SafeAddTeam(elem) + if match(getline("."),g:reOutline) != -1 + return + endif + if match(getline("."),g:reBox.g:reTeam."] ") != -1 + return + endif + if match(getline("."),g:reBox."] ") != -1 + substitute/\[[X_?-]/\=submatch(0).",".a:elem." "/ + else + call InsertElem("[_".",".a:elem." "."] ") + endif +endfunction +"}}}1 + +" Safe InsertCheckBoxPercent() {{{1 +" Insert a checkbox and % sign at the beginning of a header without disturbing +" the current folding +function! SafeAddPercent() +" if Ind(line(".")+1) <= Ind(line(".")) +" return +" endif + if match(getline("."),g:reOutline) != -1 + return + endif + if match(getline("."),g:reBox."\\%(".g:reTeam."\\)\\?"."] ".g:rePercent) != -1 + return + endif + if match(getline("."),g:reBox."\\%(".g:reTeam."\\)\\?"."] ") != -1 + substitute/\[[^]]\+\] /&% / + else + call InsertElem("[_] % ") + endif +endfunction +"}}}1 + +" Ind(line) {{{1 +" Return the index of the line. +" Remove it when using the new version of VO +function! Ind(line) + return indent(a:line) / &tabstop +endf +"}}}1 + +" FindRootParent(line) {{{1 +" returns the line number of the root parent for any child +function! FindRootParent(line) + let l:i = a:line + while l:i > 1 && Ind(l:i) > 0 + let l:i -= 1 + endwhile + return l:i +endf +"}}}1 + +" NewHMD(line) {{{1 +" (How Many Done) +" Calculates proportion of already done work in the subtree +function! NewHMD(line) + let l:done = 0 " checkboxes + let l:count = 0 " number of elems : for % + let l:i = 1 " line counting + let l:proportion = 0 " % : for checkboxes (<100 or 100 ?) and % + let l:lineindent = Ind(a:line) + + " look recursively + + while Ind(a:line+l:i) > l:lineindent + if Ind(a:line+l:i) == l:lineindent + 1 + let l:childdoneness = NewHMD(a:line+l:i) + if l:childdoneness >= 0 + let l:done += l:childdoneness + let l:count += 1 + endif +" echomsg "->".a:line."/".(a:line+l:i)."/ [".l:childdoneness."]-[".l:count."]" + else +" echomsg "(skip) ->".a:line."/".(a:line+l:i) + endif + let l:i += 1 + endwhile + + " update % + + if l:count > 0 +" echomsg "->".a:line." proportion ".l:proportion + let l:proportion = ((l:done * 100)/l:count)/100 + endif + call setline(a:line,substitute(getline(a:line)," [0-9]*%"," ".l:proportion."%","")) + + " + " update checkboxes + " + + " everything under is done, toggle + if l:proportion == 100 +" echomsg "->".a:line." proportion 100." + call setline(a:line,substitute(getline(a:line),"[.","[X","")) + return 100 + endif + + if l:proportion == 0 && l:count == 0 + " done or skipped + if match(getline(a:line),"\[[X-][\],]") != -1 +" echomsg "->".a:line." proportion is X or -." + return 100 + endif + + " not done or questionnable + if match(getline(a:line),"\[[_\?][\],]") != -1 +" echomsg "->".a:line." proportion is _ or ?." + return 0 + endif + + " unknown status for line +" echomsg "->".a:line." proportion is unknown." + return -1 + endif + + " we have not done tasks, undo 'mark as done' + if match(getline(a:line),"\[[X][\],]") != -1 + call setline(a:line,substitute(getline(a:line),"[.","[_","")) + endif +" echomsg "->".a:line." proportion is revert?. [".l:proportion."] / [".l:count."]" + return l:proportion +endf +"}}}1 + +" mappings {{{1 +" gtd addings + " work alone +noremap cb :call InsertSwitch("_") +noremap cq :call InsertSwitch("?") +noremap cD :call InsertSwitch("-") +noremap cx :call InsertSwitch("X"):call NewHMD(FindRootParent(line("."))) +" noremap cx :call InsertSwitch("X") + " team work +noremap cw :call SafeAddTeam("<") +noremap cf :call SafeAddTeam(">") +noremap c= :call SafeAddTeam("=") +" completion +noremap c% :call SafeAddPercent() + +" forced mapping +noremap gb :call InsertElem("[_] ") +noremap gq :call InsertElem("[?] ") +noremap gD :call InsertElem("[-] ") +noremap gx :call InsertElem("[X] ") +noremap gw :call InsertElem("[_,< ] ") +noremap gf :call InsertElem("[_,> ] ") +noremap g= :call InsertElem("[_,= ] ") +noremap g% :call InsertElem("[_] % ") + +" delete a chechbox +noremap cd :call DeleteCheckbox() + +" calculate the proportion of work done on the subtree +noremap cz :call NewHMD(FindRootParent(line("."))) +"}}}1 + +" vim600: set foldlevel=0 foldmethod=marker: diff --git a/pack/acp/start/vimoutliner/vimoutliner/plugin/votl_math.otl b/pack/acp/start/vimoutliner/vimoutliner/plugin/votl_math.otl new file mode 100644 index 0000000..54fe307 --- /dev/null +++ b/pack/acp/start/vimoutliner/vimoutliner/plugin/votl_math.otl @@ -0,0 +1,56 @@ +VO Math +Syntax + {} contains formalae to compute + {f0;f1} semicolon separates formulae + There is a respective order between the formulae and variables in a heading + {math0;math1;math2} var0=result0 var1=result1 var2=result2 + ordering + Math can come before or after variables + {3+5;3*5} sum=8 product=15 + sum=8 product=15 {3+5;3*5} + name=n name become a named result for passing to a parent + A=n B=n space separates variables + A=n test B=n space separates variables, interspersed words are allowed +Math Examples + Example 1: one-line math {3*5} result=15 + Example 2: one-line floating-point math {3*5.0} result=15.0 + Example 3: Simple math with child variables {A*B+C} result=5.0 + Item 1 A=2 + Item 2 B=2 + Item 3 C=3.0 + Example 4: Automatic summing {bonk} total=6.0 + Item 1 bonk=1 + Item 2 bonk=2 + Item 3 bonk=3.0 + Example 5: Multiple equations {A*B;B*C;C*A;A+B+C} AB=2.0 BC=6.0 CA=3.0 sumABC=6.0 + Item 1 A=1 + Item 2 B=2 + Item 3 C=3.0 + Example 6: Multiple trees {Labor;Materials;Total} Labor=1222.5 Materials=225.0 Total=1447.5 + Project 1 {Labor;Materials;Labor+Materials} Labor=747.5 Materials=110.0 Total=857.5 + Task 1 {Hours*Rate;Materials} Labor=500.0 Materials=100.0 + Hours=10 + Rate=50 + Materials=100 + Task 2 {Hours*Rate;Materials} Labor=247.5 Materials=10.0 + Hours=4.5 + Rate=55 + Materials=10 + Project 2 {Labor;Materials;Labor+Materials} Labor=475.0 Materials=115.0 Total=590.0 + Task 1 {Hours*Rate;Materials} Labor=300.0 Materials=70.0 + Hours=6 + Rate=50 + Materials=70 + Task 2 {Hours*Rate;Materials} Labor=175.0 Materials=45.0 + Hours=3.5 + Rate=50 + Materials=45 + Example 7: Reversal of results and maths AB=2.0 BC=6.0 CA=3.0 sumABC=6.0 {A*B;B*C;C*A;A+B+C} + Item 1 A=1 + Item 2 B=2 + Item 3 C=3.0 + Example 8: Scientific notation: {10000.0*100000} result=1.0e9 + Example 9: Trigonometry: {sin(pi/4)} theta=0.707107 + pi=3.1415926 + Example 10: Base conversion: {printf("0x%x",65)} hex='0x41' + Example 11: Vim internal state: {&ts;&foldlevel} tabstop=4 foldlevel=99999 diff --git a/pack/acp/start/vimoutliner/vimoutliner/plugin/votl_math.vim b/pack/acp/start/vimoutliner/vimoutliner/plugin/votl_math.vim new file mode 100644 index 0000000..5c09db1 --- /dev/null +++ b/pack/acp/start/vimoutliner/vimoutliner/plugin/votl_math.vim @@ -0,0 +1,286 @@ +"###################################################################### +"# VimOutliner Outline Math +"# Copyright (C) 2014 by Noel Henson noelwhenson@gmail.com +"# The file is currently an experimental part of Vim Outliner. +"# +"# This program is free software; you can redistribute it and/or modify +"# it under the terms of the GNU General Public License as published by +"# the Free Software Foundation; either version 2 of the License, or +"# (at your option) any later version. +"# +"# This program is distributed in the hope that it will be useful, +"# but WITHOUT ANY WARRANTY; without even the implied warranty of +"# MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the +"# GNU General Public License for more details. +"###################################################################### + +" Naming Conventions ################################################## {{{1 +" lnum: line number +" line: string from a line +" vars: dictionary of variables, key:value pairs +" +" Common Functions #################################################### {{{1 +" These functions have broader application scope than those specific to +" performing math on outline trees. Perhaps even adding math to VO tables. +" + +" MyLineage(lnum) {{{2 +" return a list of ancestors in order of youngest-first +" eg: +" 9 A +" 10 B +" 11 C +" 12 D +" MyLineage(12) +" [11,10,9] +function! MyLineage(lnum) + let lineage = [] + let lnum = a:lnum + let indent = Ind(lnum) + if indent == 0 + return lineage + endif + let parentIndent = indent - 1 + while (parentIndent >= 0) && (lnum >= 0) + while (indent > parentIndent) && (lnum >= 0) + let lnum -= 1 + let indent = Ind(lnum) + endwhile + let lineage += [lnum] + let parentIndent -= 1 + endwhile + return lineage +endfunction + +" MyChildren(lnum) {{{2 +" return a list of immediate children from the specificed line +function! MyChildren(lnum) + let children = [] + let parentInd = Ind(a:lnum) + let childInd = parentInd + 1 + let last = line("$") + let lnum = a:lnum + 1 + let lnumInd = Ind(lnum) + while (lnum <= last) && (parentInd < lnumInd) + if lnumInd == childInd + let children += [lnum] + endif + let lnum += 1 + let lnumInd = Ind(lnum) + endwhile + return children +endfunction + +" RootParents() {{{2 +" return a list of all root nodes (indent level 0) +function! RootParents() + let parents = [] + let lnum = 1 + let lines = line("$") + while lnum <= lines + let ind = Ind(lnum) + if ind == 0 + let parents += [lnum] + endif + let lnum += 1 + endwhile + return parents +endfunction + +" FindMath(string) {{{2 +" location of first character of match, -1 if not +" notation: ...{...}...=number... +" function! FindMath(string) +" return match(a:string,'{.*}.*=-\?[0-9]\+\(.[0-9]\+\)\+\([eE][-+]\?[0-9]\+\)\?') +" endfunction +" the below is faster! +" function! FindMath(string) +" return match(a:string,'{.*}.*=-\?[0-9]') +" endfunction +" the below is even faster +" and allows for formulae to be placed at the end of a heading +function! FindMath(string) + if match(a:string,'=') != -1 + return match(a:string,'{.*}') + else + return -1 + endif +endfunction + +" GetMathFromString(string) {{{2 +" returns a list of formulae in a string, in the order they were listed +" returns an empty list if none +" notation: {formula} or {formula1;formula2;...;formulan} +function! GetMathFromString(string) + let mstart = FindMath(a:string) + if mstart == -1 + return [] + endif + let mstart += 1 + let mend = match(a:string,'}',mstart) + if mend == -1 + return [] + endif + let mend -= 1 + return split(a:string[mstart : mend],';') +endfunction + +" MarkValues(string) {{{2 +" mark Values in a string for replacement by formula results +" turns each number into '= voMathResult' +function! MarkValues(string) + return substitute(a:string,'=-\?[0-9]\+\(.[0-9]\+\)\?\([eE][-+]\?[0-9]\+\)\?','=voMathResult','g') +endfunction + +" GetVarsFromString(string,vars) {{{2 +" add key:value pairs from a string to the passed dictionary +" create new entries if key does not exist +" add values to existing entries +" vars is a dictionary of key:value pairs +" notation: name=number +function! GetVarsFromString(string,vars) + " quick return if no potential variables + if match(a:string,'=') == -1 + return + endif + let tokens = split(a:string) + for token in tokens + if match(token,'=') == -1 + continue + endif + let [key,value] = split(token,"=") + " read values are cast to floats to prevent + " auto-casting to integers in the first case + " and strings in the second + if has_key(a:vars,key) + let a:vars[key] += str2float(value) + else + let a:vars[key] = str2float(value) + endif + endfor +endfunction + +" ReplaceVars(formula,vars) {{{2 +" replace variables with their values from the supplied dictionary +" vars is a dictionary of key:value pairs +" key:value pairs are first sorted by key length, longest-first +" this prevents name collisions when similar key names are used like: +" Total and Totals -or- X1 and X12 +function! ReplaceVars(formula,vars) + let formula = a:formula + let vars = [] + for [key,val] in items(a:vars) + let vars += [[len(key),key,val]] + endfor + let vars = reverse(sort(vars)) + for [len,key,val] in vars + let formula = substitute(formula,key,string(val),"g") + endfor + return formula +endfunction + +" ComputeString(string,vars) {{{2 +" compute a string using its math and a dictionary of variables +" return the computed, modified string +" string is a string containing math and result variable names +" vars is a dictionary of key:value pairs used in the computation +function! ComputeString(string,vars) + let string = a:string + let maths = GetMathFromString(string) + if len(maths) + let string = MarkValues(string) + for math in maths + let math = ReplaceVars(math,a:vars) + let result = string(eval(math)) + let string = substitute(string,'voMathResult',result,"") + endfor + endif + return string +endfunction + +" Math Functions on Outlines ########################################## {{{1 + +" MyChildrensVars(lnum) {{{2 +" return a dictionary of variable from immediate children +function! MyChildrensVars(lnum) + let children = MyChildren(a:lnum) + let vars = {} + for child in children + call GetVarsFromString(getline(child),vars) + endfor + return vars +endfunction + +" ComputeLine(lnum) {{{2 +" compute a line's maths using variables from it's children +" replace the line with the newly computed line +function! ComputeLine(lnum) + let vars = MyChildrensVars(a:lnum) + let line = ComputeString(getline(a:lnum),vars) + call setline(a:lnum,line) +endfunction + +" ComputeUp(lnum) {{{2 +" compute 'up' a tree towards level 1 +" the line (lnum) itself is computed first +" this is intended to be a fast compute method to update a branch of nodes +" it assumes that all other calculations in a tree are correct +function! ComputeUp(lnum) + call ComputeLine(a:lnum) + let lineage = MyLineage(a:lnum) + if len(lineage) + for lnum in lineage + call ComputeLine(lnum) + endfor + endif +endfunction + +" ComputeDown(lnum) {{{2 +" compute 'down' a tree from the current node +" the line (lnum) itself is computed last +function! ComputeDown(lnum) + let children = MyChildren(a:lnum) + if len(children) + for lnum in children + call ComputeDown(lnum) + endfor + endif + call ComputeLine(a:lnum) +endfunction + +" ComputeTree(lnum) {{{2 +" compute down an entire tree +function! ComputeTree(lnum) + let parents = MyLineage(a:lnum) + if len(parents) + let topparent = parents[-1] + else + let topparent = a:lnum + endif + call ComputeDown(topparent) +endfunction + +" ComputeDocument() {{{2 +" compute down all trees + +function! ComputeDocument(lnum) + let parents = RootParents() + for parent in parents + call ComputeDown(parent) + endfor +endfunction + +" Concealings {{{1 +" BadWord is a very old VO region that is no longer used. +" It can be used now for plugins :) +" This should probably be fixed at some point in the future +syntax match BadWord "{.\+}" conceal transparent cchar=µ +set conceallevel=1 + +" mappings {{{1 + +map == :call ComputeUp(line(".")) +map =t :call ComputeTree(line(".")) +map =d :call ComputeDocument() +map =h :set conceallevel=1 +map =H :set conceallevel=0 diff --git a/pack/acp/start/vimoutliner/vimoutliner/plugin/votl_newhoist.vim b/pack/acp/start/vimoutliner/vimoutliner/plugin/votl_newhoist.vim new file mode 100644 index 0000000..e2ecd64 --- /dev/null +++ b/pack/acp/start/vimoutliner/vimoutliner/plugin/votl_newhoist.vim @@ -0,0 +1,456 @@ +"###################################################################### +"# VimOutliner Hoisting +"# Copyright (C) 2003 by Noel Henson noel@noels-lab.com +"# The file is currently an experimental part of Vim Outliner. +"# +"# This program is free software; you can redistribute it and/or modify +"# it under the terms of the GNU General Public License as published by +"# the Free Software Foundation; either version 2 of the License, or +"# (at your option) any later version. +"# +"# This program is distributed in the hope that it will be useful, +"# but WITHOUT ANY WARRANTY; without even the implied warranty of +"# MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the +"# GNU General Public License for more details. +"###################################################################### + +" Load the plugin {{{1 +if exists("g:did_vo_hoist") + "finish +endif +if !exists("g:hoistParanoia") + let g:hoistParanoia=0 +endif +if !exists('hlevel') + let hlevel = 20 +endif +let g:did_vo_hoist = 1 +" mappings {{{1 +map hh :call Hoist(line(".")) +map hd :call DeHoist() +map hD :call DeHoistAll() +"}}}1 +" syntax {{{1 +" Hoisted {{{2 +"syntax match Invis +^\~\zs.*$+ containedin=ALL conceal cchar=~ +""hi Invis guifg=bg ctermfg=bg +""hi Invis guifg=bg +"hi link Invis Conceal +"}}}2 +"}}}1 +" MyFoldText() {{{1 +" Create string used for folded text blocks +function! MyFoldText() + let l:MySpaces = MakeSpaces(&sw) + let l:line = getline(v:foldstart) + let l:bodyTextFlag=0 + if l:line =~'^\~' + let l:line = '~'.repeat(' ', winwidth(0)-1) + elseif l:line =~ "^\t* \\S" || l:line =~ "^\t*\:" + let l:bodyTextFlag=1 + let l:MySpaces = MakeSpaces(&sw * (v:foldlevel-1)) + let l:line = l:MySpaces."[TEXT]" + elseif l:line =~ "^\t*\;" + let l:bodyTextFlag=1 + let l:MySpaces = MakeSpaces(&sw * (v:foldlevel-1)) + let l:line = l:MySpaces."[TEXT BLOCK]" + elseif l:line =~ "^\t*\> " + let l:bodyTextFlag=1 + let l:MySpaces = MakeSpaces(&sw * (v:foldlevel-1)) + let l:line = l:MySpaces."[USER]" + elseif l:line =~ "^\t*\>" + let l:ls = stridx(l:line,">") + let l:le = stridx(l:line," ") + if l:le == -1 + let l:l = strpart(l:line, l:ls+1) + else + let l:l = strpart(l:line, l:ls+1, l:le-l:ls-1) + endif + let l:bodyTextFlag=1 + let l:MySpaces = MakeSpaces(&sw * (v:foldlevel-1)) + let l:line = l:MySpaces."[USER ".l:l."]" + elseif l:line =~ "^\t*\< " + let l:bodyTextFlag=1 + let l:MySpaces = MakeSpaces(&sw * (v:foldlevel-1)) + let l:line = l:MySpaces."[USER BLOCK]" + elseif l:line =~ "^\t*\<" + let l:ls = stridx(l:line,"<") + let l:le = stridx(l:line," ") + if l:le == -1 + let l:l = strpart(l:line, l:ls+1) + else + let l:l = strpart(l:line, l:ls+1, l:le-l:ls-1) + endif + let l:bodyTextFlag=1 + let l:MySpaces = MakeSpaces(&sw * (v:foldlevel-1)) + let l:line = l:MySpaces."[USER BLOCK ".l:l."]" + elseif l:line =~ "^\t*\|" + let l:bodyTextFlag=1 + let l:MySpaces = MakeSpaces(&sw * (v:foldlevel-1)) + let l:line = l:MySpaces."[TABLE]" + endif + let l:sub = substitute(l:line,'\t',l:MySpaces,'g') + let l:len = strlen(l:sub) + let l:sub = l:sub . " " . MakeDashes(58 - l:len) + let frange = (v:foldend + l:bodyTextFlag)- v:foldstart + let l:sub = l:sub . " (" . frange + if frange == 1 + let l:sub = l:sub . " line)" + else + let l:sub = l:sub . " lines)" + endif + return l:sub.repeat(' ', winwidth(0)-len(l:sub)) +endfunction +"}}}1 +" New Fold Function (will be put into vo_base later {{{1 +function! MyHoistableFoldLevel(line) + let l:myindent = Ind(a:line) + let l:nextindent = Ind(a:line+1) + + if HoistFold(a:line) + " if (a:line == 1) + " return g:hlevel + " elseif (HoistFold(a:line-1) == 0) + " return ">".0 + " else + " return g:hlevel + " endif + return g:hlevel + + elseif BodyText(a:line) + if (BodyText(a:line-1) == 0) + return '>'.(l:myindent+1) + endif + if (BodyText(a:line+1) == 0) + return '<'.(l:myindent+1) + endif + return (l:myindent+1) + elseif PreformattedBodyText(a:line) + if (PreformattedBodyText(a:line-1) == 0) + return '>'.(l:myindent+1) + endif + if (PreformattedBodyText(a:line+1) == 0) + return '<'.(l:myindent+1) + endif + return (l:myindent+1) + elseif PreformattedTable(a:line) + if (PreformattedTable(a:line-1) == 0) + return '>'.(l:myindent+1) + endif + if (PreformattedTable(a:line+1) == 0) + return '<'.(l:myindent+1) + endif + return (l:myindent+1) + elseif PreformattedUserText(a:line) + if (PreformattedUserText(a:line-1) == 0) + return '>'.(l:myindent+1) + endif + if (PreformattedUserTextSpace(a:line+1) == 0) + return '<'.(l:myindent+1) + endif + return (l:myindent+1) + elseif PreformattedUserTextLabeled(a:line) + if (PreformattedUserTextLabeled(a:line-1) == 0) + return '>'.(l:myindent+1) + endif + if (PreformattedUserText(a:line+1) == 0) + return '<'.(l:myindent+1) + endif + return (l:myindent+1) + elseif UserText(a:line) + if (UserText(a:line-1) == 0) + return '>'.(l:myindent+1) + endif + if (UserTextSpace(a:line+1) == 0) + return '<'.(l:myindent+1) + endif + return (l:myindent+1) + elseif UserTextLabeled(a:line) + if (UserTextLabeled(a:line-1) == 0) + return '>'.(l:myindent+1) + endif + if (UserText(a:line+1) == 0) + return '<'.(l:myindent+1) + endif + return (l:myindent+1) + else + if l:myindent < l:nextindent + return '>'.(l:myindent+1) + endif + if l:myindent > l:nextindent + return (l:myindent) + endif + return l:myindent + endif +endfunction +set foldexpr=MyHoistableFoldLevel(v:lnum) +"}}}2 +"}}}1 +" Functions {{{1 +" RemoveTabs(line,tabs) {{{2 +" remove specified number of tabs from the begining of line +function! RemoveTabs(start,end,tabs) + if a:tabs > 0 + let l:doit = "silent ".a:start.",".a:end."s/^\\(\\t\\)\\{".a:tabs."}/" + exe l:doit + endif +endfunction +"}}}2 +" IsParent(line) {{{2 +" Return 1 if this line is a parent +function! IsParent(line) + return (Ind(a:line)+1) == Ind(a:line+1) +endfunction +"}}}2 +" FindParent(line) {{{2 +" Return line if parent, parent line if not +function! FindParent(line) + if IsParent(a:line) + return a:line + else + let l:parentindent = Ind(a:line)-1 + let l:searchline = a:line + while (Ind(l:searchline) != l:parentindent) && (l:searchline > 0) + let l:searchline = l:searchline-1 + endwhile + return l:searchline + endif +endfunction +"}}}2 +" HoistFold() {{{2 +" Return a flag indicating that there is a valid hoist +function! HoistFold(line) + if getline(a:line) =~ '^\~' + return 1 + else + return 0 + endif +endfunction +"}}}2 +" Hoisted() {{{2 +" Return a flag indicating that there is a valid hoist +function! Hoisted() + if getline(1) =~ '^\~' + return 1 + else + return 0 + endif +endfunction +"}}}2 +" FindTopHoist(line) {{{2 +" Return line number of the nearest (last line) top hoist tag +function! FindTopHoist(line) + let l:line = a:line + while (match(getline(l:line),"^\\~") == -1) && (l:line > 0) + let l:line -= 1 + endwhile + return l:line +endfunction +"}}}2 +" FindBottomHoist(line) {{{2 +" Return line number of the nearest (last line) top hoist tag +function! FindBottomHoist(line) + let l:line = a:line + let l:lastline = line('$') + while getline(l:line) !~ "^\\~" && (l:line > 0) && l:line <= l:lastline + let l:line += 1 + endwhile + return l:line +endfunction +"}}}2 +" FindLastChild(line) {{{2 +" Return the line number of the last decendent of parent line +function! FindLastChild(line) + let l:parentindent = Ind(a:line) + let l:searchline = a:line+1 + while Ind(l:searchline) > l:parentindent + let l:searchline = l:searchline+1 + endwhile + return l:searchline-1 +endfunction +"}}}2 +" GetHoistedIndent(line) {{{2 +" line is the line number containing the indent +" Returns the original indent of the hoisted region +function! GetHoistedIndent(line) + return str2nr(strpart(getline(a:line),1,2)) +endfunction +"}}}2 +" HoistTagBefore(line,indent) {{{2 +function! HoistTagBefore(line,indent) + let l:doit = "silent 1,".(a:line-1)."s/^/\\~".a:indent." /" + exe l:doit + "call setline(1, map(getline(1,a:line-1), '"~".a:indent.v:val')) +endfunction +"}}}2 +" HoistDeTagBefore(line) {{{2 +function! HoistDeTagBefore(line) + let l:doit = "silent 1,".a:line."s/^\\~\\d* //" + exe l:doit +endfunction +"}}}2 +" HoistTagAfter(line) {{{2 +function! HoistTagAfter(line) + if a:line > line('$') + return + endif + let l:doit = "silent ".a:line.",$s/^/\\~/" + exe l:doit +endfunction +"}}}2 +" HoistDeTagAfter(line) {{{2 +function! HoistDeTagAfter(line) + if a:line > line('$') + return + endif + let l:doit = "silent ".a:line.",$s/^\\~//" + exe l:doit +endfunction +"}}}2 +" HoistWrite(file) {{{2 +" Write the clean file if hoisted +function! HoistWrite(file,...) range + "let lines = getline(1,line('$')) + let saved = 0 + mkview + call DeHoistAll() + if v:cmdbang + let bang = '!' + else + let bang = '' + endif + try + if a:0 + echom a:firstline.','.a:lastline."w".bang.fnameescape(v:cmdarg).' '.a:file + exe a:firstline.','.a:lastline."w".bang.fnameescape(v:cmdarg).' '.a:file + else + exe "w".bang.fnameescape(v:cmdarg).' '.a:file + endif + let saved = 1 + catch + echohl ErrorMsg + echom substitute(v:exception,'^Vim(.\{-}):','','') + echohl None + endtry + "call setline(1,lines) + silent earlier + silent loadview + if saved + silent setlocal nomodified + endif +endfunction "HoistWrite +" Hoist(line) {{{2 +" Write the offspring of a parent to a new file, open it and remove the +" leading tabs. +function! Hoist(line) + let l:parent = FindParent(a:line) + if l:parent == 0 + return + endif + "call cursor(l:parent,1) + "let l:firstline = l:parent+1 + let l:firstline = l:parent + let l:childindent = Ind(l:firstline) + let l:lastline = FindLastChild(l:parent) + setlocal foldlevel=20 + call HoistTagBefore(l:firstline,l:childindent) + call HoistTagAfter(l:lastline+1) +" call RemoveTabs(l:firstline,l:lastline,l:childindent) + call cursor(l:firstline,1) + setlocal foldlevel=19 + augroup VO_HOIST + au! + au CursorMoved,CursorMovedI + \ if getline('.') =~ '^\~\d* ' | + \ call HoistKeepCursor(1) | + \ elseif getline('.') =~ '^\~' | + \ call HoistKeepCursor(0) | + \ endif + "au BufWriteCmd call HoistWrite(fnameescape(expand(""))) + "au FileWriteCmd '[,']call HoistWrite(fnameescape(expand("")), 1) + augroup END + if exists('+conceallevel') + syntax match Invis +^\~.*$+ conceal cchar=~ + hi link Invis Conceal + setlocal conceallevel=2 + else + syntax match Invis +^\~.*$+ containedin=ALL + let i = 1 + while synIDtrans(i) != 0 + if synIDattr(i, 'name') == 'Normal' + if synIDattr(i, 'bg') >= 0 + " bg is set + hi Invis guifg=bg ctermfg=bg + else + hi Invis guifg=NONE ctermfg=NONE + endif + break + endif + let i += 1 + endwhile + endif +endfunction +" }}}2 +" HoistKeepCursor(top) {{{2 +" Keep cursor out of non-hoisted area. +function! HoistKeepCursor( top ) + if a:top + while getline('.') =~ '^\~\d* ' + normal! j + endwhile + else + while getline('.') =~ '^\~' + normal! k + endwhile + endif +endfunction "HoistKeepCursor }}}2 +" MakeTabs(n) {{{2 +" return a string of n tabs +function! MakeTabs(n) + let l:tabs = "" + let l:n = a:n + while l:n > 0 + let l:tabs = l:tabs."\t" + let l:n -= 1 + endwhile + return l:tabs +endfunction +"}}}2 +"}}}2 +" DeHoist() {{{2 +" Write the offspring of a parent to a new file, open it and remove the +" leading tabs. +function! DeHoist() + if !Hoisted() + return + endif + let l:line = line(".") + let l:top = FindTopHoist(l:line) + let l:bottom = FindBottomHoist(l:line) + echom 1 + let l:indent = GetHoistedIndent(l:top) +" let l:tabs = MakeTabs(l:indent) +" let l:doit = "silent ".(l:top+1).",".(l:bottom-1)."s/^/".l:tabs."/" +" exe l:doit + call HoistDeTagBefore(l:top) + call HoistDeTagAfter(l:bottom) + if !Hoisted() + augroup VO_HOIST + au! + augroup! VO_HOIST + augroup END + endif + call cursor(l:line,l:indent) +endfunction +"}}}2 +" DeHoistAll() {{{2 +" Write the offspring of a parent to a new file, open it and remove the +" leading tabs. +function! DeHoistAll() + while Hoisted() + call DeHoist() + endwhile +endfunction +"}}}2 +"}}}1 +" vim600: set foldlevel=0 foldmethod=marker: diff --git a/pack/acp/start/vimoutliner/vimoutliner/plugin/votl_smart_paste.vim b/pack/acp/start/vimoutliner/vimoutliner/plugin/votl_smart_paste.vim new file mode 100644 index 0000000..6aa0c45 --- /dev/null +++ b/pack/acp/start/vimoutliner/vimoutliner/plugin/votl_smart_paste.vim @@ -0,0 +1,117 @@ +" Here is a small script that remaps the p and P normal commands such that VO +" will do what one would expect when pasting cut/copied nodes into another +" section of an outline. It will adjust the indents and not paste into the +" middle of a branch. +" Added 2011-03-01(JB): This script will now also copy an outline correctly by +" using \\y, copy to the register with \\r, cut an outline by using \\d, and +" paste from the register using \\b. +" http://www.lists.vimoutliner.org/pipermail/vimoutliner/2008-October/002366.html + +map p :call VOput() +map \\b :call VOputreg() +map \\y :call VOcop() +map \\r :call VOreg() +map \\d :call VOcut() +map P ]P + +if exists('s:loaded') + finish +endif +let s:loaded = 1 + +function! IsParent(line) + if a:line == line("$") + return 0 + elseif Ind(a:line) < Ind(a:line+1) + return 1 + else + return 0 + endif +endfunction + + +function! VOcop() + let thisLine = line(".") + if (foldclosed(thisLine) == -1) && IsParent(thisLine) + normal! zc + let fold_cursor = getpos(".") + normal! yy + let get_cursor = getpos(".") + call setpos('.',fold_cursor) + normal! zo + call setpos('.',get_cursor) + else + normal! yy + endif +endfunction + +function! VOreg() + let thisLine = line(".") + if (foldclosed(thisLine) == -1) && IsParent(thisLine) + normal! zc + let fold_cursor = getpos(".") + normal! V"+y + let get_cursor = getpos(".") + call setpos('.',fold_cursor) + normal! zo + call setpos('.',get_cursor) + else + normal! V"+y + endif +endfunction + +function! VOcut() + let thisLine = line(".") + if (foldclosed(thisLine) == -1) && IsParent(thisLine) + normal! zc + let fold_cursor = getpos(".") + normal! dd + let get_cursor = getpos(".") + call setpos('.',fold_cursor) + normal! zo + call setpos('.',get_cursor) + else + normal! dd + endif +endfunction + +function! VOput() + let thisLine = line(".") + if (foldclosed(thisLine) == -1) && IsParent(thisLine) + normal! zc + let fold_cursor = getpos(".") + normal! ]p + let put_cursor = getpos(".") + call setpos('.',fold_cursor) + normal! zo + call setpos('.',put_cursor) + else + normal! ]p + endif +endfunction + + +function! VOputreg() + let thisLine = line(".") + if (foldclosed(thisLine) == -1) && IsParent(thisLine) + normal! zc + let fold_cursor = getpos(".") + normal! "+]p + let put_cursor = getpos(".") + call setpos('.',fold_cursor) + normal! zo + call setpos('.',put_cursor) + else + normal! "+]p + endif +endfunction + + + + + + + + + + diff --git a/pack/acp/start/vimoutliner/vimoutliner/plugin/votl_tags.vim b/pack/acp/start/vimoutliner/vimoutliner/plugin/votl_tags.vim new file mode 100644 index 0000000..c5bebde --- /dev/null +++ b/pack/acp/start/vimoutliner/vimoutliner/plugin/votl_tags.vim @@ -0,0 +1,246 @@ +" File: plugin/votl_tags.vim +" Version: 1.0 +" Modified: 2011-02-28 +" Description: This plugin provides inter-outline links for vimoutliner. +" Maintainer: Israel Chauca F. +" Manual: The following mappings are added: +" - : Follow a link. +" - : Jump back in the link-history. +" - l : Create a link. +" ============================================================================ + +if v:version < 700 + echom 'VimOutliner: votl_tags.vim requires Vim 7.0 or later.' + finish +endif + +" Create outlines' jump-list. +if !exists('w:vo_jump_list') + let w:vo_jump_list = [] +endif + +" Mappings {{{1 + +" Follow inter-outline link. +noremap VO_FollowLink :call follow_link() +if !hasmapto('VO_FollowLink') + "map VO_FollowLink + map VO_FollowLink +endif + +" Go back to previous outline. +noremap VO_JumpBack :call jump_back() +if !hasmapto('VO_JumpBack') + "map VO_JumpBack + map VO_JumpBack +endif + +" Create a link from a word in normal mode. +noremap VO_CreateLink :call create_link() +if !hasmapto('VO_CreateLink') + silent! map l VO_CreateLink +endif + +" Create a link from a word in insert mode. +inoremap VO_CreateLinkI :call create_link() +if !hasmapto('VO_CreateLinkI') + silent! imap l VO_CreateLinkI +endif + +" Functions {{{1 + +let s:checkboxpat = '\%(\[[^[\]]\+\]\s\+\%(\d*%\d*\s\+\)\?\)\?' + +" Don't re-load functions. +if exists('s:loaded') + finish +endif +let s:loaded = 1 + +" s:get_link() {{{2 +" Get link data. +function! s:get_link(linenr) + " Check if it's a valid link. + let line = getline(a:linenr) + if line =~? '\m^\t*'.s:checkboxpat.'_tag_\w\+\s*$' + " Don't remember where this bit came from, please let me know if you do. + let [_,file,row,col;m0] = matchlist(getline(a:linenr + 1), '\m^\t*'.s:checkboxpat.'\([^:]\+\)\%(:\(\d\+\)\)\?\%(:\(\d\+\)\)\?$') + elseif line =~? '\m^\t*'.s:checkboxpat.'_ilink_\(.\{-}:\s\)\?\s*\S.*$' + let pat = '\m^\t*'.s:checkboxpat.'_ilink_\%([^:\\/]\{-}:\s\)\?\s*\(.\+\)\%(:\(\d\+\)\)\?\%(:\(\d\+\)\)\?$' + let [_,file,row,col;m0] = matchlist(line, pat) + else + return ['',0,0,0] + endif + let is_inner_link = 0 + if file == '%' + let file = expand('%:p') + let is_inner_link = 1 + endif + let row = (row == '' ? 0 : row * 1) + let col = (col == '' ? 0 : col * 1) + + return [file, row, col, is_inner_link] +endfunction + +" s:follow_link() {{{2 +" Follow an interoutline link. +function! s:follow_link() + " Get link data. + let [file, row, col, is_inner_link] = s:get_link(line('.')) + if file == '' + echom 'Vimoutliner: "'.substitute(getline('.'), '\m^\t*'.s:checkboxpat, '', '').'" doesn''t not look like an inter-outline link.' + return + endif + + " Check if file path exists. + let file = s:get_absolute_path(expand('%:h'), file) + let file = fnamemodify(file,':p') + let baseDir = fnamemodify(file,':h') + let dirconfirm = 0 + " Check if directories exists. {{{3 + if glob(baseDir) == '' + if exists('*confirm') + let dirconfirm = confirm('The linked file "'.file.'" and one or more directories do not exist, do you want to create them now?', "&Yes\n&No", '2', 'Question') + else + " Can't ask, asume a yes for answer. + let dirconfirm = 1 + endif + if dirconfirm == 1 + " Create dir(s): + if exists('*mkdir') + call mkdir(baseDir,'p') + elseif executable('mkdir') + call system('`which mkdir` -p '.shellescape(baseDir)) + else + echom 'Vimoutliner: Vim can not create the required directories, please create them yourself.' + return + endif + else + return + endif + endif + " Check if file exists. {{{3 + if glob(file) == '' + if exists('*confirm') && dirconfirm == 0 + let confirm = confirm('The linked file "'.file.'" does not exist, do you want to create it now?', "&Yes\n&No", '2', 'Question') + else + " Can't ask, asume a yes for answer. + let confirm = 1 + endif + if confirm == 1 + call writefile([], file) + else + return + endif + endif + " }}}3 + " Now let's jump to that outline. + try + call s:update_jump_list() + if !is_inner_link + exec "buffer ".bufnr(substitute(file, '\m^'.getcwd().'/','',''), 1) + endif + if row > 0 + call setpos('.',[0,row,col,0]) + endif + setlocal buflisted + catch + " Prevent reporting that the error ocurred inside this function. + echoh ErrorMsg + echom substitute(v:exception,'\m^Vim(.\{-}):','','') + echoh None + endtry + return '' +endfunction +" s:get_absolute_path(baseDir, fileName) {{{2 +" Guess an absolute path +function! s:get_absolute_path(baseDir, fileName) + let baseDir = a:baseDir + if baseDir !~ '/$' + let baseDir = baseDir . '/' + endif + if a:fileName =~ '^/' + let absFileName = a:fileName + else + let absFileName = baseDir . a:fileName + endif + + let absFileName = substitute(absFileName, '\m/\./', '/', 'g') + while absFileName =~ '/\.\./' + absFileName = substitute(absFileName, '\m/[^/]*\.\./', '', '') + endwhile + return absFileName +endfunction +" s:update_jump_list() {{{2 +" Add current outline to list. +function! s:update_jump_list() + call add(w:vo_jump_list, [bufnr('%')] + getpos('.')) +endfunction +" s:remove_buf(buf) {{{2 +" Remove outline from list. +function! s:remove_buf() + if !exists('w:vo_jump_list') || len(w:vo_jump_list) == 0 + return + endif + " Remove last outline. + call remove(w:vo_jump_list, -1) +endfunction +" s:jump_back() {{{2 +" Jump back to the previous outline. +function! s:jump_back() + if len(w:vo_jump_list) == 0 + echom 'This is the first outline.' + return + endif + exec "buffer ".w:vo_jump_list[-1][0] + call setpos('.', w:vo_jump_list[-1][1 : ]) + call s:remove_buf() +endfunction +" s:create_link() {{{2 +" Create an interoutline link with the current keyword under the cursor. +function! s:create_link() + let line = getline('.') + " Create link on a header only + if line =~ '\m^\t\+[^ :;<>|]' + echom 'Vimoutliner: Links have to be on a header.' + return + endif + " Check if the there's is some content in the current line and a current + " link doesn't exists. + if line =~# '\m^\t*'.s:checkboxpat.'_ilink_\%([^:]\{-}:\s\)\?\s*\S\+.*$' + echom 'Vimoutliner: Looks like "'.substitute(line,'^\t*'.s:checkboxpat.'\(\S.*$\)','\1','').'" is already a link.' + return + endif + call inputsave() + let path = input('Linked outline''s path: ', '', 'file') + call inputrestore() + if path == '' + " User canceled. + return '' + endif + let path = matchstr(path, '\m^\t*'.s:checkboxpat.'\zs\S.\{-}\ze\s*$') + "if path !~ '\.otl$' + "" Add extension. + "let path = path.'.otl' + "endif + let tag = '_ilink_' + let [_,indent,checkbox,label;m0] = matchlist(line, '\m^\(\t*\)\('.s:checkboxpat.'\)\%(_ilink_\)\?\s*\(\S\%(.\{-1,}\S\)\?\)\?\s*\%(:\s\)\?\s*$') + "echom indent.'-'.checkbox.'-'.label + if indent == '' + let indent = matchstr(getline(line('.')-1), '\m^\(\t*\)') + endif + if label !~ ':\s*$' + let label = substitute(label, '\m\s*$', ': ', '') + else + let label = substitute(label, '\m:\s*$', ': ', '') + endif + + call setline(line('.'), indent.checkbox.tag.' '.label.path) + echo '' +endfunction +" Autocommands {{{1 +augroup vo_links + au! + au BufWinEnter * if !exists('w:vo_jump_list') | let w:vo_jump_list = [] | endif +augroup END +"{{{1 vim:foldmethod=marker diff --git a/pack/acp/start/vimoutliner/vimoutliner/scripts/MediaWiki2otl b/pack/acp/start/vimoutliner/vimoutliner/scripts/MediaWiki2otl new file mode 100644 index 0000000..f8f5f1a --- /dev/null +++ b/pack/acp/start/vimoutliner/vimoutliner/scripts/MediaWiki2otl @@ -0,0 +1,17 @@ +"delete trailing white space +:%s/^[ \t][ \t]*\(.*\)$/\1/ +"delete one line from each block of empty lines +:g/^\_$\n\_^..*$/d +"add leading : to body text +:%s/^[^=]..*[^=]$/:&/ +"add leading : to dividers made entirely of equal signs +:%s/^==*$/:&/ +"delete one leading = and space from heading +"delete trailing space and = from heading +"\1 is leading equal signs. \2 is heading. +:%s/^=\(=*\) \(.*\) =\+$/\1\2/ +"indent body text lines (lines starting with ":") +"how to indent body text lines? +"indent headings +"substitute each = with tab +:g/^=/s/=/\t/g diff --git a/pack/acp/start/vimoutliner/vimoutliner/scripts/MediaWiki2otl.desc b/pack/acp/start/vimoutliner/vimoutliner/scripts/MediaWiki2otl.desc new file mode 100644 index 0000000..6f8a7f6 --- /dev/null +++ b/pack/acp/start/vimoutliner/vimoutliner/scripts/MediaWiki2otl.desc @@ -0,0 +1,37 @@ +This email has the attachment. + +Hello Vim Outliners, + +I want to migrate some word processor documents to otl.  If you know of a formatter to convert "MediaWiki to otl" or "odt to otl" or "doc to otl" please let me know.  I did not find one. + +I am attempting to write ex script to convert MediaWiki to otl.  This would be useful because LibreOffice Writer can export to MediaWiki format, and then the script would convert it to otl. + +The heading format in MediaWiki is simple; one equal sign for each level in the heading hierarchy e.g.: + += head1 = +body text +== head2 == +body text +=== head3 === +body text + +The above MediaWiki text should convert to otl like this: + +head1 +:body text +head2 +:body text +head3 +:body text + +The attached MediaWiki2otl script converts MediaWiki to otl except for one thing.  I can not figure out how to indent the body text lines (indent lines that start with “:”). Here is the pseudo code: + +if current line has “=” +set count to number of “=” +else   +insert count “\t” + +Can this be done in ex script? i.e. Is there an ex command that can set a variable (or register) and an ex command to read that variable in the following lines? + +Thank you, +wolfv diff --git a/pack/acp/start/vimoutliner/vimoutliner/scripts/Node/COPYING b/pack/acp/start/vimoutliner/vimoutliner/scripts/Node/COPYING new file mode 100644 index 0000000..0e7003c --- /dev/null +++ b/pack/acp/start/vimoutliner/vimoutliner/scripts/Node/COPYING @@ -0,0 +1,118 @@ +The Litt Perl Development Tools License +Version 1.0, 3/14/2003 +--------------------------------------- + +The Litt Perl Development Tools License (LPDTL) +consists of the GNU GPL plus an exception, plus an +exception to that exception. + +This program is free software; you can +redistribute it and/or modify it under the terms +of version 2 of the GNU General Public License as +published by the Free Software Foundation. + +This program is distributed in the hope that it +will be useful, but WITHOUT ANY WARRANTY; without +even the implied warranty of MERCHANTABILITY or +FITNESS FOR A PARTICULAR PURPOSE. See the GNU +General Public License for more details. + +You should have received a copy of the GNU General +Public License along with this software; see the +file COPYING.GPL. If not, write to the Free +Software Foundation, Inc., 59 Temple Place, Suite +330, Boston, MA 02111-1307 USA. Other locations +for the GNU General Public License include: + + http://www.troubleshooters.com/licenses/LPDTL/COPYING.GPL + +and + + http://www.gnu.org/licenses/gpl.txt + + +THE EXCEPTION + +As a special exception, the author of this Perl +Development Tool gives permission for additional +uses of the text contained in this Perl +Development Tool. + +The exception is that, if you reference the LPDTL +licensed software, by use of a Perl "use" or +"require" statement, from other files, this does +not by itself cause the files referencing this +Perl Development Tool to be covered by the GNU +General Public License. Your use of the +referencing files is in no way restricted on +account of their referencing the code in this Perl +Development Tool. + +Likewise, if you link the LPDTL licensed software +with other files to produce an executable, this +does not by itself cause the resulting executable +to be covered by the GNU General Public License. +Your use of that executable is in no way +restricted on account of linking the LPDTL +licensed software's code into it. + + +EXCEPTION LIMITATIONS + +This exception does not however invalidate any +other reasons why the referencing files, or any +produced executables, might be covered by the GNU +General Public License. + +This exception applies only to the code released +by its author under the Litt Perl Development +Tools License. Such code must clearly state that +it's covered by the Litt Perl Development Tools +License. If you copy code from other GNU-GPL +compatible software, as the General Public License +permits, the exception does not apply to the code +that you add in this way. To avoid misleading +anyone as to the status of such modified files, +you must delete this exception notice from them. + +If you write modifications of your own for +software licensed under the Litt Perl Development +Tools License, it is your choice whether to permit +this exception to apply to your modifications. If +you do not wish that, delete this exception +notice. + +This exception cannot be applied to software whose +license, End User License Agreement, or Terms Of +Use limit reverse engineering or discussion about +the software. This exception cannot be applied to +software incorporating any type of software +patents. + + +THE EXCEPTION TO THE EXCEPTION + +The intent of the Litt Perl Development Tools +License (LPDTL) is to produce a free software +development environment enabling a software +developer to create free software, nonfree +software, or proprietary software. Therefore, all +of the resulting program's software development +features must be contained in the LPDTL licensed +software, or in GPL licensed software. It is a +violation of the LPDTL to place any software +development features in any file not licensed +under either the GPL or the LPDTL. + +A "software development feature" is a feature +enabling creation or modification of software. + + +DISCUSSION OF INTENT OF THIS LICENSE + +You can find a discussion of the intent of this +license in the LPDTL_discuss.txt file. If you +haven't been given a copy of this file, you can +find it in the +http://www.troubleshooters.com/licenses/LPDTL/ +directory. diff --git a/pack/acp/start/vimoutliner/vimoutliner/scripts/Node/COPYING.GPL b/pack/acp/start/vimoutliner/vimoutliner/scripts/Node/COPYING.GPL new file mode 100644 index 0000000..5b6e7c6 --- /dev/null +++ b/pack/acp/start/vimoutliner/vimoutliner/scripts/Node/COPYING.GPL @@ -0,0 +1,340 @@ + GNU GENERAL PUBLIC LICENSE + Version 2, June 1991 + + Copyright (C) 1989, 1991 Free Software Foundation, Inc. + 59 Temple Place, Suite 330, Boston, MA 02111-1307 USA + Everyone is permitted to copy and distribute verbatim copies + of this license document, but changing it is not allowed. + + Preamble + + The licenses for most software are designed to take away your +freedom to share and change it. By contrast, the GNU General Public +License is intended to guarantee your freedom to share and change free +software--to make sure the software is free for all its users. This +General Public License applies to most of the Free Software +Foundation's software and to any other program whose authors commit to +using it. (Some other Free Software Foundation software is covered by +the GNU Library General Public License instead.) You can apply it to +your programs, too. + + When we speak of free software, we are referring to freedom, not +price. Our General Public Licenses are designed to make sure that you +have the freedom to distribute copies of free software (and charge for +this service if you wish), that you receive source code or can get it +if you want it, that you can change the software or use pieces of it +in new free programs; and that you know you can do these things. + + To protect your rights, we need to make restrictions that forbid +anyone to deny you these rights or to ask you to surrender the rights. +These restrictions translate to certain responsibilities for you if you +distribute copies of the software, or if you modify it. + + For example, if you distribute copies of such a program, whether +gratis or for a fee, you must give the recipients all the rights that +you have. You must make sure that they, too, receive or can get the +source code. And you must show them these terms so they know their +rights. + + We protect your rights with two steps: (1) copyright the software, and +(2) offer you this license which gives you legal permission to copy, +distribute and/or modify the software. + + Also, for each author's protection and ours, we want to make certain +that everyone understands that there is no warranty for this free +software. If the software is modified by someone else and passed on, we +want its recipients to know that what they have is not the original, so +that any problems introduced by others will not reflect on the original +authors' reputations. + + Finally, any free program is threatened constantly by software +patents. We wish to avoid the danger that redistributors of a free +program will individually obtain patent licenses, in effect making the +program proprietary. To prevent this, we have made it clear that any +patent must be licensed for everyone's free use or not licensed at all. + + The precise terms and conditions for copying, distribution and +modification follow. + + GNU GENERAL PUBLIC LICENSE + TERMS AND CONDITIONS FOR COPYING, DISTRIBUTION AND MODIFICATION + + 0. This License applies to any program or other work which contains +a notice placed by the copyright holder saying it may be distributed +under the terms of this General Public License. The "Program", below, +refers to any such program or work, and a "work based on the Program" +means either the Program or any derivative work under copyright law: +that is to say, a work containing the Program or a portion of it, +either verbatim or with modifications and/or translated into another +language. (Hereinafter, translation is included without limitation in +the term "modification".) Each licensee is addressed as "you". + +Activities other than copying, distribution and modification are not +covered by this License; they are outside its scope. The act of +running the Program is not restricted, and the output from the Program +is covered only if its contents constitute a work based on the +Program (independent of having been made by running the Program). +Whether that is true depends on what the Program does. + + 1. You may copy and distribute verbatim copies of the Program's +source code as you receive it, in any medium, provided that you +conspicuously and appropriately publish on each copy an appropriate +copyright notice and disclaimer of warranty; keep intact all the +notices that refer to this License and to the absence of any warranty; +and give any other recipients of the Program a copy of this License +along with the Program. + +You may charge a fee for the physical act of transferring a copy, and +you may at your option offer warranty protection in exchange for a fee. + + 2. You may modify your copy or copies of the Program or any portion +of it, thus forming a work based on the Program, and copy and +distribute such modifications or work under the terms of Section 1 +above, provided that you also meet all of these conditions: + + a) You must cause the modified files to carry prominent notices + stating that you changed the files and the date of any change. + + b) You must cause any work that you distribute or publish, that in + whole or in part contains or is derived from the Program or any + part thereof, to be licensed as a whole at no charge to all third + parties under the terms of this License. + + c) If the modified program normally reads commands interactively + when run, you must cause it, when started running for such + interactive use in the most ordinary way, to print or display an + announcement including an appropriate copyright notice and a + notice that there is no warranty (or else, saying that you provide + a warranty) and that users may redistribute the program under + these conditions, and telling the user how to view a copy of this + License. (Exception: if the Program itself is interactive but + does not normally print such an announcement, your work based on + the Program is not required to print an announcement.) + +These requirements apply to the modified work as a whole. If +identifiable sections of that work are not derived from the Program, +and can be reasonably considered independent and separate works in +themselves, then this License, and its terms, do not apply to those +sections when you distribute them as separate works. But when you +distribute the same sections as part of a whole which is a work based +on the Program, the distribution of the whole must be on the terms of +this License, whose permissions for other licensees extend to the +entire whole, and thus to each and every part regardless of who wrote it. + +Thus, it is not the intent of this section to claim rights or contest +your rights to work written entirely by you; rather, the intent is to +exercise the right to control the distribution of derivative or +collective works based on the Program. + +In addition, mere aggregation of another work not based on the Program +with the Program (or with a work based on the Program) on a volume of +a storage or distribution medium does not bring the other work under +the scope of this License. + + 3. You may copy and distribute the Program (or a work based on it, +under Section 2) in object code or executable form under the terms of +Sections 1 and 2 above provided that you also do one of the following: + + a) Accompany it with the complete corresponding machine-readable + source code, which must be distributed under the terms of Sections + 1 and 2 above on a medium customarily used for software interchange; or, + + b) Accompany it with a written offer, valid for at least three + years, to give any third party, for a charge no more than your + cost of physically performing source distribution, a complete + machine-readable copy of the corresponding source code, to be + distributed under the terms of Sections 1 and 2 above on a medium + customarily used for software interchange; or, + + c) Accompany it with the information you received as to the offer + to distribute corresponding source code. (This alternative is + allowed only for noncommercial distribution and only if you + received the program in object code or executable form with such + an offer, in accord with Subsection b above.) + +The source code for a work means the preferred form of the work for +making modifications to it. For an executable work, complete source +code means all the source code for all modules it contains, plus any +associated interface definition files, plus the scripts used to +control compilation and installation of the executable. However, as a +special exception, the source code distributed need not include +anything that is normally distributed (in either source or binary +form) with the major components (compiler, kernel, and so on) of the +operating system on which the executable runs, unless that component +itself accompanies the executable. + +If distribution of executable or object code is made by offering +access to copy from a designated place, then offering equivalent +access to copy the source code from the same place counts as +distribution of the source code, even though third parties are not +compelled to copy the source along with the object code. + + 4. You may not copy, modify, sublicense, or distribute the Program +except as expressly provided under this License. Any attempt +otherwise to copy, modify, sublicense or distribute the Program is +void, and will automatically terminate your rights under this License. +However, parties who have received copies, or rights, from you under +this License will not have their licenses terminated so long as such +parties remain in full compliance. + + 5. You are not required to accept this License, since you have not +signed it. However, nothing else grants you permission to modify or +distribute the Program or its derivative works. These actions are +prohibited by law if you do not accept this License. Therefore, by +modifying or distributing the Program (or any work based on the +Program), you indicate your acceptance of this License to do so, and +all its terms and conditions for copying, distributing or modifying +the Program or works based on it. + + 6. Each time you redistribute the Program (or any work based on the +Program), the recipient automatically receives a license from the +original licensor to copy, distribute or modify the Program subject to +these terms and conditions. You may not impose any further +restrictions on the recipients' exercise of the rights granted herein. +You are not responsible for enforcing compliance by third parties to +this License. + + 7. If, as a consequence of a court judgment or allegation of patent +infringement or for any other reason (not limited to patent issues), +conditions are imposed on you (whether by court order, agreement or +otherwise) that contradict the conditions of this License, they do not +excuse you from the conditions of this License. If you cannot +distribute so as to satisfy simultaneously your obligations under this +License and any other pertinent obligations, then as a consequence you +may not distribute the Program at all. For example, if a patent +license would not permit royalty-free redistribution of the Program by +all those who receive copies directly or indirectly through you, then +the only way you could satisfy both it and this License would be to +refrain entirely from distribution of the Program. + +If any portion of this section is held invalid or unenforceable under +any particular circumstance, the balance of the section is intended to +apply and the section as a whole is intended to apply in other +circumstances. + +It is not the purpose of this section to induce you to infringe any +patents or other property right claims or to contest validity of any +such claims; this section has the sole purpose of protecting the +integrity of the free software distribution system, which is +implemented by public license practices. Many people have made +generous contributions to the wide range of software distributed +through that system in reliance on consistent application of that +system; it is up to the author/donor to decide if he or she is willing +to distribute software through any other system and a licensee cannot +impose that choice. + +This section is intended to make thoroughly clear what is believed to +be a consequence of the rest of this License. + + 8. If the distribution and/or use of the Program is restricted in +certain countries either by patents or by copyrighted interfaces, the +original copyright holder who places the Program under this License +may add an explicit geographical distribution limitation excluding +those countries, so that distribution is permitted only in or among +countries not thus excluded. In such case, this License incorporates +the limitation as if written in the body of this License. + + 9. The Free Software Foundation may publish revised and/or new versions +of the General Public License from time to time. Such new versions will +be similar in spirit to the present version, but may differ in detail to +address new problems or concerns. + +Each version is given a distinguishing version number. If the Program +specifies a version number of this License which applies to it and "any +later version", you have the option of following the terms and conditions +either of that version or of any later version published by the Free +Software Foundation. If the Program does not specify a version number of +this License, you may choose any version ever published by the Free Software +Foundation. + + 10. If you wish to incorporate parts of the Program into other free +programs whose distribution conditions are different, write to the author +to ask for permission. For software which is copyrighted by the Free +Software Foundation, write to the Free Software Foundation; we sometimes +make exceptions for this. Our decision will be guided by the two goals +of preserving the free status of all derivatives of our free software and +of promoting the sharing and reuse of software generally. + + NO WARRANTY + + 11. BECAUSE THE PROGRAM IS LICENSED FREE OF CHARGE, THERE IS NO WARRANTY +FOR THE PROGRAM, TO THE EXTENT PERMITTED BY APPLICABLE LAW. EXCEPT WHEN +OTHERWISE STATED IN WRITING THE COPYRIGHT HOLDERS AND/OR OTHER PARTIES +PROVIDE THE PROGRAM "AS IS" WITHOUT WARRANTY OF ANY KIND, EITHER EXPRESSED +OR IMPLIED, INCLUDING, BUT NOT LIMITED TO, THE IMPLIED WARRANTIES OF +MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE. THE ENTIRE RISK AS +TO THE QUALITY AND PERFORMANCE OF THE PROGRAM IS WITH YOU. SHOULD THE +PROGRAM PROVE DEFECTIVE, YOU ASSUME THE COST OF ALL NECESSARY SERVICING, +REPAIR OR CORRECTION. + + 12. IN NO EVENT UNLESS REQUIRED BY APPLICABLE LAW OR AGREED TO IN WRITING +WILL ANY COPYRIGHT HOLDER, OR ANY OTHER PARTY WHO MAY MODIFY AND/OR +REDISTRIBUTE THE PROGRAM AS PERMITTED ABOVE, BE LIABLE TO YOU FOR DAMAGES, +INCLUDING ANY GENERAL, SPECIAL, INCIDENTAL OR CONSEQUENTIAL DAMAGES ARISING +OUT OF THE USE OR INABILITY TO USE THE PROGRAM (INCLUDING BUT NOT LIMITED +TO LOSS OF DATA OR DATA BEING RENDERED INACCURATE OR LOSSES SUSTAINED BY +YOU OR THIRD PARTIES OR A FAILURE OF THE PROGRAM TO OPERATE WITH ANY OTHER +PROGRAMS), EVEN IF SUCH HOLDER OR OTHER PARTY HAS BEEN ADVISED OF THE +POSSIBILITY OF SUCH DAMAGES. + + END OF TERMS AND CONDITIONS + + How to Apply These Terms to Your New Programs + + If you develop a new program, and you want it to be of the greatest +possible use to the public, the best way to achieve this is to make it +free software which everyone can redistribute and change under these terms. + + To do so, attach the following notices to the program. It is safest +to attach them to the start of each source file to most effectively +convey the exclusion of warranty; and each file should have at least +the "copyright" line and a pointer to where the full notice is found. + + + Copyright (C) + + This program is free software; you can redistribute it and/or modify + it under the terms of the GNU General Public License as published by + the Free Software Foundation; either version 2 of the License, or + (at your option) any later version. + + This program is distributed in the hope that it will be useful, + but WITHOUT ANY WARRANTY; without even the implied warranty of + MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the + GNU General Public License for more details. + + You should have received a copy of the GNU General Public License + along with this program; if not, write to the Free Software + Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA 02111-1307 USA + + +Also add information on how to contact you by electronic and paper mail. + +If the program is interactive, make it output a short notice like this +when it starts in an interactive mode: + + Gnomovision version 69, Copyright (C) year name of author + Gnomovision comes with ABSOLUTELY NO WARRANTY; for details type `show w'. + This is free software, and you are welcome to redistribute it + under certain conditions; type `show c' for details. + +The hypothetical commands `show w' and `show c' should show the appropriate +parts of the General Public License. Of course, the commands you use may +be called something other than `show w' and `show c'; they could even be +mouse-clicks or menu items--whatever suits your program. + +You should also get your employer (if you work as a programmer) or your +school, if any, to sign a "copyright disclaimer" for the program, if +necessary. Here is a sample; alter the names: + + Yoyodyne, Inc., hereby disclaims all copyright interest in the program + `Gnomovision' (which makes passes at compilers) written by James Hacker. + + , 1 April 1989 + Ty Coon, President of Vice + +This General Public License does not permit incorporating your program into +proprietary programs. If your program is a subroutine library, you may +consider it more useful to permit linking proprietary applications with the +library. If this is what you want to do, use the GNU Library General +Public License instead of this License. diff --git a/pack/acp/start/vimoutliner/vimoutliner/scripts/Node/COPYING.LPDTL.1.0 b/pack/acp/start/vimoutliner/vimoutliner/scripts/Node/COPYING.LPDTL.1.0 new file mode 100644 index 0000000..0e7003c --- /dev/null +++ b/pack/acp/start/vimoutliner/vimoutliner/scripts/Node/COPYING.LPDTL.1.0 @@ -0,0 +1,118 @@ +The Litt Perl Development Tools License +Version 1.0, 3/14/2003 +--------------------------------------- + +The Litt Perl Development Tools License (LPDTL) +consists of the GNU GPL plus an exception, plus an +exception to that exception. + +This program is free software; you can +redistribute it and/or modify it under the terms +of version 2 of the GNU General Public License as +published by the Free Software Foundation. + +This program is distributed in the hope that it +will be useful, but WITHOUT ANY WARRANTY; without +even the implied warranty of MERCHANTABILITY or +FITNESS FOR A PARTICULAR PURPOSE. See the GNU +General Public License for more details. + +You should have received a copy of the GNU General +Public License along with this software; see the +file COPYING.GPL. If not, write to the Free +Software Foundation, Inc., 59 Temple Place, Suite +330, Boston, MA 02111-1307 USA. Other locations +for the GNU General Public License include: + + http://www.troubleshooters.com/licenses/LPDTL/COPYING.GPL + +and + + http://www.gnu.org/licenses/gpl.txt + + +THE EXCEPTION + +As a special exception, the author of this Perl +Development Tool gives permission for additional +uses of the text contained in this Perl +Development Tool. + +The exception is that, if you reference the LPDTL +licensed software, by use of a Perl "use" or +"require" statement, from other files, this does +not by itself cause the files referencing this +Perl Development Tool to be covered by the GNU +General Public License. Your use of the +referencing files is in no way restricted on +account of their referencing the code in this Perl +Development Tool. + +Likewise, if you link the LPDTL licensed software +with other files to produce an executable, this +does not by itself cause the resulting executable +to be covered by the GNU General Public License. +Your use of that executable is in no way +restricted on account of linking the LPDTL +licensed software's code into it. + + +EXCEPTION LIMITATIONS + +This exception does not however invalidate any +other reasons why the referencing files, or any +produced executables, might be covered by the GNU +General Public License. + +This exception applies only to the code released +by its author under the Litt Perl Development +Tools License. Such code must clearly state that +it's covered by the Litt Perl Development Tools +License. If you copy code from other GNU-GPL +compatible software, as the General Public License +permits, the exception does not apply to the code +that you add in this way. To avoid misleading +anyone as to the status of such modified files, +you must delete this exception notice from them. + +If you write modifications of your own for +software licensed under the Litt Perl Development +Tools License, it is your choice whether to permit +this exception to apply to your modifications. If +you do not wish that, delete this exception +notice. + +This exception cannot be applied to software whose +license, End User License Agreement, or Terms Of +Use limit reverse engineering or discussion about +the software. This exception cannot be applied to +software incorporating any type of software +patents. + + +THE EXCEPTION TO THE EXCEPTION + +The intent of the Litt Perl Development Tools +License (LPDTL) is to produce a free software +development environment enabling a software +developer to create free software, nonfree +software, or proprietary software. Therefore, all +of the resulting program's software development +features must be contained in the LPDTL licensed +software, or in GPL licensed software. It is a +violation of the LPDTL to place any software +development features in any file not licensed +under either the GPL or the LPDTL. + +A "software development feature" is a feature +enabling creation or modification of software. + + +DISCUSSION OF INTENT OF THIS LICENSE + +You can find a discussion of the intent of this +license in the LPDTL_discuss.txt file. If you +haven't been given a copy of this file, you can +find it in the +http://www.troubleshooters.com/licenses/LPDTL/ +directory. diff --git a/pack/acp/start/vimoutliner/vimoutliner/scripts/Node/INSTALL b/pack/acp/start/vimoutliner/vimoutliner/scripts/Node/INSTALL new file mode 100644 index 0000000..03615a8 --- /dev/null +++ b/pack/acp/start/vimoutliner/vimoutliner/scripts/Node/INSTALL @@ -0,0 +1,23 @@ +INSTALLATION PROCEDURES FOR Node.pm + Version 0.2.0 released 5/13/2004 + +Downloading + Download from + http://www.troubleshooters.com/projects/Node/Node.#.#.#.tgz +Installing + The tarball extracts into a directory called Node + cd to the directory into which you want to place Node + Move any existing Node directory out of the way + tar xzvf Node.#.#.#.tgz +Testing + cd into the Node directory + ./hello.pl + troubleshoot as necessary +Using + In any perl program using Node not in the Node directory... + Use following code at beginning + #!/usr/bin/perl -w -I/path/to/Node + use strict; + use Node; + If destination machine has unknown Node.pm directory... + See example_nodepath.pl diff --git a/pack/acp/start/vimoutliner/vimoutliner/scripts/Node/LPDTL_discuss.txt b/pack/acp/start/vimoutliner/vimoutliner/scripts/Node/LPDTL_discuss.txt new file mode 100644 index 0000000..9ee1b08 --- /dev/null +++ b/pack/acp/start/vimoutliner/vimoutliner/scripts/Node/LPDTL_discuss.txt @@ -0,0 +1,26 @@ +INTENT OF THE LITT PERL DEVELOPMENT TOOL LICENSE + +The intent of the Litt Perl Development Tool License (LPDTL) is to provide +programmers with a development tool that is copylefted free software without +requiring applications built from this tool to be free software. + +I (Steve Litt) have tried to craft the LPDTL to prevent "cute and +innovative" ways of taking this tool private. For instance, a person might +try to make the LPDTL licensed code dependent on subroutines in proprietary +subroutines. This is why the LPDTL has a clause stating that all +*development* features must reside in the LPDTL code, or in GPL code, but +not non-GPL-compatible code. + +Although the LPDTL allows its use with software of almost any license, it +specifically forbids use with licenses doing any of the following: + +1. Restricting reverse engineering + +2. Restricting discussion about the software + +3. Code that includes software patents + +I feel that restrictions on reverse engineering and discussion, and software +patents, are so destructive to society, that I have included language +preventing use of LPDTL licensed code with any software incorporating any of +these three atrocities. diff --git a/pack/acp/start/vimoutliner/vimoutliner/scripts/Node/Node.pm b/pack/acp/start/vimoutliner/vimoutliner/scripts/Node/Node.pm new file mode 100644 index 0000000..cec1f97 --- /dev/null +++ b/pack/acp/start/vimoutliner/vimoutliner/scripts/Node/Node.pm @@ -0,0 +1,475 @@ +#!/usr/bin/perl -w + +####################################################################### +# Copyright (C) 2003 by Steve Litt, all rights reserved. +# Licensed under version 1 of the +# Litt Perl Development Tools License +# See COPYING file +# Or COPYING.LPDTL.1.0 +# Or see http://www.troubleshooters.com/licenses/LPDTL/COPYING.LPDTL.1.0 +# +# ABSOLUTELY NO WARRANTY, USE AT YOUR OWN RISK! +# +# Version 0.2.0 released 5/13/2004 + +use strict; + +package Node; +sub new($$$$) + { + my($typeOfClass) = $_[0]; + my($self) = {}; + bless($self, $typeOfClass); + + $self->{'name'}=$_[1]; + $self->{'type'}=$_[2]; + $self->{'value'}=$_[3]; + + + $self->{'nextsibling'}=undef; + $self->{'prevsibling'}=undef; + $self->{'parent'}=undef; + $self->{'firstchild'}=undef; + $self->{'lastchild'}=undef; + + $self->{'attributes'}={}; + + return($self); + } + + +#### For single attribute +sub setAttribute() + { + $_[0]->{'attributes'}->{$_[1]} = $_[2]; + } + +sub removeAttribute() + { + delete $_[0]->{'attributes'}->{$_[1]}; + } + +sub getAttribute() + { + if($_[0]->hasAttributes()) + { + return $_[0]->{'attributes'}->{$_[1]}; + } + else + { + return(undef); + } + } + +sub hasAttribute() + { + if($_[0]->hasAttributes()) + { + return defined($_[0]->getAttribute($_[1])); + } + else + { + return(undef); + } + } + +#### For attribute array +sub hasAttributes() + { + return defined($_[0]->getAttributes()); + } +sub getAttributes() + { + return %{$_[0]->{'attributes'}}; + } + +sub setAttributes() + { + $_[0]->{'attributes'} = $_[1]; + } + + + + +#### For traversing +sub getFirstChild() {return($_[0]->{'firstchild'});} +sub getNextSibling() {return($_[0]->{'nextsibling'});} +sub getParent() {return($_[0]->{'parent'});} + +sub hasFirstChild() {return(defined($_[0]->{'firstchild'}));} +sub hasNextSibling() {return(defined($_[0]->{'nextsibling'}));} +sub hasParent() {return(defined($_[0]->{'parent'}));} + +#### For reverse traversing +sub getLastChild() {return($_[0]->{'lastchild'});} +sub getPrevSibling() {return($_[0]->{'prevsibling'});} + +sub hasLastChild() {return(defined($_[0]->{'lastchild'}));} +sub hasPrevSibling() {return(defined($_[0]->{'prevsibling'}));} + +#### For content +sub getName() {return($_[0]->{'name'});} +sub getType() {return($_[0]->{'type'});} +sub getValue() {return($_[0]->{'value'});} +sub setName() {$_[0]->{'name'} = $_[1];} +sub setType() {$_[0]->{'type'} = $_[1];} +sub setValue() {$_[0]->{'value'} = $_[1];} + +sub hasName() {return(defined($_[0]->{'name'}));} +sub hasType() {return(defined($_[0]->{'type'}));} +sub hasValue() {return(defined($_[0]->{'value'}));} + +#### For setting pointers, should probably be private or protected +sub setFirstChild() {$_[0]->{'firstchild'} = $_[1];} +sub setNextSibling() {$_[0]->{'nextsibling'} = $_[1];} +sub setParent() {$_[0]->{'parent'} = $_[1];} +sub setLastChild() {$_[0]->{'lastchild'} = $_[1];} +sub setPrevSibling() {$_[0]->{'prevsibling'} = $_[1];} + +#### For creation +sub insertSiblingBeforeYou() + { + my($self) = $_[0]; + my($oldPrevSibling) = $self->getPrevSibling(); + $self->setPrevSibling($_[1]); + $self->getPrevSibling()->setParent($self->getParent()); + $self->getPrevSibling()->setNextSibling($self); + if(!defined($oldPrevSibling)) + { + $self->getParent()->setFirstChild($self->getPrevSibling()); + $self->getPrevSibling()->setPrevSibling(undef); + } + else + { + $self->getPrevSibling()->setPrevSibling($oldPrevSibling); + $oldPrevSibling->setNextSibling($self->getPrevSibling()); + } + return($self->getPrevSibling()); + } + +sub insertSiblingAfterYou() + { + my($self) = $_[0]; + my($oldNextSibling) = $self->getNextSibling(); + $self->setNextSibling($_[1]); + $self->getNextSibling()->setParent($self->getParent()); + $self->getNextSibling()->setPrevSibling($self); + if(!defined($oldNextSibling)) + { + if(defined($self->getParent())) + { + $self->getParent()->setLastChild($self->getNextSibling()); + } + $self->getNextSibling()->setNextSibling(undef); + } + else + { + $self->getNextSibling()->setNextSibling($oldNextSibling); + $oldNextSibling->setPrevSibling($self->getNextSibling()); + } + return($self->getNextSibling()); + } + +sub insertFirstChild() + { + my($self) = $_[0]; + my($oldFirstChild) = $self->getFirstChild(); + if(defined($oldFirstChild)) + { + $oldFirstChild->insertSiblingBeforeYou($_[1]); + } + else + { + $self->setFirstChild($_[1]); + $self->setLastChild($_[1]); + $self->getFirstChild()->setParent($self); + } + return($self->getFirstChild()); + } + +sub insertLastChild() + { + my($self) = $_[0]; + my($oldLastChild) = $self->getLastChild(); + if(defined($oldLastChild)) + { + $oldLastChild->insertSiblingAfterYou($_[1]); + } + else + { + $self->setFirstChild($_[1]); + $self->setLastChild($_[1]); + $self->getFirstChild()->setParent($self); + } + return($self->getLastChild()); + } + +#### For cloning +sub clone() + { + my($self) = $_[0]; + my($clone) = Node->new(); + $clone->setName($self->getName()); + $clone->setType($self->getType()); + $clone->setValue($self->getValue()); + + $clone->setParent($self->getParent()); + $clone->setFirstChild($self->getFirstChild()); + $clone->setLastChild($self->getLastChild()); + $clone->setPrevSibling($self->getPrevSibling()); + $clone->setNextSibling($self->getNextSibling()); + return($clone); + } + +#### For deletion +sub deleteSelf() + { + my($self) = $_[0]; + my($prev) = $self->getPrevSibling(); + my($next) = $self->getNextSibling(); + my($parent) = $self->getParent(); + if((defined($self->getPrevSibling()))&&(defined($self->getNextSibling()))) + { + $self->getNextSibling()->setPrevSibling($self->getPrevSibling()); + $self->getPrevSibling()->setNextSibling($self->getNextSibling()); + } + elsif((!defined($self->getPrevSibling()))&&(!defined($self->getNextSibling()))) + { + $self->getParent()->setFirstChild(undef); + $self->getParent()->setLastChild(undef); + } + elsif(!defined($self->getPrevSibling())) + { + $self->getParent()->setFirstChild($self->getNextSibling()); + $self->getNextSibling()->setPrevSibling(undef); + } + elsif(!defined($self->getNextSibling())) + { + $self->getParent()->setLastChild($self->getPrevSibling()); + $self->getPrevSibling()->setNextSibling(undef); + } + $self->setFirstChild(undef); + $self->setLastChild(undef); + } + +sub deleteTree() + { + my($self) = $_[0]; + +# #### Code to delete children and decendents here + $self->deleteSelf(); + } + +package OutlineParser; +sub new() + { + my($typeOfClass) = $_[0]; + my($self) = {}; + bless($self, $typeOfClass); + $self->{'head'} = Node->new("Header Node", "Head", "Inserted by OutlineParser"); + $self->{'fromstdin'} = 1; + $self->{'zapblanks'} = 1; + return($self); + } + +sub setCommentChar($$) + { + $_[0]->{'commentchar'} = $_[1]; + } + +sub getCommentChar($) + { + return($_[0]->{'commentchar'}); + } + +sub hasCommentChar($) + { + return(defined($_[0]->{'commentchar'})); + } + +sub getFirstNonBlankChar($$) + { + my $self = shift; + my $line = shift; + chomp $line; + my @parts = split(/\s+/,$line, 2); + $line = join('', @parts); + my $firstchar = substr($line, 0, 1); + return $firstchar; + } + + +sub parse() + { + my($self) = $_[0]; + my($fname) = $_[1]; + + my(@levelStack); + push(@levelStack, ($self->{'head'})); + my($checker) = $self->{'head'}; + my($lineno) = 0; + my($prevLevel) = -1; + + my($inf); + if($self->{'fromstdin'} == 0) + { + defined($fname) or die "OutlineParser::parse() requires a filename argument, terminating.\n"; + open(INF, "<" . $fname) or die "OutlineParser::parse() could not open $fname for input, terminating.\n"; + $inf = q(INF); + } + else + { + $inf = qw(STDIN); + } + while(<$inf>) + { + my($line) = $_; + chomp($line); + $lineno++; + my $zapFlag = 0; + my $firstNonBlankChar = $self->getFirstNonBlankChar($line); + if(($self->{'zapblanks'} != 0) && ($firstNonBlankChar eq '')) + { + $zapFlag = 1; + } + if($self->hasCommentChar() && ($self->getCommentChar() eq $firstNonBlankChar)) + { + $zapFlag = 1; + } + + unless($zapFlag) + { + my($level) = 0; + + $line =~ m/^( *)(.*)/; + if(defined($1)) + { + $level = length($1); + $line = $2; + } + else + { + $line = $2; + } + + my $node = Node->new("", "Node", $line); + $node->setAttribute('_lineno', $lineno); + + if($level == $prevLevel) + { + $levelStack[$prevLevel]->insertSiblingAfterYou($node); + $levelStack[$level] = $node; + } + elsif($level == $prevLevel + 1) + { + $levelStack[$prevLevel]->insertFirstChild($node); + $levelStack[$level] = $node; + } + elsif($level > $prevLevel + 1) + { + die "Multiple indent at line $lineno, \"$line\", terminating.\n"; + } + elsif($level < $prevLevel) + { + my($dedent) = $prevLevel - $level; + while($level < $prevLevel) + { + pop(@levelStack); + $prevLevel--; + } + $levelStack[$prevLevel]->insertSiblingAfterYou($node); + $levelStack[$level] = $node; + } + $prevLevel = $level; + } + } + if($self->{'fromstdin'} == 0) {close(INF);} + return($self->getHead()); + } + +sub fromStdin() {$_[0]->{'fromstdin'} = 1;} +sub fromFile() {$_[0]->{'fromstdin'} = 0;} +sub zapBlanks() {$_[0]->{'zapblanks'} = 1;} +sub dontZapBlanks() {$_[0]->{'zapblanks'} = 0;} +sub getHead() {return($_[0]->{'head'});} + + +package Walker; +sub new() + { + my $typeOfClass = $_[0]; + my $self = {}; + bless($self, $typeOfClass); + $self->{'top'} = $_[1]; + $self->{'entrycallback'} = $_[2]; + $self->{'exitcallback'} = $_[3]; + return($self); + } + +sub walk() + { + my($self) = $_[0]; + my($ascending) = 0; + my($checker)=$self->{'top'}; # like a checker you move around a board + my($level)=0; + my($continue) = 1; + my $counter = 0; + while($continue) + { + if($ascending == 0) + { + if(defined($self->{'entrycallback'})) + { + my @args = @{$self->{'entrycallback'}}; + my $sub = shift(@args); + push(@args, ($checker, $level)); + &{$sub}(@args); + } + if($level < 0) {$continue=0;} ## Callback sets negative to terminate + } + else + { + if(defined($self->{'exitcallback'})) + { + my @args = @{$self->{'exitcallback'}}; + my $sub = shift(@args); + push(@args, ($checker, $level)); + &{$sub}(@args); + } + if($level < 0) {$continue=0;} ## Callback sets negative to terminate + if($checker == $self->{'top'}) {$continue=0;} + } + + if($continue == 0) + { + #skip this if/elsif/else entirely + } + elsif(($ascending == 0) && (defined($checker->getFirstChild()))) + { + $ascending = 0; + $checker = $checker->getFirstChild(); + $level++; + } + elsif((defined($checker->getNextSibling())) && ($checker != $self->{'top'})) + { + $ascending = 0; + $checker = $checker->getNextSibling(); + } + elsif(defined($checker->getParent())) + { + $ascending = 1; + $checker = $checker->getParent(); + $level--; +# if($level < 1) {$continue = 0;} + } + else + { + $continue = 0; + } + $counter++; + } + } + + +1; + diff --git a/pack/acp/start/vimoutliner/vimoutliner/scripts/Node/README.otl b/pack/acp/start/vimoutliner/vimoutliner/scripts/Node/README.otl new file mode 100644 index 0000000..2d10d5e --- /dev/null +++ b/pack/acp/start/vimoutliner/vimoutliner/scripts/Node/README.otl @@ -0,0 +1,177 @@ +MANUAL FOR THE Node.pm Tool + Version 0.2.0 released 5/13/2004 +License + Litt Perl Development Tools License, version 1 + See COPYING file + This license is the GNU GPL with an exception + See COPYING.GPL + NO WARRANTY!!!!! See COPYING.GPL +Purpose + Handling hierarchies in Perl + Implements a tree of nodes + Each node has a name, a type, a value, and optionally attributes + Each node can have zero, one or many attributes + Each attribute has a name and a value + Especially made to handle tab indented outlines in memory +Learning Node.pm + Learn from the example programs: Study them in this order: + example_hello.pl + example_parse.pl + example_otl2markup.pl + example_attribs.pl + example_bylevel.pl + example_delete.pl + example_insert.pl + example_nodepath.pl + That's the only way to learn this tool + Do each example program in order + Run + Read + Study + Example programs + example_hello.pl + Proof of concept + 7 lines of perl + Instantiate and read from a Node object + example_parse.pl + Parse a tab indented outline file into a Node tree + Use a Walker object to walk the tree and print the Nodes + Create a Callback object and callback routine + example_otl2markup.pl + Use return callback to create end tags + example_attribs.pl + Set and get Node attributes + Observer "_lineno" attribute, + which was set by the Parser object + example_bylevel.pl + Read the Node tree recursively and output by level + Use the Callbacks object to store information + Use multiple callbacks to simplify a complex algorithm + Observe that the performance is still quite good + example_delete.pl + Delete nodes during a callback + Observe that the Walker object takes the deletion in stride + Observe that the Walker object does not "lose its place" + example_insert.pl + Insert nodes + Build a Node tree without an outline or Parser object + Create child nodes using an array + Create child nodes from a callback routine + Use a return callback to count occurrences within in its subtree + Access and use a Node's name, type and value + Move nodes within the tree + example_nodepath.pl + Load a Node.pm file in a different directory + Load a Node.pm file at runtime from an entry in a config file + Use an environment variable to change the name of the config file +File manifest + Documentation + INSTALL + README.otl + Licensing + COPYING + COPYING.GPL + COPYING.LPDTL.1.0 + LPDTL_discuss.txt + Node.pm file + + Node.pm + Example Programs + example_hello.pl + example_parse.pl + example_otl2markup.pl + example_attribs.pl + example_bylevel.pl + example_delete.pl + example_insert.pl + example_nodepath.pl + Sample node path config file (for example_nodepath.pl) + myapp.cfg + Sample outline (used for example_delete.pl) + deletetest.otl +Objects + Node.pm implements three object types: + Node + OutlineParser + Walker + Node + A single element in the hierarchy + All nodes connected + Parent pointer + (the pointer is a Perl reference, of course) + First child pointer + Last child pointer + Previous sibling pointer + Last sibling pointer + Each node has: + A name + hasName() + getName() + setName() + A type + hasType() + getType() + setType() + A value + hasValue() + getValue() + setValue() + Zero, one or many attributes + Each attribute has a name and a value + Single attribute methods: + hasAttribute() + getAttribute() + setAttribute() + removeAttribute() + Attribute array methods: + hasAttributes() + getAttributes() + setAttributes() + Node methods enable all hierarchy operations + Node insertion + insertFirstChild() + insertLastChild() + insertSiblingBeforeYou() + insertSiblingAfterYou() + Node deletion + deleteSelf() + Low level node traversal + hasFirstChild() + getFirstChild() + hasLastChild() + getLastChild() + hasPrevSibling() + getPrevSibling() + hasNextSibling() + getNextSibling() + hasParent() + getParent() + OutlineParser + Object to convert a tab indented outline to a tree of Node objects + Outline must be well formed... + Each line indented zero or one tab to the right of its parent + You can set and access properties of the parse + hasCommentChar() + getCommentChar() + setCommentChar() + fromStdin() + fromFile() + zapBlanks() + dontZapBlanks() + After setting parse properties, you perform the parse + my parser = OutlinerParser->new(); + parser->setCommentChar('#'); + parser->fromFile(); + my $topNode = parser->parse("myoutline.txt"); + Walker + Object to traverse entire Node hierarchy + Performs actions via callback routines + my $walker = Walker->new($topNode, $entryCallbackRef, $returnCallbackRef); + Entry callback occurs when node is first accessed + Return callback occurs when node is re-accessed after going through children + Callbacks should be object methods, not freestanding + Callbacks must take 3 arguments: + $self: The object containing the callback + [\&Callbacks::cbPrintNodeInfo, $callbacks]); +Installation + See INSTALL file diff --git a/pack/acp/start/vimoutliner/vimoutliner/scripts/Node/deletetest.otl b/pack/acp/start/vimoutliner/vimoutliner/scripts/Node/deletetest.otl new file mode 100644 index 0000000..e7d34da --- /dev/null +++ b/pack/acp/start/vimoutliner/vimoutliner/scripts/Node/deletetest.otl @@ -0,0 +1,18 @@ +Top + Level2 + Level2b + Level3 + deleteme + gone + gone + deleteme + gone + gone + this should stay + deleteme + deleteme + gone + gone + Level3b + 2level2 +Top2 diff --git a/pack/acp/start/vimoutliner/vimoutliner/scripts/Node/example_attribs.pl b/pack/acp/start/vimoutliner/vimoutliner/scripts/Node/example_attribs.pl new file mode 100755 index 0000000..d82610f --- /dev/null +++ b/pack/acp/start/vimoutliner/vimoutliner/scripts/Node/example_attribs.pl @@ -0,0 +1,162 @@ +#!/usr/bin/perl -w + +# Copyright (C) 2004 by Steve Litt +# Licensed with the GNU General Public License, Version 2 +# ABSOLUTELY NO WARRANTY, USE AT YOUR OWN RISK +# See http://www.gnu.org/licenses/gpl.txt + +##################################################################### +# This exercise demonstrates the use of attributes for each node. +# Attributes are facts about an entity, rather than an entity itself. +# In real practice, many times attributes can be substituted for nodes +# and vice versa. However, an attribute CANNOT have children. +# +# This is the first exercise using multiple Walker objects. The first +# Walker object counts each node's children, and if the node has +# children, it creates an attribute named "children" for that node. +# The value of the attribute is the number of direct children for +# that node. +# +# Nodes are accessed two ways in the cbPrintNode() callback. The entire +# attribute hash is accessed with hasAttributes and getAttributes(), +# while single named attributes are accessed with hasAttributes and +# getAttributes(). +# +# One more action that's demonstrated is the use of secondary navigation +# within a callback routine. For each node, the callback routine +# navigates to the first child and then each successive sibling of that +# child in order to count the direct children. This is a common +# algorithm with Node.pm. It might look inefficient, and you might be +# tempted to perform the count during the callback that prints the +# information. Don't do it. Multiple walkers help keep Node.pm +# enabled programs easy to understand and modify. Because the +# entire node tree is in memory, the double navigation isn't +# particularly slow. +# +# Real world programs make heavy use of multiple walkers. For instance, +# the EMDL to UMENU program (not packaged here) has over 10 walkers. +# +##################################################################### + +use strict; # prevent hard to find errors + +use Node; # Use Note.pm tool + +package Callbacks; +sub new() + { + my($type) = $_[0]; + my($self) = {}; + bless($self, $type); + $self->{'errors'} = 0; + $self->{'warnings'} = 0; + return($self); + } + +sub getErrors(){return $_[0]->{'errors'};} +sub getWarnings(){return $_[0]->{'warnings'};} + +sub cbCountChildren() + { + my($self, $checker, $level) = @_; + unless (defined($checker)) {return -999;} + + my $childCount=0; + if($checker->hasFirstChild()) + { + $childCount++; + my $checker2 = $checker->getFirstChild(); + while($checker2->hasNextSibling()) + { + $childCount++; + $checker2 = $checker2->getNextSibling(); + } + $checker->setAttribute("children", $childCount); + } + } + +sub cbPrintNode() + { + my($self, $checker, $level) = @_; + unless (defined($checker)) {return -999;} # don't process undef node + + for(my $n=0; $n < $level; $n++) {print "\t";} + print "* "; + print $checker->getValue(); # print the text of the node + print "\n"; + + for(my $n=0; $n <= $level; $n++) {print "\t";} + print "("; + + my %attribs = {}; + %attribs = $checker->getAttributes() if $checker->hasAttributes(); + + my @keys = keys(%attribs); + foreach my $key (sort @keys) + { + print $key, "=", $attribs{$key}, "; "; + } + + print ")\n"; + + if($checker->hasAttribute("children")) + { + for(my $n=0; $n <= $level; $n++) {print "\t";} + print "This node has "; + print $checker->getAttribute("children"); + print " children.\n"; + } + } + +package Main; + +sub main() + { + #### PARSE FROM FILE README.otl + my $parser = OutlineParser->new(); # instantiate parser + $parser->setCommentChar("#"); # ignore lines starting with # + $parser->fromFile(); # get input from file + my $topNode=$parser->parse("README.otl"); + + #==================================================================== + # The preceding statement parses file README.otl into a node hierarchy + # and assigns the top level node of that hierarchy to $topNode. When + # you run the program you'll notice that the text in $topNode does + # not appear in README.otl, but instead has value + # "Inserted by OutlineParser". + # + # This is a feature, not a bug. In order to accommodate the typical + # case of an outline having several top level items, and yet still + # be able to represent the whole hierarchy as a single top node, + # the OutlineParser object creates a new node with value + # " Inserted by OutlineParser" + # and places all the outline's top level items under that newly + # created node. + # + # If the outline you're working on is guaranteed to have only + # a single top level item, and if you want that to be the top + # level node, you can simply do the following: + # + # $topNode=$topNode->getFirstChild(); + #==================================================================== + + #### INSTANTIATE THE Callbacks OBJECT + my $callbacks = Callbacks->new(); + + #### WALK THE NODE TREE, + #### OUTPUTTING LEVEL AND TEXT + my $walker = Walker->new + ( + $topNode, + [\&Callbacks::cbCountChildren, $callbacks] + ); + $walker->walk(); + my $walker = Walker->new + ( + $topNode, + [\&Callbacks::cbPrintNode, $callbacks] + ); + $walker->walk(); + } + +main(); diff --git a/pack/acp/start/vimoutliner/vimoutliner/scripts/Node/example_bylevel.pl b/pack/acp/start/vimoutliner/vimoutliner/scripts/Node/example_bylevel.pl new file mode 100755 index 0000000..d60d7f6 --- /dev/null +++ b/pack/acp/start/vimoutliner/vimoutliner/scripts/Node/example_bylevel.pl @@ -0,0 +1,227 @@ +#!/usr/bin/perl -w + +# Copyright (C) 2004 by Steve Litt +# Licensed with the GNU General Public License, Version 2 +# ABSOLUTELY NO WARRANTY, USE AT YOUR OWN RISK +# See http://www.gnu.org/licenses/gpl.txt + +use strict; # prevent hard to find errors + +use Node; # Use Node.pm tool + +##################################################################### +# The Walker object walks the node hierarchy recursively. That is, +# it goes deep before going laterally. That's just what's needed for +# many applications. However, sometimes it's necessary to look at +# one level at a time. +# +# There are many ways to accomplish this. Some involve sorting and +# merging. Many involve arrays of nodes on a given level, and +# plunging one deep into each one. +# +# In this example we'll start with a walker that assigns the full +# path to each node as an attribute of that node. We'll then loop +# through all levels starting with 0, and for each one we'll print all +# children of nodes at that level. Every time there's a parent change, +# we'll print a header for that parent. +# +# This example also illustrates the use of variables within the +# Callback object. You might have wondered why callbacks must be +# part of an object rather than free floating functions. The answer +# is that the use of callbacks as object methods means that we can +# keep totals and break logic variables within the callback object, +# thereby eliminating the (nasty) necessity of global variables. +# +# We cannot simply pass variables into and out of callback +# routines because, by the very nature of a callback routine, +# its arguments and return type are strictly predefined. In the +# case of Node.pm the arguments are always $self, $checker and +# $level. To get any other information into or out of the callback +# routine, we must use a non-callback method of the same object. +# +# It should be noted that there's nothing wrong with having +# multiple callback objects. If there are numerous callback +# routines it might make sense to group them by functionality, +# or by totals and persistent variables they must keep track of. +# +# As you run, study and understand this code, be aware that converting +# a hierarchy to a list by levels is a very difficult and complex task. +# Imagine keeping a list of children, and for each level using those +# children to find the next generation, and rewriting the array. Or +# prepending a level number followed by a child index on each line, +# and then sorting the whole array by the level number and child +# index, and finally running a routine to output the formatted +# output, complete with break logic and headers. +# +# Now consider how easy Node.pm made this job. First, a trivial +# Walker to calculate full paths, then a level loop calling a +# Walker to print only children of nodes at the desired level. The +# code is short, and it's very readable and understandable. The +# callback routines are short enough that you can safely use non- +# structured techniques such as returning from the middle instead +# of using nested if statements. The result is even more readability. +# +# One could make the (very valid) point that nodes are visited many +# times to process each once, and that this is not efficient in +# terms of runtime performance. Absolutely true! +# +# However, the programming simplicity prevents truly collosal +# efficency problems, such as cascading intermediate files, sorts, +# and the various other CPU cycle grabbers that seem to crop up +# in complex algorithms. And remember, the entire tree is in memory, +# with navigation via simple pointers, so the environment of Node.pm +# favors runtime speed. +# +# Case in point. My original EMDL to UMENU converter was such an +# epic production that I needed to study it for 4 hours every time +# I made a minor improvement. I had developed it using informal OOP +# and structured techniques, and had paid close attention to +# efficiency. The resulting program took 15 seconds to convert a +# 2300 line EMDL file. +# +# I rewrote the converter using Node.pm. This was a complete +# rewrite -- all new code -- no salvage. It was so much simpler +# that I wrote it in 12 hours. But I was very concerned with +# runtime. If the 15 seconds doubled, this would be a hassle, +# and if it quadrupled it would be totally impractical. When +# I ran it, the program did everything the original did, but +# did it in 2 seconds. Node.pm had given me a 7 fold speed +# increase. +# +##################################################################### + +package Callbacks; +sub new() + { + my($type) = $_[0]; + my($self) = {}; + bless($self, $type); + $self->{'errors'} = 0; + $self->{'warnings'} = 0; + $self->{'childrenatlevel'} = 0; + $self->{'currentlevel'} = 0; + $self->{'previousparentfullpath'} = "initialize"; + return($self); + } + +sub getErrors(){return $_[0]->{'errors'};} +sub getWarnings(){return $_[0]->{'warnings'};} + +sub getChildrenAtLevel(){return $_[0]->{'childrenatlevel'};} +sub setChildrenAtLevel(){$_[0]->{'childrenatlevel'} = $_[1];} +sub incChildrenAtLevel(){$_[0]->{'childrenatlevel'}++;} + +sub getCurrentLevel(){return $_[0]->{'currentlevel'};} +sub setCurrentLevel(){$_[0]->{'currentlevel'} = $_[1];} + +sub cbCalculateFullPath() + { + my($self, $checker, $level) = @_; + unless (defined($checker)) {return -999;} # don't process undef node + + if($checker->hasParent) + { + my $fullpath = $checker->getParent()->getAttribute("fullpath"); + $fullpath .= "/"; + $fullpath .= $checker->getValue(); + $checker->setAttribute("fullpath", $fullpath); + } + else + { + $checker->setAttribute("fullpath", $checker->getValue()); + } + } + +sub cbPrintNode() + { + my($self, $checker, $level) = @_; + unless (defined($checker)) {return -999;} # don't process undef node + + #### DO NOTHING UNLESS THIS NODE IS AT THE CURRENTLY SOUGHT LEVEL + return unless $level == $self->getCurrentLevel(); + + #### DO NOTHING UNLESS THIS NODE HAS CHILDREN + return unless $checker->hasFirstChild(); + + #### PRINT HEADER + print "\n", $checker->getAttribute("fullpath"), "\n"; + + #### PRINT CHILDREN AND COUNT CHILDREN AT LEVEL + my $checker2 = $checker->getFirstChild(); # We returned if there wasn't one + print "\t", $checker2->getValue(), "\n"; + $self->incChildrenAtLevel(); + + while($checker2->hasNextSibling()) + { + $checker2 = $checker2->getNextSibling(); + print "\t", $checker2->getValue(), "\n"; + $self->incChildrenAtLevel(); + } + } + + +package Main; + +sub main() + { + #### PARSE FROM FILE README.otl + my $parser = OutlineParser->new(); # instantiate parser + $parser->setCommentChar("#"); # ignore lines starting with # + $parser->fromFile(); # get input from file + my $topNode=$parser->parse("README.otl"); + + + #### INSTANTIATE THE Callbacks OBJECT + my $callbacks = Callbacks->new(); + + #### WALK THE NODE TREE, + #### CALCULATING FULL PATHS AND PUTTING THEM IN AN ATTRIBUTE + my $walker = Walker->new + ( + $topNode, # start with this node + [\&Callbacks::cbCalculateFullPath, $callbacks] # do this on entry to each node + ); + $walker->walk(); + + #### PRINT LEVEL 0 + print "\n\n********** BEGIN LEVEL ", "0", "\n"; + print "\t", $topNode->getValue(), "\n"; + + #### SET STARTING PARENT LEVEL, + #### AND SET $childCount SO THE LOOP WILL FIRE THE FIRST TIME + my $level=0; + my $childCount=9999; + + #================================================================== + # The main loop follows, level by level. At each level, nodes are + # queried for their children, which are then printed below the + # node's full path. The result is a list of nodes sorted by + # level. + # + # We add 1 to the level in the level header because we're referring + # to the level of the children, not of the current node. We keep + # looping to deeper levels until a level counts no children. + # + # This logic result in an empty level header at the bottom. If this + # were a big concern, we could print the level headers in the + # Callbacks::cbPrintNode() callback, with slightly altered logic. + # However, it's a minor point, so for simplicity we print the + # level header at the top of this loop in the main routine. + #================================================================== + while($childCount > 0) + { + print "\n\n********** BEGIN LEVEL ", $level + 1, "\n"; + $callbacks->setChildrenAtLevel(0); + $callbacks->setCurrentLevel($level); + my $walker = Walker->new + ( + $topNode, + [\&Callbacks::cbPrintNode, $callbacks] + ); + $walker->walk(); + $childCount = $callbacks->getChildrenAtLevel(); + $level++; + } + } + +main(); diff --git a/pack/acp/start/vimoutliner/vimoutliner/scripts/Node/example_delete.pl b/pack/acp/start/vimoutliner/vimoutliner/scripts/Node/example_delete.pl new file mode 100755 index 0000000..810507b --- /dev/null +++ b/pack/acp/start/vimoutliner/vimoutliner/scripts/Node/example_delete.pl @@ -0,0 +1,107 @@ +#!/usr/bin/perl -w + +# Copyright (C) 2004 by Steve Litt +# Licensed with the GNU General Public License, Version 2 +# ABSOLUTELY NO WARRANTY, USE AT YOUR OWN RISK +# See http://www.gnu.org/licenses/gpl.txt + +use strict; # prevent hard to find errors + +use Node; # Use Node.pm tool + +##################################################################### +# This exercise demonstrates the deletion of nodes. +# +# Because Perl is a garbage collection language, node deletion +# DOES NOT deallocate memory and the like. However, in the absense +# of a copy of the node, it will be garbage collected and unavailable. +# Also, the deletion process specificly undef's the deleted node's +# first and last children. +# +# You noticed I mentioned keeping a copy. The algorithm of a Walker +# object moves a node around the tree like a checker. Calling +# $checker->deleteSelf() does not render $checker undefined. In fact, +# it still has its parent, nextSibling and previousSibling pointers +# intact. What this means is that the Walker's next iteration goes +# to exactly the same node as it would have if the deletion had not +# taken place. In other words, you do not need to "move the checker +# back one" after a deletion. +# +# This makes deletion algorithms very simple. +# +# There may come a time when you want to delete a node but keep its +# children. In that case, you must first attach its children to nodes +# that will not be deleted. +# +##################################################################### + +package Callbacks; +sub new() + { + my($type) = $_[0]; + my($self) = {}; + bless($self, $type); + $self->{'errors'} = 0; + $self->{'warnings'} = 0; + return($self); + } + +sub getErrors(){return $_[0]->{'errors'};} +sub getWarnings(){return $_[0]->{'warnings'};} + +sub cbDelete() + { + my($self, $checker, $level) = @_; + unless (defined($checker)) {return -999;} # don't process undef node + + #### DELETE THIS NODE IF ITS VALUE CONTAINS deleteme + my $text = "init"; + $text = $checker->getValue() if $checker->hasValue(); + if($text =~ m/deleteme/) + { + $checker->deleteSelf(); + } + } + +sub cbPrintNode() + { + my($self, $checker, $level) = @_; + unless (defined($checker)) {return -999;} + + for(my $n=0; $n < $level; $n++) {print "\t";} + print $checker->getValue(), "\n"; + } + +package Main; + +sub main() + { + #### PARSE FROM FILE README.otl + my $parser = OutlineParser->new(); + $parser->setCommentChar("#"); + $parser->fromFile(); + my $topNode=$parser->parse("deletetest.otl"); + + #### INSTANTIATE THE Callbacks OBJECT + my $callbacks = Callbacks->new(); + + #### WALK THE NODE TREE, + #### DELETING NODES WITH "deleteme" IN THEM + my $walker = Walker->new + ( + $topNode, + [\&Callbacks::cbDelete, $callbacks] + ); + $walker->walk(); + + #### WALK THE NODE TREE, + #### OUTPUTTING LEVEL AND TEXT + $walker = Walker->new + ( + $topNode, + [\&Callbacks::cbPrintNode, $callbacks] + ); + $walker->walk(); + } + +main(); diff --git a/pack/acp/start/vimoutliner/vimoutliner/scripts/Node/example_hello.pl b/pack/acp/start/vimoutliner/vimoutliner/scripts/Node/example_hello.pl new file mode 100755 index 0000000..cf46fad --- /dev/null +++ b/pack/acp/start/vimoutliner/vimoutliner/scripts/Node/example_hello.pl @@ -0,0 +1,15 @@ +#!/usr/bin/perl -w + +# Copyright (C) 2004 by Steve Litt +# Licensed with the GNU General Public License, Version 2 +# ABSOLUTELY NO WARRANTY, USE AT YOUR OWN RISK +# See http://www.gnu.org/licenses/gpl.txt + +use strict; # prevent hard to find errors +use Node; + +my $topNode = Node->new("myname", "mytype", "myvalue"); +print "\n::: "; +print $topNode->getName(), " ::: "; +print $topNode->getType(), " ::: "; +print $topNode->getValue(), " :::\n"; diff --git a/pack/acp/start/vimoutliner/vimoutliner/scripts/Node/example_insert.pl b/pack/acp/start/vimoutliner/vimoutliner/scripts/Node/example_insert.pl new file mode 100755 index 0000000..4fd82fa --- /dev/null +++ b/pack/acp/start/vimoutliner/vimoutliner/scripts/Node/example_insert.pl @@ -0,0 +1,550 @@ +#!/usr/bin/perl -w + +# Copyright (C) 2004 by Steve Litt +# Licensed with the GNU General Public License, Version 2 +# ABSOLUTELY NO WARRANTY, USE AT YOUR OWN RISK +# See http://www.gnu.org/licenses/gpl.txt + +use strict; # prevent hard to find errors + +use Node; # Use Node.pm tool + +##################################################################### +# WARNING: This is a difficult exercise. Do not attempt this exercise +# until you have completed the prerequisites listed in the README.otl +# file. +# +# I suggest you approach this example starting with the main routine +# at the bottom of the file, and then drilling down into subroutines +# and callbacks. Understand the big picture before drilling down. +# +# This exercise demonstrates insertion of nodes, and much, much more. +# Insertion is accomplished by the insertFirstChild(), +# insertSiblingBeforeYou(), insertSiblingAfterYou(), and +# insertLastChild() methods. The insertLastChild() method is not +# demonstrated. +# +# This exercise is VERY contrived. It is contrived to show techniques +# of building a node tree using insertions, and also how to switch +# two nodes. The switching of the two nodes is especially contrived, +# but I could think of no better way of demonstrating node moving. +# +# This exercise builds a tree that represents a date book type calendar. +# Level 0 is Calender, level 1 are the years, of which there is only 2004, +# Level 2 are the months, level 3 the days, and level 4 the hour long +# timeslots. There is no provision for weekends, nor after hours +# appointments. It is a demonstration only. +# +# Using an array of month names and an array of days per month, you build +# the month and day levels using a nested loop. The hour level is built +# using a Walker. Node names are things like "January" or 31 or +# "11:00-12:00". Node types are things like "Year", "Month", "Day" or +# "Hour". Node values are undefined unless an appointment is made, in +# which case the value is the node text. +# +# A special Walker is used to mark any day, month or year entities +# if they contain appointments. Specifically, all appointments in that +# day, month or year are counted, and that number of stars are placed +# beside the day, month or year. This is implemented by using an +# return callback so that by the time the callback is called, all children +# have been calculated. +# +##################################################################### + +package Callbacks; +sub new() + { + my($type) = $_[0]; + my($self) = {}; + bless($self, $type); + $self->{'errors'} = 0; + $self->{'warnings'} = 0; + return($self); + } + +sub getErrors(){return $_[0]->{'errors'};} +sub getWarnings(){return $_[0]->{'warnings'};} + +#================================================================= +# The cbMakeMarks() callback is called on return to a node from +# its children (return callback). It executes only on year, month +# and day nodes. It iterates through all its immediate children, +# totalling up the "appointments" attribute and setting its +# own attribute to that total. Remember, because this is a +# callback triggered on return from children, it is guaranteed +# that all children have been counted, and that all those children +# have totalled their children, etc. +# +# In the case of a day node, instead of totalling the "appointments" +# attribute, it counts the number of hour nodes with defined values. +# A defined value on an hour node is an appointment. +# +# Last but not least, on non-zero counts, this callback sets the +# day, month or year node's value to a number of asterisks equal +# to the number of appointments in its subtree. +# +# Read this code carefully. Once you understand it, you'll have +# many insights to Node.pm. +#================================================================= +sub cbMakeMarks() + { + my($self, $checker, $level) = @_; + unless (defined($checker)) {return -999;} # don't process undef node + + #### PROCESS ONLY DAY, MONTH OR YEAR NODES + unless ( + $checker->getType() eq "Day" || + $checker->getType() eq "Month" || + $checker->getType() eq "Year" + ) + { + return; + } + + my $count = 0; + my $childNode = $checker->getFirstChild(); + while(defined($childNode)) + { + if($checker->getType() eq "Day") + { + if(defined($childNode->getValue())) + { + $count++; + } + } + else + { + if($childNode->hasAttribute("appointments")) + { + $count += $childNode->getAttribute("appointments"); + } + } + $childNode = $childNode->getNextSibling(); + } + $checker->setAttribute("appointments", $count); + if($count > 0) + { + my $string; + for(my $n=0; $n < $count; $n++){$string .= '*';} + $checker->setValue($string); + } + } + +#================================================================= +# The cbInsertHours() callback operates ONLY on day nodes. When +# called from a day node, it inserts hourlong appointment slots +# starting at 8am and ending at 5pm. The code is pretty +# straightforward. +#================================================================= +sub cbInsertHours() + { + my($self, $checker, $level) = @_; + unless (defined($checker)) {return -999;} # don't process undef node + + + return unless $checker->getType() eq "Day"; # Insert hours under days only + + my $checker2; + for(my $n=8; $n <= 16; $n++) + { + my $startHour = "$n:00"; + my $n2 = $n + 1; + my $endHour = "$n2:00"; + my $node = Node->new("$startHour" . "-" . "$endHour", "Hour", undef); + if($checker->hasFirstChild()) + { + $checker2 = $checker2->insertSiblingAfterYou($node); + } + else + { + $checker2 = $checker->insertFirstChild($node); + } + } + } + +#================================================================= +# The cbPrintNode() callback prints the name of the node, +# and its value if a value is defined. It's very straighforward. +#================================================================= +sub cbPrintNode() + { + my($self, $checker, $level) = @_; + unless (defined($checker)) {return -999;} # don't process undef node + + #### DON'T PRINT LEVEL 0 (CALENDER) + return if $level == 0; + + for(my $n=1; $n < $level; $n++) { print "\t";} + + print $checker->getName() if $checker->hasName(); + print ": "; + + print $checker->getValue() if $checker->hasValue(); + print "\n"; + } + + +#================================================================= +# The cbPrintNodeDiagnosic() callback is not used, but provided +# for any necessary debugging. +#================================================================= +sub cbPrintNodeDiagnostic() + { + my($self, $checker, $level) = @_; + unless (defined($checker)) {return -999;} # don't process undef node + + for(my $n=0; $n < $level; $n++) { print "\t";} + + print ">"; + print $checker->getName() if $checker->hasName(); + print " ::: "; + + print $checker->getType() if $checker->hasType(); + print " ::: "; + + print $checker->getValue() if $checker->hasValue(); + print "<\n"; + } + +package Main; + +########################################################################### +# The insertDays() subroutine handles insertion of days below all +# month nodes. +########################################################################### +sub makeAppointments($) + { + my $yearNode = shift; + #### MARCH 22 AT 8AM + my $monthNode = $yearNode->getFirstChild() -> #January + getNextSibling() -> #February + getNextSibling(); #March + my $dayNode = $monthNode->getFirstChild(); + while($dayNode->getName() != 22) + { + $dayNode = $dayNode->getNextSibling(); + unless(defined($dayNode)) + { + die "No March 22\n"; + } + } + my $hourNode = $dayNode->getFirstChild(); + $hourNode->setValue("Spring Cleaning"); + + #### JUNE 22 AT 9AM + #### WRONGLY LABELED AS FALL FESTIVAL + #### INSTEAD OF SUMMER BREAK + $monthNode = $monthNode->getNextSibling() -> # April + getNextSibling() -> # May + getNextSibling(); # June + $dayNode = $monthNode->getFirstChild(); + while($dayNode->getName() != 22) + { + $dayNode = $dayNode->getNextSibling(); + unless(defined($dayNode)) + { + die "No June 22\n"; + } + } + $hourNode = $dayNode->getFirstChild()->getNextSibling(); + $hourNode->setValue("Fall Festival"); + + #### SEPTEMBER 22 AT 10AM + #### WRONGLY LABELED AS FALL FESTIVAL + #### INSTEAD OF SUMMER BREAK + $monthNode = $monthNode->getNextSibling() -> # July + getNextSibling() -> # August + getNextSibling(); # September + $dayNode = $monthNode->getFirstChild(); + while($dayNode->getName() != 22) + { + $dayNode = $dayNode->getNextSibling(); + unless(defined($dayNode)) + { + die "No September 22\n"; + } + } + $hourNode = $dayNode -> getFirstChild() -> #8-9 + getNextSibling() -> # 9-10 + getNextSibling(); # 10-11 + $hourNode->setValue("Summer Break"); + + #### DECEMBER 22 FROM 3PM TO 5PM (2 TIMESLOTS) + #### HAPPY HOLIDAYS PARTY + $monthNode = $monthNode->getNextSibling() -> # October + getNextSibling() -> # November + getNextSibling(); # December + $dayNode = $monthNode->getFirstChild(); + while($dayNode->getName() != 22) + { + $dayNode = $dayNode->getNextSibling(); + unless(defined($dayNode)) + { + die "No December 22\n"; + } + } + $hourNode = $dayNode->getFirstChild(); + while($hourNode->getName() ne "15:00-16:00") + { + $hourNode = $hourNode->getNextSibling(); + unless(defined($hourNode)) + { + die "No 4pm slot\n"; + } + } + $hourNode->setValue("Happy Holidays Party"); + $hourNode = $hourNode->getNextSibling(); + $hourNode->setValue("Happy Holidays Party"); + + #### DECEMBER 30 AT 9AM BUY PARTY SUPPLIES + while($dayNode->getName() != 30) + { + $dayNode = $dayNode->getNextSibling(); + unless(defined($dayNode)) + { + die "No December 30\n"; + } + } + $hourNode = $dayNode->getFirstChild()->getNextSibling(); + $hourNode->setValue("Buy Party Supplies"); + } + +########################################################################### +# The insertMonthsAndDays() subroutine handles insertion of months +# below the year, and days below every month. It works by iterating through +# an array of months, and finding number of days in an array of month +# lengths. It does NOT use the Node.pm navigational system to find months. +# Use of the Node.pm navigational system for this purpose is demonstrated +# in the insertion of hours in all days. +# +# Note that we could have avoided using a nested loop by using a Walker +# and associated callback to install the days under every month. In such +# a case the array of month lengths would have been placed in the Callback +# object. However, for the sake of variety, we chose to use a nested loop +# to load the months and days. +########################################################################### +sub insertMonthsAndDays($) + { + my $yearNode = shift; + my $checker = $yearNode; + my $checker2; + my @monthNames=("January", "February", "March", "April", "May", + "June", "July", "August", "September", "October", + "November", "December"); + my @monthLengths=(31, 29, 31, 30, 31, 30, 31, 31, 30, 31, 30, 31); + my $monthSS = 0; + foreach my $monthName (@monthNames) + { + my $node = Node->new($monthName, "Month", undef); + $node->setAttribute("days", $monthLengths[$monthSS]); + if($yearNode->hasFirstChild()) + { + $checker = $checker->insertSiblingAfterYou($node); + } + else + { + $checker = $yearNode->insertFirstChild($node); + } + for(my $n=1; $n <= $monthLengths[$monthSS]; $n++) + { + $node = Node->new($n, "Day", undef); + if($checker->hasFirstChild()) + { + $checker2 = $checker2->insertSiblingAfterYou($node); + } + else + { + $checker2 = $checker->insertFirstChild($node); + } + } + $monthSS++; + } + } + +########################################################################### +# This subroutine switches the June 22 9am appointment and the +# September 22 10am appointment. In each case, both the appointment +# text and the time needed switching. +# +# The sane way to accomplish this task would have been to modify +# the nodes in place. However, this subroutine was created solely to +# demonstrate the movement of nodes, so that's what we did. +# +# Note that the fact that the two are at different times complicates the +# situation. It's not enough to just trade nodes -- the Sept 9am node +# must be placed after the existing June 10am node, which itself is after +# the erroneous June 9am node containing what should be September's +# appointment. After such placement, the original June 9am node must +# have its name updated so that it is a 10am node. A similar process +# takes place for September. The original nodes are also deleted. +# +# Please follow the (convoluted and contrived) logic: +# 1. Store the June hour node in $juneNode +# 2. Store the September hour node in $septNode +# 3. After the existing June 10am, place a CLONE of the Sept appointment +# 4. Before the existing Sept 9am, place a CLONE of the June appointment +# 5. Delete the original June appointment +# 6. Delete the original September appointment +# 7. On the original June 10am node, make it 9am +# 8. On the original September 9am node, make it 10am +########################################################################### +sub switchJuneAndSeptemberAppointments($) + { + my $yearNode = shift; + + #### FIND NODE FOR JUNE 22 9AM APPOINTMENT + my $juneNode = $yearNode->getFirstChild(); + while(defined($juneNode)) + { + last if $juneNode->getName() eq "June"; + $juneNode = $juneNode->getNextSibling(); + } + die "Cannot find month of June\n" unless defined($juneNode); + + $juneNode = $juneNode->getFirstChild(); + while(defined($juneNode)) + { + last if $juneNode->getName() eq "22"; + $juneNode = $juneNode->getNextSibling(); + } + die "Cannot find June 22\n" unless defined($juneNode); + + $juneNode = $juneNode->getFirstChild(); + while(defined($juneNode)) + { + last if $juneNode->getName() eq "9:00-10:00"; + $juneNode = $juneNode->getNextSibling(); + } + die "Cannot find June 22 at 9am\n" unless defined($juneNode); + + #### FIND NODE FOR SEPTEMBER 22 10AM APPOINTMENT + my $septNode = $yearNode->getFirstChild(); + while(defined($septNode)) + { + last if $septNode->getName() eq "September"; + $septNode = $septNode->getNextSibling(); + } + die "Cannot find month of September\n" unless defined($septNode); + + $septNode = $septNode->getFirstChild(); + while(defined($septNode)) + { + last if $septNode->getName() eq "22"; + $septNode = $septNode->getNextSibling(); + } + die "Cannot find September 22\n" unless defined($septNode); + + $septNode = $septNode->getFirstChild(); + while(defined($septNode)) + { + last if $septNode->getName() eq "10:00-11:00"; + $septNode = $septNode->getNextSibling(); + } + die "Cannot find September 22 at 9am\n" unless defined($septNode); + + #### SWITCH THE NODES + my $newJune = $juneNode->getNextSibling()->insertSiblingAfterYou($septNode->clone()); + my $newSept = $septNode->getPrevSibling()->insertSiblingBeforeYou($juneNode->clone()); + $juneNode->deleteSelf(); + $septNode->deleteSelf(); + + #### FIX NAMES OF SURROUNDING CLONES + $newJune->getPrevSibling()->setName("9:00-10:00"); + $newSept->getNextSibling()->setName("10:00-11:00"); + + return; + } + + +########################################################################### +# In the main routine, you carry out or delegate the following tasks +# in order to create an appointment calendar: +# 1. Insert single level 0 and 1 nodes +# 2. Instantiate the Callbacks object +# 3. Insert all month and day nodes +# 4. Insert all hour nodes +# 5. Make appointments +# erroneously switching the june 22 & Sept 22 appointments +# 6. Mark days, months and years containing appointments +# 7. Output the calendar +# 8. Switch back June22 and Sept22 +# 9. Re mark days, months and years +# 10. Output a separator between bad and good calendars +# 11. Re output the calendar +# +########################################################################### +sub main() + { + #### INSERT SINGLE LEVEL 0 AND 1 NODES + my $topNode=Node->new("Calender", "Calender", "Calender"); + my $yearNode=$topNode->insertFirstChild(Node->new("2004", "Year", undef)); + + #### INSTANTIATE THE Callbacks OBJECT + my $callbacks = Callbacks->new(); + + #### INSERT MONTH AND DAY NODES + insertMonthsAndDays($yearNode); + + #### INSERT THE HOURS USING A Walker + my $walker = Walker->new + ( + $topNode, + [\&Callbacks::cbInsertHours, $callbacks] + ); + $walker->walk(); + + + #### MAKE A FEW APPOINTMENTS + #### ACCIDENTALLY SWITCHING SUMMER AND FALL + makeAppointments($yearNode); + + #### MARK DAYS, MONTHS AND YEAR THAT HAVE APPOINTMENTS + #### USING A WALKER WITH ONLY A RETURN CALLBACK + $walker = Walker->new + ( + $topNode, + undef, + [\&Callbacks::cbMakeMarks, $callbacks] + ); + $walker->walk(); + + #### WALK THE NODE TREE, + #### OUTPUTTING THE CALENDER + $walker = Walker->new + ( + $topNode, # start with this node + [\&Callbacks::cbPrintNode, $callbacks] # do this on entry to each node + ); + $walker->walk(); + + #### CORRECT THE MISTAKE + #### SWITCH JUNE 22 AND SEPT 22 + switchJuneAndSeptemberAppointments($yearNode); + + #### RE-MARK DAYS, MONTHS AND YEAR THAT HAVE APPOINTMENTS + #### USING A WALKER WITH ONLY A RETURN CALLBACK + $walker = Walker->new + ( + $topNode, + undef, + [\&Callbacks::cbMakeMarks, $callbacks] + ); + $walker->walk(); + + #### OUTPUT A SEPARATOR BETWEEN ORIGINAL AND CORRECTED CALENDARS + for (my $n=0; $n<5; $n++) + { + print "######################################################\n"; + } + + #### RE-WALK THE NODE TREE, + #### RE-OUTPUTTING THE CALENDER + $walker = Walker->new + ( + $topNode, # start with this node + [\&Callbacks::cbPrintNode, $callbacks] # do this on entry to each node + ); + $walker->walk(); + } + +main(); diff --git a/pack/acp/start/vimoutliner/vimoutliner/scripts/Node/example_nodepath.pl b/pack/acp/start/vimoutliner/vimoutliner/scripts/Node/example_nodepath.pl new file mode 100755 index 0000000..033b1fd --- /dev/null +++ b/pack/acp/start/vimoutliner/vimoutliner/scripts/Node/example_nodepath.pl @@ -0,0 +1,135 @@ +#!/usr/bin/perl -w + +# Copyright (C) 2004 by Steve Litt +# Licensed with the GNU General Public License, Version 2 +# ABSOLUTELY NO WARRANTY, USE AT YOUR OWN RISK +# See http://www.gnu.org/licenses/gpl.txt + +use strict; # prevent hard to find errors + +##################################################################### +# Node.pm is a tool you will probably use in many projects located +# in varying directories. How do you enable those projects to +# include Node.pm? Here are some ways: +# 1. Place Node.pm in the project's directory +# 2. Place Node.pm on Perl's module path +# 3. Run the project as perl -I/path/to/Node project.pl +# 4. Shebang line #!/usr/bin/perl -w -I/path/to/Node +# +# Number 1 can become problematic as the number of apps using Node.pm +# increases. If you have 30 different copies in 30 different directories, +# how do you keep them all up to date. +# +# Number 2 is a much better option. It works. However, which @INC +# directory do you place it in? When you update Perl or your distribution, +# it goes away. +# +# Number 3 is great, except you need to create a shellscript to call +# Perl with your program as an argument. BE SURE not to leave a space +# between the -I and the directory, or that space actually becomes +# part of the directory. +# +# Number 4 is greater, because it doesn't require a shellscript. Once +# again, no space between -I and the directory. In all cases where +# you know what directory will contain Node.pm, number 4 is a great +# alternative. +# +# But what if you don't know in advance what directory +# will contain Node.pm? What if you're writing an application to be +# run at varying locations with varying setups? What if, in addition, +# you don't want the end user messing with the source code to change +# the shebang line? In that case, you can actually place the path +# to Node.pm in a configuration file. It takes several lines of code, +# but it's certainly nice to be able to accommodate the user's +# environment without requiring change to the source code. +# +# This exercise demonstrates how to set the Node.pm location from a +# configuration file. Once again, if you're the sole user it might be +# better to change the shebang line, but if you're distributing +# your program like the autumn leaves, a configuration file is the +# way to go. +# +##################################################################### + + +##################################################################### +# The loadNodeModule() subroutine is a complete substitute for: +# use Node +# +# It includes: +# require Node; +# import Node; +# +# The preceding two calls completely replace a use Node statement, +# and better still, unlike the use statement, they happen at +# runtime instead of compile time. Therefore, this subroutine reads +# the directory from a config file, then executes that directory +# with the proper require and import statements. Obviously, the +# loadNodeModule() subroutine must be executed before any code depending +# on the Node.pm module is executed. +##################################################################### +sub loadNodeModule() + { + #### CHANGE THE FOLLOWING TO CHANGE THE DEFAULT APP FILENAME + my $defaultConfFileName = "./myapp.cfg"; + + #### CHANGE THE FOLLOWING TO CHANGE APP FILENAME ENVIRONMENT VAR + my $envVarName = "MY_APP_CONFIG"; + + my($conffile) = $ENV{$envVarName}; + print $conffile, "\n" if defined $conffile; + $conffile = $defaultConfFileName unless defined($conffile); + print "Using config file $conffile.\n"; + + open CONF, '<' . $conffile or die "FATAL ERROR: Could not open config file $conffile."; + my @lines = ; + close CONF; + + my @nodedirs; + foreach my $line (@lines) + { + chomp $line; + if($line =~ m/^\s*nodedir\s*=\s*([^\s]*)/) + { + my $dir = $1; + if($dir =~ m/(.*)\$HOME(.*)/) + { + $dir = $1 . $ENV{'HOME'} . $2; + } + push @nodedirs, ($dir); + } + } + + if(@nodedirs) + { + unshift @INC, @nodedirs; + } + + require Node; + import Node; + } + +##################################################################### +# The main() routine calls loadNodeModule to include Node.pm, +# and then runs a few lines of code to conclusively prove that +# Node.pm is loaded. It also prints out the @INC array to show that +# directory in which Node.pm resides is now in the @INC path. +# +# Note that in the absense of any change to the environment variable +# defined in loadNodeModule(), the configuration file will be ./myapp.cfg. +##################################################################### +sub main() + { + loadNodeModule(); + my $topNode = Node->new("myname", "mytype", "myvalue"); + print "\n::: "; + print $topNode->getName(), " ::: "; + print $topNode->getType(), " ::: "; + print $topNode->getValue(), " :::\n"; + foreach my $line (@INC) + { + print $line, "\n"; + } + } + +main(); diff --git a/pack/acp/start/vimoutliner/vimoutliner/scripts/Node/example_otl2markup.pl b/pack/acp/start/vimoutliner/vimoutliner/scripts/Node/example_otl2markup.pl new file mode 100755 index 0000000..79d53cb --- /dev/null +++ b/pack/acp/start/vimoutliner/vimoutliner/scripts/Node/example_otl2markup.pl @@ -0,0 +1,123 @@ +#!/usr/bin/perl -w + +# Copyright (C) 2004 by Steve Litt +# Licensed with the GNU General Public License, Version 2 +# ABSOLUTELY NO WARRANTY, USE AT YOUR OWN RISK +# See http://www.gnu.org/licenses/gpl.txt + +##################################################################### +# This exercise demonstrates use of the return callback routine. The +# return callback routine occurs when node navigation returns to a +# node from its children. Therefore, the return callback routine is +# never executed by nodes without children. +# +# An obvious use of the return callback routine is to print end tags +# for nested markup. A node's end tag must follow all markup for all +# the node's children, so the return callback is perfect for that +# purpose. +# +# Because childless nodes never execute the return callback routine, +# in the case of childless nodes this program prints the end tags +# from the entry callback routine. +# +# This program prints the attributes of each Node object. You'll +# immediately note that the "children" attributes you set are printed. +# But you'll also observe that a "_lineno" attribute has been set for +# all nodes except the top one. That attribute was set by the Parser +# object, and corresponds to the line in the parsed outline file. This +# attribute is extremely helpful in printing error messages. +##################################################################### + + +use strict; # prevent hard to find errors + +use Node; # Use Note.pm tool + +package Callbacks; +sub new() + { + my($type) = $_[0]; + my($self) = {}; + bless($self, $type); + $self->{'errors'} = 0; + $self->{'warnings'} = 0; + return($self); + } + +sub getErrors(){return $_[0]->{'errors'};} +sub getWarnings(){return $_[0]->{'warnings'};} + +############################################################## +# cbPrintTag is the entry callback, and is called on first +# entry to each node. It prints the start tag and text. If +# the node is a leaf level node, it also prints the end tag +# on the same line. +############################################################## +sub cbPrintTag() + { + my($self, $checker, $level) = @_; + unless (defined($checker)) {return -999;} + + #### PRINT START TAG AND CONTENT + for(my $n = 0; $n < $level; $n++) {print "\t";} + print ""; + print $checker->getValue() if $checker->hasValue(); + + #### IF THIS IS A LEAF LEVEL ITEM, PRINT THE + #### END TAG IMMEDIATELY. OTHERWISE, THE + #### RETURN CALLBACK WILL TAKE CARE OF THE END TAG. + unless($checker->hasFirstChild()) + { + print ""; + } + + #### PRINT NEWLINE + print "\n"; + } + +############################################################## +# cbPrintEndTag is the return callback, and is called on reentry +# to the node, after all its children have been processed. +# It is not called by leaf level (childless) nodes. The purpose +# of this routine is to print the end tag. +# +# For nodes with children, the end tag must be printed after +# all information for the node's children has been printed, +# in order to preserve proper nesting. +############################################################## +sub cbPrintEndTag() + { + my($self, $checker, $level) = @_; + unless (defined($checker)) {return -999;} + + #### PRINT END TAG FOR PARENT + for(my $n = 0; $n < $level; $n++) {print "\t";} + print ""; + print "\n"; + } + +package Main; + +sub main() + { + #### PARSE FROM FILE README.otl + my $parser = OutlineParser->new(); + $parser->setCommentChar("#"); + $parser->fromFile(); + my $topNode=$parser->parse("README.otl"); + + #### INSTANTIATE THE Callbacks OBJECT + my $callbacks = Callbacks->new(); + + #### WALK THE NODE TREE, + #### OUTPUTTING LEVEL AND TEXT + my $walker = Walker->new + ( + $topNode, # start with this node + [\&Callbacks::cbPrintTag, $callbacks], # do this on entry to each node + [\&Callbacks::cbPrintEndTag, $callbacks]# do this on return from node's children + ); + $walker->walk(); + } + +main(); diff --git a/pack/acp/start/vimoutliner/vimoutliner/scripts/Node/example_parse.pl b/pack/acp/start/vimoutliner/vimoutliner/scripts/Node/example_parse.pl new file mode 100755 index 0000000..8a2380e --- /dev/null +++ b/pack/acp/start/vimoutliner/vimoutliner/scripts/Node/example_parse.pl @@ -0,0 +1,114 @@ +#!/usr/bin/perl -w + +# Copyright (C) 2004 by Steve Litt +# Licensed with the GNU General Public License, Version 2 +# ABSOLUTELY NO WARRANTY, USE AT YOUR OWN RISK +# See http://www.gnu.org/licenses/gpl.txt + +use strict; # prevent hard to find errors + +use Node; # Use Node.pm tool + +##################################################################### +# This exercise demonstrates the most elemental use of Node.pm. +# It does nothing more than read README.otl into a Node tree, and +# then print the tree. +# +# Here's the high level logic: +# Set up a Callback object to house the callback routines +# Instantiate and configure a Parser object to parse README.otl +# Instantiate a Walker object to walk the resulting node tree +# Link Callbacks::cbPrintNode() as the Walker's entry callback +# +##################################################################### + +############################################################## +# You need an object to house callback routines. The object can +# be named anything, but it should have facilities to count up +# errors and warnings. Its new() method should always be something +# like what you see below, and there should have getErrors() and +# getWarnings() methods. +# +# The cbPrintNode() method is typical of a simple callback routine. +# All callback routines have exactly three arguments, $self, +# $checker and $level. $self refers to the object containing +# the callback routine, $checker is the node that called this +# callback routine, and $level is the level of that node in the +# hierarchy. Armed with these pieces of information, you can +# perform almost any operation on the current node ($checker). +# +# The callback routines are called by the Parser object during +# parsing. A callback routine can be called upon first entry +# into a node, or it can be called upon reentry into that node +# after processing all that node's children. The latter is +# an excellent way of outputting end tags at the proper time. +############################################################## +package Callbacks; +sub new() + { + my($type) = $_[0]; + my($self) = {}; + bless($self, $type); + $self->{'errors'} = 0; + $self->{'warnings'} = 0; + return($self); + } + +sub getErrors(){return $_[0]->{'errors'};} +sub getWarnings(){return $_[0]->{'warnings'};} + +sub cbPrintNode() + { + my($self, $checker, $level) = @_; + unless (defined($checker)) {return -999;} # don't process undef node + print $level, " ::: "; # print the level + print $checker->getValue(); # print the text of the node + print "\n"; + } + +package Main; + +sub main() + { + #### PARSE FROM FILE README.otl + my $parser = OutlineParser->new(); # instantiate parser + $parser->setCommentChar("#"); # ignore lines starting with # + $parser->fromFile(); # get input from file + my $topNode=$parser->parse("README.otl"); + + #==================================================================== + # The preceding statement parses file README.otl into a node hierarchy + # and assigns the top level node of that hierarchy to $topNode. When + # you run the program you'll notice that the text in $topNode does + # not appear in README.otl, but instead has value + # "Inserted by OutlineParser". + # + # This is a feature, not a bug. In order to accommodate the typical + # case of an outline having several top level items, and yet still + # be able to represent the whole hierarchy as a single top node, + # the OutlineParser object creates a new node with value + # " Inserted by OutlineParser" + # and places all the outline's top level items under that newly + # created node. + # + # If the outline you're working on is guaranteed to have only + # a single top level item, and if you want that to be the top + # level node, you can simply do the following: + # + # $topNode=$topNode->getFirstChild(); + #==================================================================== + + #### INSTANTIATE THE Callbacks OBJECT + my $callbacks = Callbacks->new(); + + #### WALK THE NODE TREE, + #### OUTPUTTING LEVEL AND TEXT + my $walker = Walker->new + ( + $topNode, # start with this node + [\&Callbacks::cbPrintNode, $callbacks] # do this on entry to each node + ); + $walker->walk(); + } + +main(); diff --git a/pack/acp/start/vimoutliner/vimoutliner/scripts/Node/myapp.cfg b/pack/acp/start/vimoutliner/vimoutliner/scripts/Node/myapp.cfg new file mode 100644 index 0000000..26f7d89 --- /dev/null +++ b/pack/acp/start/vimoutliner/vimoutliner/scripts/Node/myapp.cfg @@ -0,0 +1,4 @@ +#### THIS FILE CONFIGURES example_nodepath.pl. +#### IN ORDER TO USE example_nodepath.pl, +#### CHANGE FOLLOWING PATH TO THE DIRECTORY WHERE YOU PLACED Node.pm #### +nodedir=/path/to/nodemodule diff --git a/pack/acp/start/vimoutliner/vimoutliner/scripts/fs2otl b/pack/acp/start/vimoutliner/vimoutliner/scripts/fs2otl new file mode 100755 index 0000000..33ce89e --- /dev/null +++ b/pack/acp/start/vimoutliner/vimoutliner/scripts/fs2otl @@ -0,0 +1,7 @@ +#!/bin/sh +echo "$1" +echo "$1" | perl -pe 's/./-/g;' +cd "$1" +find . \ + | sort \ + | perl -pe 's|^\./||; s|[^/]+/|\t|g; s/([^\t])/[_] $1/;' diff --git a/pack/acp/start/vimoutliner/vimoutliner/scripts/otl2aft.awk b/pack/acp/start/vimoutliner/vimoutliner/scripts/otl2aft.awk new file mode 100644 index 0000000..b4ee4a4 --- /dev/null +++ b/pack/acp/start/vimoutliner/vimoutliner/scripts/otl2aft.awk @@ -0,0 +1,284 @@ +# *Title: otl2aft +# *Author: Todd Coram (http://maplefish.com/todd) +# *TOC +# +# ~Version 1.3~ +# +# ~This source is hereby placed into the Public Domain.~ +# ~What you do with it is your own business.~ +# ~Just please do no harm.~ +# +#------------------------------------------------------------------------ +# +# * Introduction +# +# Otl2aft converts VimOutliner files into +# [AFT (http://www.maplefish.com/todd/aft.html)] documents. This file +# can be run with nawk, mawk or gawk. +# +# This tool was created upon the request/inspiration of David J Patrick +#(of http://linuxcaffe.ca fame). +# +# You can downloaded the most up to date +# source [here (http://www.maplefish.com/todd/otl2aft.awk)]. +# A PDF version of this file resides +# [here (http://www.maplefish.com/todd/otl2aft.pdf)]. +# +# AEY: Changed all # symbols within regular expressions to \043 +# to avoid problems with # being the comment character. +# +# * Code +# +# In the beginning we want to print out the AFT title and author. +# We expect the otl file to contain two top level headlines. The first +# will be used as the title and the second as the author. +# +# We also print out some control bits and a table of contents placeholder. +# +BEGIN { + VERSION="v1.3 9/04/2009"; + # AEY: Note first line is now for OTL use only; we ignore it here. + getline; # expect title + print "#---SET-CONTROL tableparser=new" + # AEY: Commented out following lines, since this info is now metadata. + #print "*Title: " $0; + #getline; # expect author + #print "*Author: " $0; + #print "\n*TOC\n" +} + +# AEY: > now starts an inline comment. We ignore these. +/^[\t]+>/ { + next; +} + +# AEY: < is now used for metadata. We only act on certain ones. +#/^[\t]+<[ \t]*title:[ \t]*/ { +/^[\t]+| and if we discover a crosshatch |#|, we +# start a list. If we are already in a list, we continue the list. Both +# starting and continuing is handled by [handlelist]. +# +# AEY: Removed this +#/^[\t]+>/ { +# if (!list_level) reset(); +# gsub(/\t/,""); +# sub(/>/, ""); +# +# if (list_level || $0 ~ /[ ]*[\043*]/) { +# handlelist(); +# } +# print $0; next; +#} + +# Scan for |;| or |<| which indicate ''preformatted body text'' and +# ''user-defined preformatted text block'' respectively. Both of these +# are non wrapping but we ignore that (for now). We handle lists just like +# the previous scan action. +# +# AEY: Removed < handling +/^[\t]+;/ { # Handle ";" and "<" (preformated text) + if (!list_level) reset(); + gsub(/\t/,""); + sub(/;/, ""); + + if (list_level || $0 ~ /[ ]*\043/) { # Convert "< #" into numbered lists. + handlelist(); + } + print $0; next; +} + +# Scan for a table. This is tricky. We want to cast the Outliner table +# into the AFT ''new table'' format. AFT tables (especially as rendered +# by LaTeX) really want to have captions/headers. We fake that for now +# by using a |-| place holder. This should be fixed! +# +/^[\t]+\|/ { + if (!in_table) reset(); + in_table = 1 + gsub(/\t/,""); + if ($1 ~ /\|\|/) { + print "\t! _ !"; + print "\t!----------!" + } + gsub(/\|\|/,"!"); + gsub(/\|/,"!"); + print "\t"$0 + print "\t!----------!" + next; +} + +# The default scan matches anything not matching the above scan. We simply +# go through and set the known indent level based on the number of tabs +# seen. +# +{ match($0,/^[\t]+/); indent = RLENGTH; if (indent == -1) indent = 0; } + +# Given the iden level set by the default scan (above), we now determine +# what type of AFT output to do. +# +# Indent levels lower than 7 are represented directly +# using AFT sections. +# +# AEY: Added $0 = "*"$0; back in to ensure top-level headings remain headings! +# (This existed in earlier versions, but not in version 1.3.) +#indent < 7 { gsub(/\t/,"*"); print "";} +indent < 7 { gsub(/\t/,"*"); $0 = "*"$0; print "";} + +# Indent levels greater than 6 are represented by AFT bullet lists. +# This is done by first killing some tabs (we don't want to start off +# nesting too deeply), and using the remaining tabs to adjust to the +# appropriate list nesting level. +# +indent > 6 { + gsub(/\t\t\t/, ""); + match($0,/^[\t]+/); + remtabs = substr($0,RSTART,RLENGTH); + text = substr($0,RSTART+RLENGTH); + $0 = remtabs"* "text; + print ""; +} + +# After adjusting indentation, just print out the line. +# +{ print $0 } + +# **handlelist +# Look at the indentation and produce lists accordingly. +# +function handlelist() { + if (!list_level) { + list_indent = length(indent) + 1; + } + list_level = list_indent - length(indent); + + if ($0 ~ /[ ]*\043/) { # Convert " #" into numbered lists. + for (i=0; i < list_level; i++) + printf("\t"); + gsub(/[ ]*\\043/,"#."); + } else if ($0 ~ /[ ]*\*/) { # Convert " *" into bullet lists. + for (i=0; i < list_level; i++) + printf("\t"); + gsub(/[ ]*\*/,"*"); + } else if (list_level) { + for (i=0; i < list_level; i++) + printf("\t"); + } +} + +# **reset +# Reset various parameters to get us out of various modes. +# +function reset() { + if (list_level) { + print " "; + list_level = 0; + } + if (in_table) { + print "\t!----------!\n" + in_table = 0; + } +} + +# AEY: "Trim" function, added for sanity's sake. +function trim(str) { + sub(/^[ \t]*/,"",str); + sub(/[ \t]*$/,"",str); + return str; +} + +# AEY: Get everything to left of specified regex, and trim it too. +function leftpart(str,regex) { + if (match(str,regex)) { + return trim(substr(str,1,RSTART-1)); + } else { + return ""; + } +} + +# AEY: Get everything to right of specified regex, and trim it too. +function rightpart(str,regex) { + if (match(str,regex)) { + return trim(substr(str,RSTART+RLENGTH)); + } else { + return ""; + } +} + +# That's all folks! diff --git a/pack/acp/start/vimoutliner/vimoutliner/scripts/otl2aft.pdf b/pack/acp/start/vimoutliner/vimoutliner/scripts/otl2aft.pdf new file mode 100644 index 0000000..8164a6b Binary files /dev/null and b/pack/acp/start/vimoutliner/vimoutliner/scripts/otl2aft.pdf differ diff --git a/pack/acp/start/vimoutliner/vimoutliner/scripts/otl2docbook.pl b/pack/acp/start/vimoutliner/vimoutliner/scripts/otl2docbook.pl new file mode 100755 index 0000000..ac7b698 --- /dev/null +++ b/pack/acp/start/vimoutliner/vimoutliner/scripts/otl2docbook.pl @@ -0,0 +1,270 @@ +#!/usr/bin/perl + +use strict; +use XML::Writer; +use vars qw($writer $section_has_contents $VERSION); + +use constant DEBUG => 0; + +$VERSION = '2.0'; + +sub debug { + if ( DEBUG ) + { + print STDERR @_; + } +} + +sub start_docbook { + $writer = XML::Writer->new(DATA_MODE => 1, + DATA_INDENT => 1); + + debug(' 'x$writer->getDataIndent(), "starting new docbook\n"); + + $writer->xmlDecl(); + +# my $system = '/usr/share/sgml/docbook/xml-dtd-4.1/docbookx.dtd'; + my $system = 'http://www.oasis-open.org/docbook/xml/4.0/docbookx.dtd'; + + $writer->doctype('article', + '-//OASIS//DTD DocBook XML V4.1//EN', + $system); +} + +sub start_article { + my $id = shift; + + debug(' 'x$writer->getDataIndent(), "starting new article\n"); + + my @attributes = ( + 'class' => 'whitepaper', + ); + + if ( $id ) + { + push @attributes, ( 'id' => $id ); + } + + $writer->startTag('article', @attributes); +} + +sub start_section { + my $title = shift; + + debug(' 'x$writer->getDataIndent(), "starting new section\n"); + + $writer->startTag('section'); + + $section_has_contents = 0; + + if ( $title ) + { + $writer->dataElement('title', $title); + } +} + +sub start_list { + debug(' 'x$writer->getDataIndent(), "starting new list\n"); + + $writer->startTag('itemizedlist'); +} + +sub append_list_item { + my $text = shift; + + debug(' 'x$writer->getDataIndent(), "starting new listitem\n"); + + $writer->startTag('listitem'); + + $writer->dataElement('para', $text); + + $writer->endTag('listitem'); +} + +sub end_list { + $writer->endTag('itemizedlist'); + + debug(' 'x$writer->getDataIndent(), "ending list\n"); +} + +sub append_code { + my $code = shift; + + debug(' 'x$writer->getDataIndent(), "starting new programlisting\n"); + + $section_has_contents = 1; + + $writer->dataElement('programlisting', $code, role=>'C'); +} + +sub append_para { + my $text = shift; + + debug(' 'x$writer->getDataIndent(), "starting new para\n"); + + $section_has_contents = 1; + + $writer->dataElement('para', $text); +} + +sub end_section { + if ( ! $section_has_contents ) + { + $writer->emptyTag('para'); + $section_has_contents = 1; + } + + $writer->endTag('section'); + + debug(' 'x$writer->getDataIndent(), "ending section\n"); +} + +sub end_article { + $writer->endTag('article'); + + debug(' 'x$writer->getDataIndent(), "ending article\n"); +} + +sub end_docbook { + $writer->end(); + + debug(' 'x$writer->getDataIndent(), "ending docbook\n"); +} + +#################################################### + +start_docbook(); +start_article(); + +my $section_level = 0; +my $line; +my $para = ''; +my $list_mode = 0; +my $code_mode = 0; +my $first_line = 1; + +sub list_done { + if ( $list_mode ) { + end_list(); + $list_mode = 0; + } +} + +sub para_done { + if ( $para ) + { + chomp $para; + if ( $code_mode ) + { + append_code($para); + $code_mode = 0; + } + elsif ( $list_mode ) + { + append_list_item($para); + } + else + { + append_para($para); + } + } + $para = ''; +} + +while ( defined ($line = <>) ) +{ + if ( $first_line and $line =~ /^-\*-/ ) + { + next; + } + $first_line = 0; + + if ( $line =~ /^\t*\* (.*)/ ) + { + para_done(); + + $para = $1; + + if ( ! $list_mode ) + { + start_list(); + $list_mode = 1; + } + + next; + } + + if ( $line =~ /^\t*[^\t: ]/ ) + { + para_done(); + list_done(); + } + + if ( $line =~ /^(\t*)([^\t\n: ].*)/ ) + { + my $title = $2; + my $new_section_level = length($1) + 1; + + para_done(); + list_done(); + + for ( my $i = 0 ; $section_level - $new_section_level >= $i ; $i++ ) + { + end_section(); + } + + chomp $title; + start_section($title); + + $section_level = $new_section_level; + next; + } + +# Code mode not supported yet +# if ( ! $list_mode and $line =~ /^\s+/ ) +# { +# debug("enabling code mode\n"); +# $code_mode = 1; +# } + + $line =~ s/^\t*(\: ?| )//; + if ($line =~ /^$/) { + para_done(); + list_done(); + next; + } + $para .= $line; +} +para_done(); + +for ( my $i = 0 ; $section_level > $i ; $i++ ) +{ + end_section(); +} + +end_article(); +end_docbook(); + +__END__ + +=head1 NAME + +outline2dockbook - Generate DocBook XML from VimOutliner outline + +=head1 SYNOPSIS + +outline2docbook < input > output + +=head1 DESCRIPTION + +B reads an VimOutliner outline-mode type text file on +standard input and outputs DocBook XML on standard output. + +The original version was written by Thomas R. Fullhart to convert from Emacs +outline mode. It is available at +http://genetikayos.com/code/repos/outline2docbook/distribution/. + +This program uses the B perl module, which is available +on B. + +=cut diff --git a/pack/acp/start/vimoutliner/vimoutliner/scripts/otl2html.py b/pack/acp/start/vimoutliner/vimoutliner/scripts/otl2html.py new file mode 100755 index 0000000..61be3cf --- /dev/null +++ b/pack/acp/start/vimoutliner/vimoutliner/scripts/otl2html.py @@ -0,0 +1,1111 @@ +#!/usr/bin/python2 +# otl2html.py +# convert a tab-formatted outline from VIM to HTML +# +# Copyright 2001 Noel Henson All rights reserved +# +# ALPHA VERSION!!! + +########################################################################### +# Basic function +# +# This program accepts text outline files and converts them +# to HTML. The outline levels are indicated by tabs. A line with no +# tabs is assumed to be part of the highest outline level. +# +# 10 outline levels are supported. These loosely correspond to the +# HTML H1 through H9 tags. Alphabetic, numeric and bullet formats +# are also supported. +# +# CSS support has been added. +# + +########################################################################### +# include whatever mdules we need + +import sys +import re +import os +import time + +########################################################################### +# global variables + +formatMode = "indent" +copyright = "" +level = 0 +div = 0 +silentdiv = 0 +slides = 0 +hideComments = 0 +showTitle = 1 +inputFile = "" +outline = [] +flatoutline = [] +inBodyText = 0 # 0: no, 1: text, 2: preformatted text, 3: table +styleSheet = "nnnnnn.css" +inlineStyle = 0 + +########################################################################### +# function definitions + +# usage +# print the simplest form of help +# input: none +# output: simple command usage is printed on the console + + +def showUsage(): + print """ + Usage: + otl2html.py [options] inputfile > outputfile + Options + -p Presentation: slide show output for use with + HtmlSlides. + -D First-level is divisions (
) for making + pretty web pages. + -s sheet Use the specified style sheet with a link. This is the + default. + -S sheet Include the specified style sheet in-line the + output. For encapsulated style. + -T The first line is not the title. Treat it as + outline data + -c comments (line with [ as the first non-whitespace + character. Ending with ] is optional. + -C copyright Override the internal copyright notice with the + one supplied in the quoted string following this + flag. Single or double quotes can be used. + -H Show the file syntax help. + output is on STDOUT + Note: if neither -s or -S are specified, otl2html.py will default + to -s. It will try to use the css file 'nnnnnn.css' if it + exists. If it does not exist, it will be created automatically. + """ + + +def showSyntax(): + print """ + Syntax + Syntax is Vim Outliner's normal syntax. The following are supported: + + Text + : Body text marker. This text will wrap in the output. + ; Preformmated text. This text will will not wrap. + + Tables + || Table header line. + | Table and table columns. Example: + || Name | Age | Animal | + | Kirby | 9 | Dog | + | Sparky | 1 | Bird | + | Sophia | 8 | Cat | + This will cause an item to be left-justified. + | whatever | + This will cause an item to be right-justified. + | whatever | + This will cause an item to be centered. + | whatever | + This will cause an item to be default aligned. + | whatever | + + Character Styles + ** Bold. Example: **Bold Text** + // Italic. Example: //Italic Text// + +++ Highlight. Example: +++Highlight Text+++ + --- Strikeout. Example: ---Strikeout Text--- + Insane ---+++//**Wow! This is insane!**//+++--- + Just remember to keep it all on one line. + Horizontal Rule + ---------------------------------------- (40 dashes). + Copyright + (c) or (C) Converts to a standard copyright symbol. + + Including Images (for web pages) + [imagename] Examples: + [logo.gif] [photo.jpg] [car.png] + [http://i.a.cnn.net/cnn/.element/img/1.1/logo/logl.gif] + or from a database: + [http://www.lab.com/php/image.php?id=4] + + Including links (for web pages) + [link text-or-image] Examples: + [about.html About] [http://www.cnn.com CNN] + or with an image: + [http://www.ted.com [http://www.ted.com/logo.png]] + Links starting with a '+' will be opened in a new + window. Eg. [+about.html About] + + Including external files + !filename! Examples: + !file.txt! + + Including external outlines (first line is parent) + !!filename!! Examples: + !!menu.otl!! + + Including output from executing external programs + !!!program args!!! Examples: + !!!date +%Y%m%d!!! + + Note: + When using -D, the top-level headings become divisions (
) + and will be created using a class of the heading name. Spaces + are not allowed. If a top-level heading begins with '_', it + will not be shown but the division name will be the same as + without the '_'. Example: _Menu will have a division name of + Menu and will not be shown. + """ + + +# getArgs +# Check for input arguments and set the necessary switches +# input: none +# output: possible console output for help, switch variables may be set +def getArgs(): + global inputFile, debug, formatMode, slides, hideComments, copyright, \ + styleSheet, inlineStyle, div, showTitle + if (len(sys.argv) == 1): + showUsage() + sys.exit()() + else: + for i in range(len(sys.argv)): + if (i != 0): + if (sys.argv[i] == "-d"): + debug = 1 # test for debug flag + elif (sys.argv[i] == "-?"): # test for help flag + showUsage() # show the help + sys.exit() # exit + elif (sys.argv[i] == "-p"): # test for the slides flag + slides = 1 # set the slides flag + elif (sys.argv[i] == "-D"): # test for the divisions flag + div = 1 # set the divisions flag + elif (sys.argv[i] == "-T"): # test for the no-title flag + showTitle = 0 # clear the show-title flag + elif (sys.argv[i] == "-c"): # test for the comments flag + hideComments = 1 # set the comments flag + elif (sys.argv[i] == "-C"): # test for the copyright flag + copyright = sys.argv[i + 1] # get the copyright + i = i + 1 # increment the pointer + elif (sys.argv[i] == "-s"): # test for the style sheet flag + styleSheet = sys.argv[i + 1] # get the style sheet name + formatMode = "indent" # set the format + i = i + 1 # increment the pointer + elif (sys.argv[i] == "-S"): # test for the style sheet flag + styleSheet = sys.argv[i + 1] # get the style sheet name + formatMode = "indent" # set the format + inlineStyle = 1 + i = i + 1 # increment the pointer + elif (sys.argv[i] == "--help"): + showUsage() + sys.exit() + elif (sys.argv[i] == "-h"): + showUsage() + sys.exit() + elif (sys.argv[i] == "-H"): + showSyntax() + sys.exit() + elif (sys.argv[i][0] == "-"): + print "Error! Unknown option. Aborting" + sys.exit() + else: # get the input file name + inputFile = sys.argv[i] + + +# getLineLevel +# get the level of the current line (count the number of tabs) +# input: linein - a single line that may or may not have tabs at the beginning +# output: returns a number 1 is the lowest +def getLineLevel(linein): + strstart = linein.lstrip() # find the start of text in line + x = linein.find(strstart) # find the text index in the line + n = linein.count("\t", 0, x) # count the tabs + return(n + 1) # return the count + 1 (for level) + + +# getLineTextLevel +# get the level of the current line (count the number of tabs) +# input: linein - a single line that may or may not have tabs at the +# beginning +# output: returns a number 1 is the lowest +def getLineTextLevel(linein): + strstart = linein.lstrip() # find the start of text in line + x = linein.find(strstart) # find the text index in the line + n = linein.count("\t", 0, x) # count the tabs + n = n + linein.count(" ", 0, x) # count the spaces + return(n + 1) # return the count + 1 (for level) + + +# colonStrip(line) +# stip a leading ':', if it exists +# input: line +# output: returns a string with a stipped ':' +def colonStrip(line): + if (line[0] == ":"): + return line[1:].lstrip() + else: + return line + + +# semicolonStrip(line) +# stip a leading ';', if it exists +# input: line +# output: returns a string with a stipped ';' +def semicolonStrip(line): + if (line[0] == ";"): + return line[1:] + else: + return line + + +# dashStrip(line) +# stip a leading '-', if it exists +# input: line +# output: returns a string with a stipped '-' +def dashStrip(line): + if (line[0] == "-"): + return line[1:] + else: + return line + + +# pipeStrip(line) +# stip a leading '|', if it exists +# input: line +# output: returns a string with a stipped '|' +def pipeStrip(line): + if (line[0] == "|"): + return line[1:] + else: + return line + + +# plusStrip(line) +# stip a leading '+', if it exists +# input: line +# output: returns a string with a stipped '+' +def plusStrip(line): + if (line[0] == "+"): + return line[1:] + else: + return line + + +# handleBodyText +# print body text lines with a class indicating level, if style sheets +# are being used. otherwise print just

+# input: linein - a single line that may or may not have tabs at the beginning +# output: through standard out +def handleBodyText(linein, lineLevel): + global inBodyText + if (inBodyText == 2): + print "" + if (inBodyText == 3): + print "" + print "" + colonStrip(linein.strip()), + + +# handlePreformattedText +# print preformatted text lines with a class indicating level, if style sheets +# are being used. otherwise print just 

+# input: linein - a single line that may or may not have tabs at the beginning
+# output: through standard out
+def handlePreformattedText(linein, lineLevel):
+    global inBodyText
+    if (inBodyText == 1):
+        print "
"
+    if (inBodyText == 3):
+        print ""
+    print "" + semicolonStrip(linein.strip()),
+
+
+# isAlignRight
+# return flag
+# input: coldata, a string
+def isAlignRight(coldata):
+    l = len(coldata)
+    if (coldata[0:2] == "  ") and (coldata[l - 2:l] != "  "):
+        return 1
+    else:
+        return 0
+
+
+# isAlignLeft
+# return flag
+# input: coldata, a string
+def isAlignLeft(coldata):
+    l = len(coldata)
+    if (coldata[0:2] != "  ") and (coldata[l - 2:l] == "  "):
+        return 1
+    else:
+        return 0
+
+
+# isAlignCenter
+# return flag
+# input: coldata, a string
+def isAlignCenter(coldata):
+    l = len(coldata)
+    if (coldata[0:2] == "  ") and (coldata[l - 2:l] == "  "):
+        return 1
+    else:
+        return 0
+
+
+# getColumnAlignment(string)
+# return string
+# input: coldata
+# output:
+#    or  or  or 
+def getColumnAlignment(coldata):
+    if isAlignCenter(coldata):
+        return ''
+    if isAlignRight(coldata):
+        return ''
+    if isAlignLeft(coldata):
+        return ''
+    return ''
+
+
+# handleTableColumns
+# return the souce for a row's columns
+# input: linein - a single line that may or may not have tabs at the beginning
+# output: string with the columns' source
+def handleTableColumns(linein, lineLevel):
+    out = ""
+    coldata = linein.strip()
+    coldata = coldata.split("|")
+    for i in range(1, len(coldata) - 1):
+        out += getColumnAlignment(coldata[i])
+        out += coldata[i].strip() + ''
+    return out
+
+
+# handleTableHeaders
+# return the souce for a row's headers
+# input: linein - a single line that may or may not have tabs at the beginning
+# output: string with the columns' source
+def handleTableHeaders(linein, lineLevel):
+    out = ""
+    coldata = linein.strip()
+    coldata = coldata.split("|")
+    for i in range(2, len(coldata) - 1):
+        out += getColumnAlignment(coldata[i])
+        out += coldata[i].strip() + ''
+    out = out.replace(' tag if necessary
+# input: linein - a single line that may or may not have tabs at the beginning
+# output: through standard out
+def handleTable(linein, lineLevel):
+    global inBodyText
+    if (inBodyText == 1):
+        print "
"
+    if (inBodyText == 2):
+        print "
" + if (inBodyText != 3): + print "" + inBodyText = 3 + print handleTableRow(linein, lineLevel), + + +# linkOrImage +# if there is a link to an image or another page, process it +# input: line +# output: modified line +def linkOrImage(line): + line = re.sub('\[(\S+?)\]', '\\1', line) + line = re.sub('\[(\S+)\s(.*?)\]', '\\2', line) + line = re.sub('(', '\\1\\2" target=_new>', line) + line = line.replace('X', '[X]') + line = line.replace('_', '[_]') + return line + + +# tabs +# return a string with 'count' tabs +# input: count +# output: string of tabs +def tabs(count): + out = "" + if (count == 0): + return "" + for i in range(0, count - 1): + out = out + "\t" + return out + + +# includeFile +# include the specified file, if it exists +# input: line and lineLevel +# output: line is replaced by the contents of the file +def includeFile(line, lineLevel): + filename = re.sub('!(\S+?)!', '\\1', line.strip()) + incfile = open(filename, "r") + linein = incfile.readline() + while linein != "": + linein = re.sub('^', tabs(lineLevel), linein) + processLine(linein) + linein = incfile.readline() + incfile.close() + return + + +# includeOutline +# include the specified file, if it exists +# input: line and lineLevel +# output: line is replaced by the contents of the file +def includeOutline(line, lineLevel): + filename = re.sub('!!(\S+?)!!', '\\1', line.strip()) + incfile = open(filename, "r") + linein = incfile.readline() + linein = re.sub('^', tabs(lineLevel), linein) + processLine(linein) + linein = incfile.readline() + while linein != "": + linein = re.sub('^', tabs(lineLevel + 1), linein) + processLine(linein) + linein = incfile.readline() + incfile.close() + return + + +# execProgram +# execute the specified program +# input: line +# output: program specified is replaced by program output +def execProgram(line): + program = re.sub('.*!!!(.*)!!!.*', '\\1', line.strip()) + child = os.popen(program) + out = child.read() + err = child.close() + out = re.sub('!!!(.*)!!!', out, line) + processLine(out) + if err: + raise RuntimeError('%s failed w/ exit code %d' % (program, err)) + return + + +# divName +# create a name for a division +# input: line +# output: division name +def divName(line): + global silentdiv + line = line.strip() + if (line[0] == '_'): + silentdiv = 1 + line = line[1:] + line = line.replace(' ', '_') + return'
' + + +# getTitleText(line) +# extract some meaningful text to make the document title from the line +# input: line +# output: modified line +def getTitleText(line): + out = re.sub('.*#(.*)#.*', '\\1', line) + out = re.sub('<.*>', '', out) +# if (out != ""): out = re.sub('\"(.*?)\"', '\\1', line) + return(out) + + +# stripTitleText(line) +# strip the title text if it is enclosed in double-quotes +# input: line +# output: modified line +def stripTitleText(line): + out = re.sub('#\W*.*#', '', line) + return(out) + + +# beautifyLine(line) +# do some optional, simple beautification of the text in a line +# input: line +# output: modified line +def beautifyLine(line): + if (line.strip() == "-" * 40): + return "

" + + out = line + line = "" + + while (line != out): + line = out + # out = replace(out, '---', '', 1) + if (line[0].lstrip() != ";"): + out = re.sub('\-\-\-(.*?)\-\-\-', '\\1', out) + out = linkOrImage(out) + # out = replace(out, '**', '', 1) + out = re.sub('\*\*(.*?)\*\*', '\\1', out) + # out = replace(out, '//', '', 1) + out = re.sub('\/\/(.*?)\/\/', '\\1', out) + # out = replace(out, '+++', '', 1) + out = re.sub('\+\+\+(.*?)\+\+\+', '\\1', out) + out = re.sub('\(c\)', '©', out) + out = re.sub('\(C\)', '©', out) + return out + + +# closeLevels +# generate the number of or tags necessary to proplerly finish +# input: format - a string indicating the mode to use for formatting +# level - an integer between 1 and 9 that show the current level +# (not to be confused with the level of the current line) +# output: through standard out +def closeLevels(): + global level, formatMode + while (level > 0): + if (formatMode == "bullets"): + print "" + if (formatMode == "alpha") or (formatMode == "numeric") or \ + (formatMode == "roman") or (formatMode == "indent"): + print "" + + level = level - 1 + + +# processLine +# process a single line +# input: linein - a single line that may or may not have tabs at the beginning +# format - a string indicating the mode to use for formatting +# level - an integer between 1 and 9 that show the current level +# (not to be confused with the level of the current line) +# output: through standard out +def processLine(linein): + global level, formatMode, slides, hideComments, inBodyText, styleSheet, \ + inlineStyle, div, silentdiv + if (linein.lstrip() == ""): + return + linein = beautifyLine(linein) + lineLevel = getLineLevel(linein) + if ((hideComments == 0) or (lineLevel != linein.find("[") + 1)): + + if (lineLevel > level): # increasing depth + while (lineLevel > level): + if (formatMode == "indent" or formatMode == "simple"): + if (inBodyText == 1): + print"

" + inBodyText = 0 + elif (inBodyText == 2): + print"" + inBodyText = 0 + elif (inBodyText == 3): + print"
" + inBodyText = 0 + if not (div == 1 and lineLevel == 1): + print "
    " + else: + sys.exit("Error! Unknown formatMode type") + level = level + 1 + + elif (lineLevel < level): # decreasing depth + while (lineLevel < level): + if (inBodyText == 1): + print"

    " + inBodyText = 0 + elif (inBodyText == 2): + print"" + inBodyText = 0 + elif (inBodyText == 3): + print"" + inBodyText = 0 + print "
" + level = level - 1 + if (div == 1 and level == 1): + if (silentdiv == 0): + print'' + else: + silentdiv = 0 + print'
' + + else: + print # same depth + if (div == 1 and lineLevel == 1): + if (lineLevel != linein.find("!") + 1): + print divName(linein) + if (silentdiv == 0): + print "
    " + + if (slides == 0): + if (lineLevel == linein.find(" ") + 1) or \ + (lineLevel == linein.find(":") + 1): + if (inBodyText != 1): + handleBodyText(linein, lineLevel) + elif (colonStrip(linein.strip()) == ""): + print "

    " + handleBodyText(linein, lineLevel) + else: + print colonStrip(linein.strip()), + elif (lineLevel == linein.find(";") + 1): + if (inBodyText != 2): + handlePreformattedText(linein, lineLevel) + elif (semicolonStrip(linein.strip()) == ""): + print "" + handlePreformattedText(linein, lineLevel) + else: + print semicolonStrip(linein.strip()), + elif (lineLevel == linein.find("|") + 1): + if (inBodyText != 3): + handleTable(linein, lineLevel) + elif (pipeStrip(linein.strip()) == ""): + print "" + handleTable(linein, lineLevel) + else: + print handleTableRow(linein, lineLevel), + elif (lineLevel == linein.find("!!!") + 1): + execProgram(linein) + elif (lineLevel == linein.find("!!") + 1): + includeOutline(linein, lineLevel) + elif (lineLevel == linein.find("!") + 1): + includeFile(linein, lineLevel) + else: + if (inBodyText == 1): + print"

    " + inBodyText = 0 + elif (inBodyText == 2): + print"" + inBodyText = 0 + elif (inBodyText == 3): + print"" + inBodyText = 0 + if (silentdiv == 0): + print "" + \ + dashStrip(linein.strip()), + elif (lineLevel == linein.find("+ ") + 1): + print " class=\"LN" + str(lineLevel) + "\"", + print ">" + \ + plusStrip(linein.strip()), + else: + print " class=\"L" + str(lineLevel) + "\"", + print ">" + linein.strip(), + else: + silentdiv = 0 + else: + if (lineLevel == 1): + if (linein[0] == " "): + if (inBodyText == 0): + handleBodyText(linein, lineLevel) + else: + print linein.strip(), + else: + print "
    " + print linein.strip(), + print "
    \n" + else: + if (lineLevel == linein.find(" ") + 1) or \ + (lineLevel == linein.find(":") + 1): + if (inBodyText == 0): + handleBodyText(linein, lineLevel) + else: + print linein.strip(), + else: + if (inBodyText == 1): + print"

    " + inBodyText = 0 + print "" + linein.strip(), + + +# flatten +# Flatten a subsection of an outline. The index passed is the +# outline section title. All sublevels that are only one level +# deeper are indcluded in the current subsection. Then there is +# a recursion for those items listed in the subsection. Exits +# when the next line to be processed is of the same or lower +# outline level. (lower means shallower) +# input: idx - the index into the outline. The indexed line is the title. +# output: adds reformatted lines to flatoutline[] +def flatten(idx): + if (outline[idx] == ""): + return + if (len(outline) <= idx): + return + titleline = outline[idx] + titlelevel = getLineLevel(titleline) + if (getLineLevel(outline[idx + 1]) > titlelevel): + if (titleline[titlelevel - 1] != " "): + flatoutline.append(titleline.lstrip()) + exitflag = 0 + while (exitflag == 0): + if (idx < len(outline) - 1): + idx = idx + 1 + currlevel = getLineLevel(outline[idx]) + if (currlevel == titlelevel + 1): + if (currlevel == outline[idx].find(" ") + 1): + flatoutline.append("\t " + outline[idx].lstrip()) + else: + flatoutline.append("\t" + outline[idx].lstrip()) + elif (currlevel <= titlelevel): + exitflag = 1 + else: + exitflag = 1 + # level = titlelevel # FIXME level assigned but never used + return + + +def createCSS(): + global styleSheet + output = """ /* copyright notice and filename */ + body { + font-family: helvetica, arial, sans-serif; + font-size: 10pt; + } + /* title at the top of the page */ + H1 { + font-family: helvetica, arial, sans-serif; + font-size: 14pt; + font-weight: bold; + text-align: center; + color: black; + background-color: #ddddee; + padding-top: 20px; + padding-bottom: 20px; + } + H2 { + font-family: helvetica, arial, sans-serif; + font-size: 12pt; + font-weight: bold; + text-align: left; + color: black; + } + H3 { + font-family: helvetica, arial, sans-serif; + font-size: 12pt; + text-align: left; + color: black; + } + H4 { + font-family: helvetica, arial, sans-serif; + font-size: 12pt; + text-align: left; + color: black; + } + H5 { + font-family: helvetica, arial, sans-serif; + font-size: 10pt; + text-align: left; + color: black; + } + /* outline level spacing */ + OL { + margin-left: 1.0em; + padding-left: 0; + padding-bottom: 8pt; + } + /* global heading settings */ + LI { + font-family: helvetica, arial, sans-serif; + color: black; + font-weight: normal; + list-style: lower-alpha; + padding-top: 4px; + } + /* level 1 heading overrides */ + LI.L1 { + font-size: 12pt; + font-weight: bold; + list-style: none; + } + /* level 2 heading overrides */ + LI.L2 { + font-size: 10pt; + font-weight: bold; + list-style: none; + } + /* level 3 heading overrides */ + LI.L3 { + font-size: 10pt; + list-style: none; + } + /* level 4 heading overrides */ + LI.L4 { + font-size: 10pt; + list-style: none; + } + /* level 5 heading overrides */ + LI.L5 { + font-size: 10pt; + list-style: none; + } + /* level 6 heading overrides */ + LI.L6 { + font-size: 10pt; + list-style: none; + } + /* level 7 heading overrides */ + LI.L7 { + font-size: 10pt; + list-style: none; + } + /* level 1 bullet heading overrides */ + LI.LB1 { + font-size: 12pt; + font-weight: bold; + list-style: disc; + } + /* level 2 bullet heading overrides */ + LI.LB2 { + font-size: 10pt; + font-weight: bold; + list-style: disc; + } + /* level 3 bullet heading overrides */ + LI.LB3 { + font-size: 10pt; + list-style: disc; + } + /* level 4 bullet heading overrides */ + LI.LB4 { + font-size: 10pt; + list-style: disc; + } + /* level 5 bullet heading overrides */ + LI.LB5 { + font-size: 10pt; + list-style: disc; + } + /* level 6 bullet heading overrides */ + LI.LB6 { + font-size: 10pt; + list-style: disc; + } + /* level 7 bullet heading overrides */ + LI.LB7 { + font-size: 10pt; + list-style: disc; + } + /* level 1 numeric heading overrides */ + LI.LN1 { + font-size: 12pt; + font-weight: bold; + list-style: decimal; + } + /* level 2 numeric heading overrides */ + LI.LN2 { + font-size: 10pt; + font-weight: bold; + list-style: decimal; + } + /* level 3 numeric heading overrides */ + LI.LN3 { + font-size: 10pt; + list-style: decimal; + } + /* level 4 numeric heading overrides */ + LI.LN4 { + font-size: 10pt; + list-style: decimal; + } + /* level 5 numeric heading overrides */ + LI.LN5 { + font-size: 10pt; + list-style: decimal; + } + /* level 6 numeric heading overrides */ + LI.LN6 { + font-size: 10pt; + list-style: decimal; + } + /* level 7 numeric heading overrides */ + LI.LN7 { + font-size: 10pt; + list-style: decimal; + } + /* body text */ + P { + font-family: helvetica, arial, sans-serif; + font-size: 9pt; + font-weight: normal; + color: darkgreen; + } + /* preformatted text */ + PRE { + font-family: fixed, monospace; + font-size: 9pt; + font-weight: normal; + color: darkblue; + } + + TABLE { + margin-top: 1em; + font-family: helvetica, arial, sans-serif; + font-size: 12pt; + font-weight: normal; + border-collapse: collapse; + } + + TH { + border: 1px solid black; + padding: 0.5em; + background-color: #eeddee; + } + + TD { + border: 1px solid black; + padding: 0.5em; + background-color: #ddeeee; + } + + CODE { + background-color: yellow; + } + + TABLE.TAB1 { + margin-top: 1em; + font-family: helvetica, arial, sans-serif; + font-size: 12pt; + font-weight: normal; + border-collapse: collapse; + } + TABLE.TAB2 { + margin-top: 1em; + font-family: helvetica, arial, sans-serif; + font-size: 11pt; + font-weight: normal; + border-collapse: collapse; + } + TABLE.TAB3 { + margin-top: 1em; + font-family: helvetica, arial, sans-serif; + font-size: 10pt; + font-weight: normal; + border-collapse: collapse; + } + TABLE.TAB4 { + margin-top: 1em; + font-family: helvetica, arial, sans-serif; + font-size: 10pt; + font-weight: normal; + border-collapse: collapse; + } + TABLE.TAB5 { + margin-top: 1em; + font-family: helvetica, arial, sans-serif; + font-size: 10pt; + font-weight: normal; + border-collapse: collapse; + } + TABLE.TAB6 { + margin-top: 1em; + font-family: helvetica, arial, sans-serif; + font-size: 10pt; + font-weight: normal; + border-collapse: collapse; + """ + file = open(styleSheet, "w") + file.write(output) + + +def printHeader(linein): + global styleSheet, inlineStyle + print """ + """ + getTitleText(linein) + "" + try: + file = open(styleSheet, "r") + except IOError: + createCSS() + file = open(styleSheet, "r") + if (styleSheet != "" and inlineStyle == 0): + print "" + if (styleSheet != "" and inlineStyle == 1): + print "" + print "" + + +def printFirstLine(linein): + print '''
    +

    %s

    +
    +
    ''' % stripTitleText(linein.strip()) + + +def printFooter(): + global slides, div + print "
    " + if (slides == 0 and div == 0): + print "
    " + print "
    " + print copyright + print "
    " + print inputFile + "   " + \ + time.strftime("%Y/%m/%d %H:%M", time.localtime(time.time())) + print "
    " + print "" + + +def main(): + global showTitle + getArgs() + file = open(inputFile, "r") + if (slides == 0): + firstLine = beautifyLine(file.readline().strip()) + printHeader(firstLine) + if (showTitle == 1): + printFirstLine(firstLine) + linein = beautifyLine(file.readline().strip()) + else: + linein = firstLine + while linein != "": + processLine(linein) + linein = file.readline() + closeLevels() + else: + linein = beautifyLine(file.readline().strip()) + outline.append(linein) + linein = file.readline().strip() + while linein != "": + outline.append("\t" + linein) + linein = file.readline().rstrip() + for i in range(0, len(outline) - 1): + flatten(i) + printHeader(flatoutline[0]) + for i in range(0, len(flatoutline)): + processLine(flatoutline[i]) + + printFooter() + file.close() + + +if __name__ == "__main__": + main() diff --git a/pack/acp/start/vimoutliner/vimoutliner/scripts/otl2html_autonumbered.css b/pack/acp/start/vimoutliner/vimoutliner/scripts/otl2html_autonumbered.css new file mode 100644 index 0000000..ddc8830 --- /dev/null +++ b/pack/acp/start/vimoutliner/vimoutliner/scripts/otl2html_autonumbered.css @@ -0,0 +1,269 @@ + /* copyright notice and filename */ +body { + font-family: helvetica,arial,sans-serif; + font-size: 10pt; +} + /* title at the top of the page */ +H1 { + font-family: helvetica,arial,sans-serif; + font-size: 14pt; + font-weight: bold; + text-align: center; + color: black; + background-color: #ddddee; + padding-top: 20px; + padding-bottom: 20px; +} +H2 { + font-family: helvetica,arial,sans-serif; + font-size: 12pt; + font-weight: bold; + text-align: left; + color: black; +} +H3 { + font-family: helvetica,arial,sans-serif; + font-size: 12pt; + text-align: left; + color: black; +} +H4 { + font-family: helvetica,arial,sans-serif; + font-size: 12pt; + text-align: left; + color: black; +} +H5 { + font-family: helvetica,arial,sans-serif; + font-size: 10pt; + text-align: left; + color: black; +} + /* outline level spacing */ +OL { + padding-bottom: 8pt; + counter-reset: section; + margin-left: 1.0em; + padding-left:0 ; +} +OL LI { counter-increment: section; } +OL LI:before { content: counters(section, ".") ". "; } + /* global heading settings */ +LI { + font-family: helvetica,arial,sans-serif; + color: black; + font-weight: normal; + list-style: lower-alpha; + padding-top: 4px; +} + /* level 1 heading overrides */ +LI.L1 { + font-size: 12pt; + font-weight: bold; + list-style: none; +} + /* level 2 heading overrides */ +LI.L2 { + font-size: 10pt; + font-weight: bold; + list-style: none; +} + /* level 3 heading overrides */ +LI.L3 { + font-size: 10pt; + list-style: none; +} + /* level 4 heading overrides */ +LI.L4 { + font-size: 10pt; + list-style: none; +} + /* level 5 heading overrides */ +LI.L5 { + font-size: 10pt; + list-style: none; +} + /* level 6 heading overrides */ +LI.L6 { + font-size: 10pt; + list-style: none; +} + /* level 7 heading overrides */ +LI.L7 { + font-size: 10pt; + list-style: none; +} + /* level 8 heading overrides */ +LI.L8 { + font-size: 10pt; + list-style: none; +} + /* level 9 heading overrides */ +LI.L9 { + font-size: 10pt; + list-style: none; +} + /* level 10 heading overrides */ +LI.L10 { + font-size: 10pt; + list-style: none; +} + /* level 11 heading overrides */ +LI.L11 { + font-size: 10pt; + list-style: none; +} + /* level 1 bullet heading overrides */ +LI.LB1 { + font-size: 12pt; + font-weight: bold; + list-style: disc; +} + /* level 2 bullet heading overrides */ +LI.LB2 { + font-size: 10pt; + font-weight: bold; + list-style: disc; +} + /* level 3 bullet heading overrides */ +LI.LB3 { + font-size: 10pt; + list-style: disc; +} + /* level 4 bullet heading overrides */ +LI.LB4 { + font-size: 10pt; + list-style: disc; +} + /* level 5 bullet heading overrides */ +LI.LB5 { + font-size: 10pt; + list-style: disc; +} + /* level 6 bullet heading overrides */ +LI.LB6 { + font-size: 10pt; + list-style: disc; +} + /* level 7 bullet heading overrides */ +LI.LB7 { + font-size: 10pt; + list-style: disc; +} + /* level 1 numeric heading overrides */ +LI.LN1 { + font-size: 12pt; + font-weight: bold; + list-style: decimal; +} + /* level 2 numeric heading overrides */ +LI.LN2 { + font-size: 10pt; + font-weight: bold; + list-style: decimal; +} + /* level 3 numeric heading overrides */ +LI.LN3 { + font-size: 10pt; + list-style: decimal; +} + /* level 4 numeric heading overrides */ +LI.LN4 { + font-size: 10pt; + list-style: decimal; +} + /* level 5 numeric heading overrides */ +LI.LN5 { + font-size: 10pt; + list-style: decimal; +} + /* level 6 numeric heading overrides */ +LI.LN6 { + font-size: 10pt; + list-style: decimal; +} + /* level 7 numeric heading overrides */ +LI.LN7 { + font-size: 10pt; + list-style: decimal; +} + /* body text */ +P { + font-family: helvetica,arial,sans-serif; + font-size: 9pt; + font-weight: normal; + color: black; +} + /* preformatted text */ +PRE { + font-family: fixed,monospace; + font-size: 9pt; + font-weight: normal; + color: darkblue; +} + +TABLE { + margin-top: 1em; + font-family: helvetica,arial,sans-serif; + font-size: 12pt; + font-weight: normal; + border-collapse: collapse; +} + +TH { + border: 1px solid black; + padding: 0.5em; + background-color: #eeddee; +} + +TD { + border: 1px solid black; + padding: 0.5em; + background-color: #ddeeee; +} + +CODE { + background-color: yellow; +} + +TABLE.TAB1 { + margin-top: 1em; + font-family: helvetica,arial,sans-serif; + font-size: 12pt; + font-weight: normal; + border-collapse: collapse; +} +TABLE.TAB2 { + margin-top: 1em; + font-family: helvetica,arial,sans-serif; + font-size: 11pt; + font-weight: normal; + border-collapse: collapse; +} +TABLE.TAB3 { + margin-top: 1em; + font-family: helvetica,arial,sans-serif; + font-size: 10pt; + font-weight: normal; + border-collapse: collapse; +} +TABLE.TAB4 { + margin-top: 1em; + font-family: helvetica,arial,sans-serif; + font-size: 10pt; + font-weight: normal; + border-collapse: collapse; +} +TABLE.TAB5 { + margin-top: 1em; + font-family: helvetica,arial,sans-serif; + font-size: 10pt; + font-weight: normal; + border-collapse: collapse; +} +TABLE.TAB6 { + margin-top: 1em; + font-family: helvetica,arial,sans-serif; + font-size: 10pt; + font-weight: normal; + border-collapse: collapse; diff --git a/pack/acp/start/vimoutliner/vimoutliner/scripts/otl2html_nnnnnn.css b/pack/acp/start/vimoutliner/vimoutliner/scripts/otl2html_nnnnnn.css new file mode 100644 index 0000000..7405843 --- /dev/null +++ b/pack/acp/start/vimoutliner/vimoutliner/scripts/otl2html_nnnnnn.css @@ -0,0 +1,246 @@ + /* copyright notice and filename */ +body { + font-family: helvetica,arial,sans-serif; + font-size: 10pt; +} + /* title at the top of the page */ +H1 { + font-family: helvetica,arial,sans-serif; + font-size: 14pt; + font-weight: bold; + text-align: center; + color: black; + background-color: #ddddee; + padding-top: 20px; + padding-bottom: 20px; +} +H2 { + font-family: helvetica,arial,sans-serif; + font-size: 12pt; + font-weight: bold; + text-align: left; + color: black; +} +H3 { + font-family: helvetica,arial,sans-serif; + font-size: 12pt; + text-align: left; + color: black; +} +H4 { + font-family: helvetica,arial,sans-serif; + font-size: 12pt; + text-align: left; + color: black; +} +H5 { + font-family: helvetica,arial,sans-serif; + font-size: 10pt; + text-align: left; + color: black; +} + /* outline level spacing */ +OL { + margin-left: 1.0em; + padding-left: 0; + padding-bottom: 8pt; +} + /* global heading settings */ +LI { + font-family: helvetica,arial,sans-serif; + color: black; + font-weight: normal; + list-style: lower-alpha; + padding-top: 4px; +} + /* level 1 heading overrides */ +LI.L1 { + font-size: 12pt; + font-weight: bold; + list-style: none; +} + /* level 2 heading overrides */ +LI.L2 { + font-size: 10pt; + font-weight: bold; + list-style: none; +} + /* level 3 heading overrides */ +LI.L3 { + font-size: 10pt; + list-style: none; +} + /* level 4 heading overrides */ +LI.L4 { + font-size: 10pt; + list-style: none; +} + /* level 5 heading overrides */ +LI.L5 { + font-size: 10pt; + list-style: none; +} + /* level 6 heading overrides */ +LI.L6 { + font-size: 10pt; + list-style: none; +} + /* level 7 heading overrides */ +LI.L7 { + font-size: 10pt; + list-style: none; +} + /* level 1 bullet heading overrides */ +LI.LB1 { + font-size: 12pt; + font-weight: bold; + list-style: disc; +} + /* level 2 bullet heading overrides */ +LI.LB2 { + font-size: 10pt; + font-weight: bold; + list-style: disc; +} + /* level 3 bullet heading overrides */ +LI.LB3 { + font-size: 10pt; + list-style: disc; +} + /* level 4 bullet heading overrides */ +LI.LB4 { + font-size: 10pt; + list-style: disc; +} + /* level 5 bullet heading overrides */ +LI.LB5 { + font-size: 10pt; + list-style: disc; +} + /* level 6 bullet heading overrides */ +LI.LB6 { + font-size: 10pt; + list-style: disc; +} + /* level 7 bullet heading overrides */ +LI.LB7 { + font-size: 10pt; + list-style: disc; +} + /* level 1 numeric heading overrides */ +LI.LN1 { + font-size: 12pt; + font-weight: bold; + list-style: decimal; +} + /* level 2 numeric heading overrides */ +LI.LN2 { + font-size: 10pt; + font-weight: bold; + list-style: decimal; +} + /* level 3 numeric heading overrides */ +LI.LN3 { + font-size: 10pt; + list-style: decimal; +} + /* level 4 numeric heading overrides */ +LI.LN4 { + font-size: 10pt; + list-style: decimal; +} + /* level 5 numeric heading overrides */ +LI.LN5 { + font-size: 10pt; + list-style: decimal; +} + /* level 6 numeric heading overrides */ +LI.LN6 { + font-size: 10pt; + list-style: decimal; +} + /* level 7 numeric heading overrides */ +LI.LN7 { + font-size: 10pt; + list-style: decimal; +} + /* body text */ +P { + font-family: helvetica,arial,sans-serif; + font-size: 9pt; + font-weight: normal; + color: darkgreen; +} + /* preformatted text */ +PRE { + font-family: fixed,monospace; + font-size: 9pt; + font-weight: normal; + color: darkblue; +} + +TABLE { + margin-top: 1em; + font-family: helvetica,arial,sans-serif; + font-size: 12pt; + font-weight: normal; + border-collapse: collapse; +} + +TH { + border: 1px solid black; + padding: 0.5em; + background-color: #eeddee; +} + +TD { + border: 1px solid black; + padding: 0.5em; + background-color: #ddeeee; +} + +CODE { + background-color: yellow; +} + +TABLE.TAB1 { + margin-top: 1em; + font-family: helvetica,arial,sans-serif; + font-size: 12pt; + font-weight: normal; + border-collapse: collapse; +} +TABLE.TAB2 { + margin-top: 1em; + font-family: helvetica,arial,sans-serif; + font-size: 11pt; + font-weight: normal; + border-collapse: collapse; +} +TABLE.TAB3 { + margin-top: 1em; + font-family: helvetica,arial,sans-serif; + font-size: 10pt; + font-weight: normal; + border-collapse: collapse; +} +TABLE.TAB4 { + margin-top: 1em; + font-family: helvetica,arial,sans-serif; + font-size: 10pt; + font-weight: normal; + border-collapse: collapse; +} +TABLE.TAB5 { + margin-top: 1em; + font-family: helvetica,arial,sans-serif; + font-size: 10pt; + font-weight: normal; + border-collapse: collapse; +} +TABLE.TAB6 { + margin-top: 1em; + font-family: helvetica,arial,sans-serif; + font-size: 10pt; + font-weight: normal; + border-collapse: collapse; diff --git a/pack/acp/start/vimoutliner/vimoutliner/scripts/otl2latex/.vimrc b/pack/acp/start/vimoutliner/vimoutliner/scripts/otl2latex/.vimrc new file mode 100644 index 0000000..d1675e5 --- /dev/null +++ b/pack/acp/start/vimoutliner/vimoutliner/scripts/otl2latex/.vimrc @@ -0,0 +1,44 @@ +" local .vimrc for working with otl2latex +" +" Used to write notes in vim outlier file (.otl) and have dynamically +" generated beamer-latex files produced. +" +" requires the script otl2latex.py is in the same directory as this script. +" also requires that your user ~/.vimrc file has "set exrc" specified +" +" This can be added to as more functionality is desired. +" +" Author: Serge Rey +" Last Revision: 2007-01-21 + +version 6.0 + +"get rid of blank lines +map ,n :g/^$/d + +"make the next paragraph a text block (in Vim Outliner terms) +map ,t ma}k^mb'a'bI| + +"make an itemized list out of the following contiguous lines (each line is an +"item) +map ,i ^ma}k^mb'a'bI\item 'aObegin{itemize}'aki\'bo\end{itemize} + +"make an itemized list out of the following contiguous lines (each line is an +"item) and then mark block as otl text +map ,I ^ma}k^mb'a'bI\item 'aObegin{itemize}'aki\'bo\end{itemize}'akma}k^mb'a'bI| + +map ,f ^Obegin{center}jo\end{center}k^i\includegraphics[width=.8\linewidth]{A}k^i\^jjmbkk'bI| + +"process the otl file to produce a pdf presentation +map ,b :!python otl2latex.py -p % %<.tex;pdflatex %<.tex  + +"pdflatex the current buffer +map ,p :!pdflatex % + +"set up menus +amenu o&2l.&process,b ,b +amenu o&2l.&delete\ blank\ lines,n ,n +amenu o2l.-Sep- : +amenu o&2l.&itemize,i ,i +amenu o&2l.&textualize,t ,t +amenu o&2l.&itemize_and_textualize,t ,I diff --git a/pack/acp/start/vimoutliner/vimoutliner/scripts/otl2latex/README b/pack/acp/start/vimoutliner/vimoutliner/scripts/otl2latex/README new file mode 100644 index 0000000..eb96167 --- /dev/null +++ b/pack/acp/start/vimoutliner/vimoutliner/scripts/otl2latex/README @@ -0,0 +1,23 @@ +otl2latex + +Translate a Vim Outliner file to a LaTeX document. + +Author: Serge Rey +Version 0.1 (2007-01-21) + +REQUIREMENTS + The Vim Outliner http://bike-nomad.com/vim/vimoutliner.html + beamer http://latex-beamer.sourceforge.net/ + Python http://www.python.org + + +INSTRUCTIONS +The user's guide is in otl2latex.pdf + +To reproduce it: + python otl2latex.py -p otl2latex.otl otl2latex.tex + pdflatex otl2latex + +DEVELOPMENT + otl2latex development is hosted at: + http://http://code.google.com/p/otl2latex/ diff --git a/pack/acp/start/vimoutliner/vimoutliner/scripts/otl2latex/otl2latex.otl b/pack/acp/start/vimoutliner/vimoutliner/scripts/otl2latex/otl2latex.otl new file mode 100644 index 0000000..3333e9f --- /dev/null +++ b/pack/acp/start/vimoutliner/vimoutliner/scripts/otl2latex/otl2latex.otl @@ -0,0 +1,95 @@ +preamble + @author Serge Rey + @institute sjsrey@gmail.com + @instituteShort sjsrey@gmail.com + @title otl2latex + @subtitle User's Guide + @titleShort http://code.google.com/p/otl2latex/ + @date November 3, 2007 + @dateShort otl2latex +Introduction + What is otl2latex? + Translator + otl to tex + |otl2latex allows you to + |* prepare your document in a powerful outliner + |* generate \LaTeX\ markup of your content + Requirements + Operating Systems + Operating Systems Supported + |otl2latex has been used successfully on + |* Linux + |* Mac OS X + |* Windows + Software Required + Packages and Programs + |* Python http://www.python.org + |* \LaTeX + |* Beamer http://latex-beamer.sourceforge.net/ + |* The Vim Outliner http://bike-nomad.com/vim/vimoutliner.html +Usage + Basics + Usage + From the command line + | \texttt{python otl2latex.py -p filename.otl filename.tex} + | + Notes + |* \texttt{filename.tex} will be generated, you don't edit that one. + |* You can run all this from withing Vim (see Vim Mappings below). + Basics + Presentations/Beamer + |* Level 1 in the outline become sections + |* Level 2 in the outline become subsections + |* Level 3 in the outline become frame titles + |* Level 4 in the outline become block titles + |* Text in the outline is treated as \LaTeX\ markup + Using Bullets + | Placing a '*' at the begining of a line will tell otl2latex to begin an itemize list. otl2latex currently supports 3 levels of Itemization. + |* First Level + |** Second Level + |*** Third Level + |** Second Level + Advanced + Tips + |* Level 4 can be omitted + |* You will have no blocks on that frame + Vim mappings + Vim Mappings: .vimrc + Processing + |* ,b will generate a pdf file from your outline + |* ,nb will remove all empty lines in your otl file + |* ,p will run the current vim buffer through pdflatex + Vim Mappings: .vimrc + Lists + |* ,i on the first line will create an itemized list of a block of lines + |* ,t will mark a block as otl text + |* ,I itemize and mark block as otl text + |You need to have a blank line at the end of the block to apply these. + Vim Mappings: .vimrc + Figures + |\begin{itemize} + |\item ,f (insert mode) will generate stub for figures + |\end{itemize} + A figure + | \begin{center} + | \includegraphics[width=.8\linewidth]{otl2latex.png} + | \end{center} + A figure + |\begin{center} + |\includegraphics[width=.8\linewidth]{otl2latex.png} + |\end{center} + Future Extensions + Move to vim script + .vimrc to otl2latex.vim + |\begin{itemize} + |\item Currently we are just embedding mappings in .vimrc + |\item Ok for testing, not very polished for end user + |\end{itemize} + Reverse Engineering + latex2otl + |\begin{itemize} + |\item take a tex file + |\item generate the otl file + |\end{itemize} + + diff --git a/pack/acp/start/vimoutliner/vimoutliner/scripts/otl2latex/otl2latex.pdf b/pack/acp/start/vimoutliner/vimoutliner/scripts/otl2latex/otl2latex.pdf new file mode 100644 index 0000000..1c4d56a Binary files /dev/null and b/pack/acp/start/vimoutliner/vimoutliner/scripts/otl2latex/otl2latex.pdf differ diff --git a/pack/acp/start/vimoutliner/vimoutliner/scripts/otl2latex/otl2latex.png b/pack/acp/start/vimoutliner/vimoutliner/scripts/otl2latex/otl2latex.png new file mode 100644 index 0000000..a1622ba Binary files /dev/null and b/pack/acp/start/vimoutliner/vimoutliner/scripts/otl2latex/otl2latex.png differ diff --git a/pack/acp/start/vimoutliner/vimoutliner/scripts/otl2latex/otl2latex.py b/pack/acp/start/vimoutliner/vimoutliner/scripts/otl2latex/otl2latex.py new file mode 100755 index 0000000..5ef5ed0 --- /dev/null +++ b/pack/acp/start/vimoutliner/vimoutliner/scripts/otl2latex/otl2latex.py @@ -0,0 +1,315 @@ +usage=""" +otl2latex.py + +Translate a Vim Outliner file to a LaTeX document. + + +Usage: + otl2latex.py -[abp] file.otl [file.tex] + + -a: Output to article class + -b: Output to book class + -p: Output to Beamer (presentation) class (default) + + +Author: Serge Rey +Version 0.1 (2007-01-21) +""" + +import os,sys + +class Line: + """Class for markup lines""" + def __init__(self, content): + ntabs=content.count("\t") + content=content.lstrip("\t") + level = ntabs - content.count("\t") + self.level=level + self.content = content + self.markup=0 + if content[0]=="|": + self.markup=1 + +#3 lines added here + self.bullet=0 + if len(content) > 2 and (content[2]=='*' or content[1]=='*'): + self.bullet=1 + #print "%d: %s"%(self.bullet,content) + +class Manager: + """Abstract class for LaTeX document classes""" + def __init__(self, content, fileOut): + self.content=content + self.fileOut=open(fileOut,'w') + self.parse() + self.fileOut.write(self.markup) + self.fileOut.close() + def parse(self): + self.lines=[ Line(line) for line in self.content] + preambleStart=0 + nl=len(self.lines) + id=zip(range(nl),self.lines) + level1=[i for i,line in id if line.level==0] + preambleEnd=level1[1] + preamble=self.lines[0:preambleEnd] + self.level1=level1 + preambleMarkup=[] + for line in preamble: + if line.content.count("@"): + tmp=line.content.split("@")[1] + tmp=tmp.split() + env=tmp[0] + content=" ".join(tmp[1:]) + mu="\\%s{%s}"%(env,content) + preambleMarkup.append(mu) + self.preamble=preambleMarkup + self.preambleLines=preamble + self.documentLines=self.lines[preambleEnd:] + + + + + +class Beamer(Manager): + """Manager for Beamer document class""" + def __init__(self, content,fileOut): + self.top1=""" +\documentclass[nototal,handout]{beamer} +\mode +{ + \usetheme{Madrid} + \setbeamercovered{transparent} +} + +\usepackage{verbatim} +\usepackage{fancyvrb} +\usepackage[english]{babel} +\usepackage[latin1]{inputenc} +\usepackage{times} +\usepackage{tikz} +\usepackage[T1]{fontenc} +\usepackage{graphicx} %sjr added +\graphicspath{{figures/}} +\usepackage{hyperref}""" + self.top2=""" +% Delete this, if you do not want the table of contents to pop up at +% the beginning of each subsection: +\AtBeginSubsection[] +{ + \\begin{frame} + \\frametitle{Outline} + \\tableofcontents[currentsection,currentsubsection] + \end{frame} +} + + +% If you wish to uncover everything in a step-wise fashion, uncomment +% the following command: +\\beamerdefaultoverlayspecification{<+->} +\\begin{document} +\\begin{frame} + \\titlepage +\end{frame} +\\begin{frame} + \\frametitle{Outline} + \\tableofcontents[pausesections] + % You might wish to add the option [pausesections] +\end{frame} +""" + self.bulletLevel = 0 + Manager.__init__(self, content, fileOut) + + def itemize(self,line): + nstars=line.content.count("*") + content=line.content.lstrip("|").lstrip().lstrip("*") + self.currentBLevel = nstars - content.count("*") + stuff=[] + if self.currentBLevel == self.bulletLevel and line.bullet: + mu='\\item '+line.content.lstrip("|").lstrip().lstrip("*") + elif line.bullet and self.currentBLevel > self.bulletLevel: + self.bulletLevel += 1 + stuff.append("\\begin{itemize}\n") + mu='\\item '+line.content.lstrip("|").lstrip().lstrip("*") + elif self.currentBLevel < self.bulletLevel and line.bullet: + self.bulletLevel -= 1 + stuff.append("\\end{itemize}\n") + mu='\\item '+line.content.lstrip("|").lstrip().lstrip("*") + elif self.currentBLevel < self.bulletLevel: + self.bulletLevel -= 1 + stuff.append("\\end{itemize}\n") + mu=line.content.lstrip("|") + else: + panic() + return stuff,mu + + def parse(self): + Manager.parse(self) + #print self.content + #print self.lines + #print self.level1 + #for info in self.preamble: + # print info + + # do my own preamble + field=("author ","instituteShort ","dateShort ","date ","subtitle ", + "title ", "institute ", "titleShort ") + pattern=["@"+token for token in field] + f=zip(field,pattern) + d={} + for field,pattern in f: + t=[line.content for line in self.preambleLines if line.content.count(pattern)] + if t: + d[field]= t[0].split(pattern)[1].strip() + else: + d[field]="" + preamble="\n\n\\author{%s}\n"%d['author '] + preamble+="\\institute[%s]{%s}\n"%(d['instituteShort '],d['institute ']) + preamble+="\\title[%s]{%s}\n"%(d['titleShort '],d['title ']) + preamble+="\\subtitle{%s}\n"%(d['subtitle ']) + preamble+="\\date[%s]{%s}\n"%(d['dateShort '],d['date ']) + + print self.preamble + self.preamble=preamble + + + body=[] + prev=0 + frameOpen=0 + blockOpen=0 + frameCount=0 + blockCount=0 + + for line in self.documentLines: + if line.level==0: + for i in range(0,self.bulletLevel): + self.bulletLevel -= 1 + body.append("\\end{itemize}\n") + if blockOpen: + body.append("\\end{block}") + blockOpen=0 + if frameOpen: + body.append("\\end{frame}") + frameOpen=0 + mu="\n\n\n\\section{%s}"%line.content.strip() + elif line.level==1: + for i in range(0,self.bulletLevel): + self.bulletLevel -= 1 + body.append("\\end{itemize}\n") + if blockOpen: + body.append("\\end{block}") + blockOpen=0 + if frameOpen: + body.append("\\end{frame}") + frameOpen=0 + mu="\n\n\\subsection{%s}"%line.content.strip() + elif line.level==2: + # check if this frame has blocks or is nonblocked + if line.markup: + if line.bullet or self.bulletLevel: + stuff,mu=self.itemize(line) + if len(stuff) > 0: + for i in stuff: + body.append(i) + else: + mu=line.content.lstrip("|") + else: + for i in range(0,self.bulletLevel): + self.bulletLevel -= 1 + body.append("\\end{itemize}\n") + if blockOpen: + body.append("\\end{block}") + blockOpen=0 + if frameOpen: + body.append("\\end{frame}") + else: + frameOpen=1 + # check for verbatim here + tmp=line.content.strip() + if tmp.count("@vb"): + tmp=tmp.split("@")[0] + mu="\n\n\\begin{frame}[containsverbatim]\n\t\\frametitle{%s}\n"%tmp + else: + mu="\n\n\\begin{frame}\n\t\\frametitle{%s}\n"%tmp + frameCount+=1 + elif line.level==3: + # check if it is a block or body content + if line.markup: + if line.bullet or self.bulletLevel: + stuff,mu=self.itemize(line) + if len(stuff) > 0: + for i in stuff: + body.append(i) + else: + mu=line.content.lstrip("\t") + mu=mu.lstrip("|") + else: + for i in range(0,self.bulletLevel): + self.bulletLevel -= 1 + body.append("\\end{itemize}\n") + #block title + if blockOpen: + body.append("\\end{block}") + else: + blockOpen=1 + mu="\n\\begin{block}{%s}\n"%line.content.strip() + blockCount+=1 + else: + mu="" + body.append(mu) + for i in range(0,self.bulletLevel): + self.bulletLevel -= 1 + body.append("\\end{itemize}\n") + if blockOpen: + body.append("\\end{block}") + if frameOpen: + body.append("\\end{frame}") + + self.body=" ".join(body) + self.markup=self.top1+self.preamble+self.top2 + self.markup+=self.body + self.markup+="\n\\end{document}\n" + print self.markup + +# Process command line arguments +args = sys.argv +nargs=len(args) +dispatch={} +dispatch['beamer']=Beamer +inputFileName=None +outputFileName=None + +def printUsage(): + print usage + sys.exit() + +if nargs==1: + printUsage() +else: + docType='beamer' + options=args[1] + if options.count("-"): + if options.count("a"): + docType='article' + elif options.count("b"): + docType='book' + if nargs==2: + printUsage() + elif nargs==3: + inputFileName=args[2] + elif nargs==4: + inputFileName=args[2] + outputFileName=args[3] + else: + printUsage() + elif nargs==2: + inputFileName=args[1] + elif nargs==3: + inputFileName=args[1] + outputFileName=args[3] + else: + printUsage() + # Dispatch to correct document class manager + fin=open(inputFileName,'r') + content=fin.readlines() + fin.close() + dispatch[docType](content,outputFileName) diff --git a/pack/acp/start/vimoutliner/vimoutliner/scripts/otl2latex/otl2latex.tex b/pack/acp/start/vimoutliner/vimoutliner/scripts/otl2latex/otl2latex.tex new file mode 100644 index 0000000..31f4766 --- /dev/null +++ b/pack/acp/start/vimoutliner/vimoutliner/scripts/otl2latex/otl2latex.tex @@ -0,0 +1,223 @@ + +\documentclass[nototal,handout]{beamer} +\mode +{ + \usetheme{Madrid} + \setbeamercovered{transparent} +} + +\usepackage{verbatim} +\usepackage{fancyvrb} +\usepackage[english]{babel} +\usepackage[latin1]{inputenc} +\usepackage{times} +\usepackage{tikz} +\usepackage[T1]{fontenc} +\usepackage{graphicx} %sjr added +\graphicspath{{figures/}} +\usepackage{hyperref} + +\author{Serge Rey} +\institute[sjsrey@gmail.com]{sjsrey@gmail.com} +\title[http://code.google.com/p/otl2latex/]{otl2latex} +\subtitle{User's Guide} +\date[otl2latex]{November 3, 2007} + +% Delete this, if you do not want the table of contents to pop up at +% the beginning of each subsection: +\AtBeginSubsection[] +{ + \begin{frame} + \frametitle{Outline} + \tableofcontents[currentsection,currentsubsection] + \end{frame} +} + + +% If you wish to uncover everything in a step-wise fashion, uncomment +% the following command: +\beamerdefaultoverlayspecification{<+->} +\begin{document} +\begin{frame} + \titlepage +\end{frame} +\begin{frame} + \frametitle{Outline} + \tableofcontents[pausesections] + % You might wish to add the option [pausesections] +\end{frame} + + + +\section{Introduction} + +\subsection{What is otl2latex?} + +\begin{frame} + \frametitle{Translator} + +\begin{block}{otl to tex} + otl2latex allows you to + \begin{itemize} + \item prepare your document in a powerful outliner + \item generate \LaTeX\ markup of your content + \end{itemize} + \end{block} \end{frame} + +\subsection{Requirements} + +\begin{frame} + \frametitle{Operating Systems} + +\begin{block}{Operating Systems Supported} + otl2latex has been used successfully on + \begin{itemize} + \item Linux + \item Mac OS X + \item Windows + \end{itemize} + \end{block} \end{frame} + +\begin{frame} + \frametitle{Software Required} + +\begin{block}{Packages and Programs} + \begin{itemize} + \item Python http://www.python.org + \item \LaTeX + \item Beamer http://latex-beamer.sourceforge.net/ + \item The Vim Outliner http://bike-nomad.com/vim/vimoutliner.html + \end{itemize} + \end{block} \end{frame} + + +\section{Usage} + +\subsection{Basics} + +\begin{frame} + \frametitle{Usage} + +\begin{block}{From the command line} + \texttt{python otl2latex.py -p filename.otl filename.tex} + + \end{block} +\begin{block}{Notes} + \begin{itemize} + \item \texttt{filename.tex} will be generated, you don't edit that one. + \item You can run all this from withing Vim (see Vim Mappings below). + \end{itemize} + \end{block} \end{frame} + +\begin{frame} + \frametitle{Basics} + +\begin{block}{Presentations/Beamer} + \begin{itemize} + \item Level 1 in the outline become sections + \item Level 2 in the outline become subsections + \item Level 3 in the outline become frame titles + \item Level 4 in the outline become block titles + \item Text in the outline is treated as \LaTeX\ markup + \end{itemize} + \end{block} +\begin{block}{Using Bullets} + Placing a '*' at the begining of a line will tell otl2latex to begin an itemize list. otl2latex currently supports 3 levels of Itemization. + \begin{itemize} + \item First Level + \begin{itemize} + \item Second Level + \begin{itemize} + \item Third Level + \end{itemize} + \item Second Level + \end{itemize} + \end{itemize} + \end{block} \end{frame} + +\begin{frame} + \frametitle{Advanced} + +\begin{block}{Tips} + \begin{itemize} + \item Level 4 can be omitted + \item You will have no blocks on that frame + \end{itemize} + \end{block} \end{frame} + +\subsection{Vim mappings} + +\begin{frame} + \frametitle{Vim Mappings: .vimrc} + +\begin{block}{Processing} + \begin{itemize} + \item ,b will generate a pdf file from your outline + \item ,nb will remove all empty lines in your otl file + \item ,p will run the current vim buffer through pdflatex + \end{itemize} + \end{block} \end{frame} + +\begin{frame} + \frametitle{Vim Mappings: .vimrc} + +\begin{block}{Lists} + \begin{itemize} + \item ,i on the first line will create an itemized list of a block of lines + \item ,t will mark a block as otl text + \item ,I itemize and mark block as otl text + \end{itemize} + You need to have a blank line at the end of the block to apply these. + \end{block} \end{frame} + +\begin{frame} + \frametitle{Vim Mappings: .vimrc} + +\begin{block}{Figures} + \begin{itemize} + \item ,f (insert mode) will generate stub for figures + \end{itemize} + \end{block} \end{frame} + +\begin{frame} + \frametitle{A figure} + \begin{center} + \includegraphics[width=.8\linewidth]{otl2latex.png} + \end{center} + \end{frame} + +\begin{frame} + \frametitle{A figure} + \begin{center} + \includegraphics[width=.8\linewidth]{otl2latex.png} + \end{center} + \end{frame} + +\subsection{Future Extensions} + +\begin{frame} + \frametitle{Move to vim script} + +\begin{block}{.vimrc to otl2latex.vim} + \begin{itemize} + \item Currently we are just embedding mappings in .vimrc + \item Ok for testing, not very polished for end user + \end{itemize} + \end{block} \end{frame} + +\begin{frame} + \frametitle{Reverse Engineering} + +\begin{block}{latex2otl} + \begin{itemize} + \item take a tex file + \item generate the otl file + \end{itemize} + \end{block} \end{frame} + + +\section{} + + +\section{} +\end{document} diff --git a/pack/acp/start/vimoutliner/vimoutliner/scripts/otl2latex/otl2latex.toc b/pack/acp/start/vimoutliner/vimoutliner/scripts/otl2latex/otl2latex.toc new file mode 100644 index 0000000..ae333f6 --- /dev/null +++ b/pack/acp/start/vimoutliner/vimoutliner/scripts/otl2latex/otl2latex.toc @@ -0,0 +1,9 @@ +\beamer@endinputifotherversion {3.07pt} +\select@language {english} +\beamer@sectionintoc {1}{Introduction}{3}{0}{1} +\beamer@subsectionintoc {1}{1}{What is otl2latex?}{3}{0}{1} +\beamer@subsectionintoc {1}{2}{Requirements}{4}{0}{1} +\beamer@sectionintoc {2}{Usage}{6}{0}{2} +\beamer@subsectionintoc {2}{1}{Basics}{6}{0}{2} +\beamer@subsectionintoc {2}{2}{Vim mappings}{9}{0}{2} +\beamer@subsectionintoc {2}{3}{Future Extensions}{14}{0}{2} diff --git a/pack/acp/start/vimoutliner/vimoutliner/scripts/otl2lyx.awk b/pack/acp/start/vimoutliner/vimoutliner/scripts/otl2lyx.awk new file mode 100644 index 0000000..cc6e381 --- /dev/null +++ b/pack/acp/start/vimoutliner/vimoutliner/scripts/otl2lyx.awk @@ -0,0 +1,149 @@ +#!/usr/bin/gawk -f + +# Copyright (C) 2007 by Steve Litt, all rights reserved. +# Licensed under the GNU General Public License, version 2. +# otl2lyx.awk version 0.1.1 pre-alpha +# 4/23/2007 +# Fixed insertion of other environments at bodytext to bodytext +# borders. +# +# USAGE: ./otl2lyx level-environment-table-file outline-file +# +# level-table-structure: +# 1: Top-level-environment-name +# 2: 2nd-level-environment-name +# 3: 3rd-level-environment-name +# 4: 4th-level-environment-name +# 5: 5th-level-environment-name +# 6: 6th-level-environment-name +# bodytext: environment-name-for-normal-text +# +# Example for a book: +# 1: Chapter +# 2: Section +# 3: Subsection +# 4: Subsubsection +# 5: Paragraph +# 6: Subparagraph +# 7: Garbage7 +# bodytext: Standard + + +BEGIN{ + FS=":[ \t]*" + OFS="\x09" + lastinbodytext=0 +} + +### BLOW OFF BLANKS OUTSIDE OF BODY TEXT +$0~/^[ \t]*$/ && inbodytext==0{ + next +} + +### FILL THE ENVIRONMENTS ARRAY ### +ARGIND==1{ + FS=":[ \t]*"; + sub(/[ \t]*$/,"",$2); + environments[$1] = $2; + next; +} + +FNR==101{ + for(i in environments) print "level=" i ", string=" environments[i]; +} + +### FIELD SEPARATOR IS TAB ON THE OUTLINE FILE ### +{FS="\x09"; } + +### INCREMENT OUTLINE ID NUMBER +{ol_id++} + +### CALCULATE LEVEL ### +{ + for(i=1;i<=NF;i++) + if($i == ""){ + } else { + break + } + this["level"] = i + if(ol_id == ol_id_first) + this["level"]-- +} + +### FIGURE TEXT ### +{ + this["text"] = "" + for(i=1;i<=NF;i++){ + if($i != ""){ + if(this["text"] == ""){ + this["text"] = this["text"] $i + } else { + this["text"] = this["text"] " " $i + } + } + } + sub(/^[ \t]+/, "", this["text"]); + sub(/[ \t]+$/, "", this["text"]); +} + +### SET BODYTEXT FLAGS ### +{ inbodytext = 0; newbodytext = 0; endbodytext = 0; btblankline=0; } + + +this["text"] ~ /^:[ \t]+[^ \t]/{ + inbodytext = 1; + sub(/^:[ \t]*/, "", this["text"]); + this["text"] = this["text"] " "; +} + +this["text"] == "" || this["text"] == ":"{ + this["text"] = ""; + inbodytext = lastinbodytext; + if(inbodytext == 1){ + endbodytext = 1; + newbodytext = 1; + btblankline = 1; + } +} + +lastinbodytext == 1 && inbodytext == 0{ + endbodytext = 1; +} + +lastinbodytext == 0 && inbodytext == 1{ + newbodytext = 1; +} + +{ lastinbodytext = inbodytext; } + + + +### QUOTE SINGLE BACKSLASHES FOR LATEX ### +{gsub(/\\/,"\r\\backslash\r", this["text"]);} + +### PRINT LYX CONTENT ### + +endbodytext == 1{ + print "\\end_layout" + print "" +} +newbodytext == 1{ + print "\\begin_layout " environments["bodytext"] +} +inbodytext == 1{ + if(btblankline == 0) print this["text"] +} + +inbodytext == 0{ + print "\\begin_layout " environments[this["level"]] + print this["text"] + print "\\end_layout" + print "" +} + +END{ + if(inbodytext == 1){ + print "\\end_layout" + print "" + } +} diff --git a/pack/acp/start/vimoutliner/vimoutliner/scripts/otl2ooimpress.py b/pack/acp/start/vimoutliner/vimoutliner/scripts/otl2ooimpress.py new file mode 100755 index 0000000..7d3ab67 --- /dev/null +++ b/pack/acp/start/vimoutliner/vimoutliner/scripts/otl2ooimpress.py @@ -0,0 +1,263 @@ +#!/usr/bin/python2 +# otl2ooimpress.py +# needs otl2ooimpress.sh to work in an automated way +############################################################################# +# +# Tool for Vim Outliner files to Open Office Impress files. +# Copyright (C) 2003 by Noel Henson, all rights reserved. +# +# This tool is free software; you can redistribute it and/or +# modify it under the terms of the GNU Library General Public +# License as published by the Free Software Foundation; either +# version 2 of the License, or (at your option) any later version. +# +# This library is distributed in the hope that it will be useful, +# but WITHOUT ANY WARRANTY; without even the implied warranty of +# MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU +# Lesser General Public License for more details. +# +# You should have received a copy of the GNU Library General Public +# License along with this library; if not, see +# . +# +############################################################################# +# ALPHA VERSION!!! + +########################################################################### +# Basic function +# +# This program accepts VO outline files and converts them +# to the zipped XML files required by Open Office Impress. +# +# 10 outline levels are supported. These loosely correspond to the +# HTML H1 through H9 tags. +# + + +########################################################################### +# include whatever mdules we need + +import sys +########################################################################### +# global variables + +level = 0 +inputFile = "" +outline = [] +flatoutline = [] +pageNumber = 0 +inPage = 0 +debug = 0 + +########################################################################### +# function definitions + + +# usage +# print the simplest form of help +# input: none +# output: simple command usage is printed on the console +def showUsage(): + print + print "Usage:" + print "otl2ooimpress.py [options] inputfile > outputfile" + print "" + print "output is on STDOUT" + print + + +# getArgs +# Check for input arguments and set the necessary switches +# input: none +# output: possible console output for help, switch variables may be set +def getArgs(): + global inputfile, debug + if (len(sys.argv) == 1): + showUsage() + sys.exit()() + else: + for i in range(len(sys.argv)): + if (i != 0): + if (sys.argv[i] == "-d"): + debug = 1 # test for debug flag + elif (sys.argv[i] == "-?"): # test for help flag + showUsage() # show the help + sys.exit() # exit + elif (sys.argv[i] == "--help"): + showUsage() + sys.exit() + elif (sys.argv[i] == "-h"): + showUsage() + sys.exit() + elif (sys.argv[i][0] == "-"): + print "Error! Unknown option. Aborting" + sys.exit() + else: # get the input file name + inputfile = sys.argv[i] + + +# getLineLevel +# get the level of the current line (count the number of tabs) +# input: linein - a single line that may or may not have tabs at the beginning +# output: returns a number 1 is the lowest +def getLineLevel(linein): + strstart = linein.lstrip() # find the start of text in line + x = linein.find(strstart) # find the text index in the line + n = linein.count("\t", 0, x) # count the tabs + return(n + 1) # return the count + 1 (for level) + + +# getLineTextLevel +# get the level of the current line (count the number of tabs) +# input: linein - a single line that may or may not have tabs at the beginning +# output: returns a number 1 is the lowest +def getLineTextLevel(linein): + strstart = linein.lstrip() # find the start of text in line + x = linein.find(strstart) # find the text index in the line + n = linein.count("\t", 0, x) # count the tabs + n = n + linein.count(" ", 0, x) # count the spaces + return(n + 1) # return the count + 1 (for level) + + +# colonStrip(line) +# stip a leading ':', if it exists +# input: line +# output: returns a string with a stipped ':' +def colonStrip(line): + if (line[0] == ":"): + return line[1:].lstrip() + else: + return line + + +# processLine +# process a single line +# input: linein - a single line that may or may not have tabs at the beginning +# level - an integer between 1 and 9 that show the current level +# (not to be confused with the level of the current line) +# output: through standard out +def processLine(linein): + global inPage, pageNumber + if (linein.lstrip() == ""): + print + return + if (getLineLevel(linein) == 1): + if (inPage == 1): + print '' + inPage = 0 + pageNumber += 1 + outstring = '' + print outstring + outstring = '' + print outstring + outstring = '' + outstring += linein.lstrip() + outstring += "" + print outstring + outstring = '' + print outstring + inPage = 1 + else: + outstring = '' + outstring += linein.lstrip() + outstring += '' + print outstring + + +# flatten +# Flatten a subsection of an outline. The index passed is the outline section +# title. All sublevels that are only one level deeper are indcluded in the +# current subsection. Then there is a recursion for those items listed in the +# subsection. Exits when the next line to be processed is of the same or lower +# outline level. +# (lower means shallower) +# input: idx - the index into the outline. The indexed line is the title. +# output: adds reformatted lines to flatoutline[] +def flatten(idx): + if (outline[idx] == ""): + return + if (len(outline) <= idx): + return + titleline = outline[idx] + titlelevel = getLineLevel(titleline) + if (getLineLevel(outline[idx + 1]) > titlelevel): + if (titleline[titlelevel - 1] != " "): + flatoutline.append(titleline.lstrip()) + exitflag = 0 + while (exitflag == 0): + if (idx < len(outline) - 1): + idx = idx + 1 + currlevel = getLineLevel(outline[idx]) + if (currlevel == titlelevel + 1): + if (currlevel == outline[idx].find(" ") + 1): + flatoutline.append("\t " + outline[idx].lstrip()) + else: + flatoutline.append("\t" + outline[idx].lstrip()) + elif (currlevel <= titlelevel): + exitflag = 1 + else: + exitflag = 1 + return + + +def printHeader(linein): + print''' + + + + ''' + + +def printFooter(): + print '' + print'' + + +def main(): + getArgs() + file = open(inputFile, "r") + linein = file.readline().strip() + outline.append(linein) + linein = file.readline().strip() + while linein != "": + outline.append("\t" + linein) + linein = file.readline().rstrip() + for i in range(0, len(outline) - 1): + flatten(i) + + printHeader(flatoutline[0]) + for i in range(0, len(flatoutline)): + processLine(flatoutline[i]) + printFooter() + + file.close() + +main() diff --git a/pack/acp/start/vimoutliner/vimoutliner/scripts/otl2ooimpress.sh b/pack/acp/start/vimoutliner/vimoutliner/scripts/otl2ooimpress.sh new file mode 100755 index 0000000..9e2432d --- /dev/null +++ b/pack/acp/start/vimoutliner/vimoutliner/scripts/otl2ooimpress.sh @@ -0,0 +1,34 @@ +#!/bin/bash +# otl2ooimpress.sh +# needs otl2ooimpress.py to work at all +############################################################################# +# +# Tool for Vim Outliner files to Open Office Impress files. +# Copyright (C) 2003 by Noel Henson, all rights reserved. +# +# This tool is free software; you can redistribute it and/or +# modify it under the terms of the GNU Library General Public +# License as published by the Free Software Foundation; either +# version 2 of the License, or (at your option) any later version. +# +# This library is distributed in the hope that it will be useful, +# but WITHOUT ANY WARRANTY; without even the implied warranty of +# MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU +# Lesser General Public License for more details. +# +# You should have received a copy of the GNU Library General Public +# License along with this library; if not, see +# . +# +############################################################################# + +# Path to otl2ooimpress.py +MYPATH=$HOME/bin +# Path to rm +RMPATH=/bin +# Path to zip +ZIPPATH=/usr/bin + +$MYPATH/otl2ooimpress.py $1 > content.xml +$ZIPPATH/zip $1.sxi content.xml +$RMPATH/rm content.xml diff --git a/pack/acp/start/vimoutliner/vimoutliner/scripts/otl2table.py b/pack/acp/start/vimoutliner/vimoutliner/scripts/otl2table.py new file mode 100755 index 0000000..543792b --- /dev/null +++ b/pack/acp/start/vimoutliner/vimoutliner/scripts/otl2table.py @@ -0,0 +1,199 @@ +#!/usr/bin/python2 +# otl2table.py +# convert a tab-formatted outline from VIM to tab-delimited table +# +# Copyright (c) 2004 Noel Henson All rights reserved +# +# ALPHA VERSION!!! + +########################################################################### +# Basic function +# +# This program accepts text outline files and converts them +# the tab-delimited text tables. +# This: +# Test +# Dog +# Barks +# Howls +# Cat +# Meows +# Yowls +# Becomes this: +# Test Dog Barks +# Test Dog Howls +# Test Cat Meows +# Test Cat Yowls +# +# This will make searching for groups of data and report generation easier. +# + + +########################################################################### +# include whatever mdules we need + +import sys +from string import * +#from time import * + +########################################################################### +# global variables + +level = 0 +inputFile = "" +formatMode = "tab" +noTrailing = 0 +columns = [] + +########################################################################### +# function definitions + +# usage +# print the simplest form of help +# input: none +# output: simple command usage is printed on the console + +def showUsage(): + print + print "Usage:" + print "otl2table.py [options] inputfile > outputfile" + print "Options" + print " -n Don't include trailing columns." + print " -t type Specify field separator type." + print " Types:" + print " tab - separate fields with tabs (default)" + print " csv - separate fields with ," + print " qcsv - separate fields with \",\"" + print " bullets - uses HTML tags     \n$in\n" ); + } + $r->print( "\n" ); + } + $r->print( "\n\n" ); + } + + my $t1 = Time::HiRes::gettimeofday; + my $td = sprintf("%0.3f", $t1 - $t0); + $r->print("
    OTL parsed in $td secs
    \n") if $opt{timer}; + $r->print(< + +EHTML + + return OK; +} + +sub sorter +{ + my ($opt, $re) = @_; + return 0 unless $opt->{sorttype}; + my ($sa, $sb); + if ($opt->{sorttype} eq 'percent') { + $sa = $2 if $a =~ $re->{percent}; + $sb = $2 if $b =~ $re->{percent}; + return $opt->{sortrev} ? $sb <=> $sa : $sa <=> $sb; + } + else { + $sa = $1 if $a =~ $re->{linetext}; + $sb = $1 if $b =~ $re->{linetext}; + return $opt->{sortrev} ? $sb cmp $sa : $sa cmp $sb; + } +} + +1; + diff --git a/pack/acp/start/vimoutliner/vimoutliner/scripts/otl_handler/README b/pack/acp/start/vimoutliner/vimoutliner/scripts/otl_handler/README new file mode 100644 index 0000000..ddc610d --- /dev/null +++ b/pack/acp/start/vimoutliner/vimoutliner/scripts/otl_handler/README @@ -0,0 +1,155 @@ + + WHAT IS THIS? +--------------------------------------------------------------------- + +Vimoutliner already comes with some otl to HTML converters that work +quite well. I maintain a few different otl files, that are displayed +on a internal intranet - the step of converting to HTML on every little +change before upload was becoming mildly irritating, and countering my +near legendary laziness. + +This mod_perl handler teaches apache how to pretty print otl natively. + +Now, I can just edit the otl files directly - skip the conversion step +altogether, and let Apache make some delicious looking outlines. + + + INSTALLATION +--------------------------------------------------------------------- + +First of all, prerequisites! + + - apache2 + - mod_perl2 + - libapreq2 (Apache2::Request) + +Add the following lines in your httpd.conf, or in a +separate otl.conf in the apache Includes directory: + + ------------------------- + PerlSwitches -I/path/to/perl/libraries + PerlModule Apache::OTL + + + SetHandler perl-script + PerlResponseHandler Apache::OTL + + ------------------------- + +Doublecheck that your apreq2 module is setup to load, as well. + +That's it. Apache will now pretty-print all your otl files. + + + SETTINGS +--------------------------------------------------------------------- + +Settings for the otl_handler are stored on the first line of the otl +files themselves, prefixed by the 'user no wrap' character, '<'. See +the sample.otl for an example settings line. All settings are entirely +optional. + +title + Type: string + Default: filename + + The title of the OTL. Used as a header, and the html title. + If this is not set, the html title is derived from the filename. + + +style + Type: string + Default: none + + A path to css style(s). + Comma separated values load different files in order. + Media type defaults to 'screen', if the css name contains the + string 'print' anywhere, the media type is changed to print. + + :style=/css/otl_style.css,/css/print_style.css + +js + Type: string + Default: none + + Use javascript? If set, loads an external javascript library. + Comma separated values load diff files in order. + + +last_mod + Type: boolean + Default: 0 + + Show modification time of the otl file? + + +legend + Type: boolean + Default: 0 + + Display small legend for todo and done items? + + +sort + Type: boolean + Default: 0 + + Show sort links? + + +sorttype + Type: string + Default: none + + Default sorting method. Valid values are + percent + alpha + + +sortrev + Type: boolean + Default: 0 + + Should we default to reverse sorting? + + +counts + Type: boolean + Default: 0 + + Count and display sub items? + + +timer + Type: boolean + Default: 0 + + Display how long the parser took to generate the html? + + + + INCLUDED FILES +--------------------------------------------------------------------- + +/Apache/OTL.pm + The mod_perl content handler. + +/javascript/* + Example (but functional!) javascript. Create line numbers, + various eye candies, and clickable folds. + + This requires the 'jquery.js' library, also included. + +/sample.otl + An example vimoutliner file, with optional settings. + +/styles/* + "Theme" examples for customizing OTL display. + + + ACKNOWLEDGEMENTS +--------------------------------------------------------------------- + +Thanks to Nathan Dabney and +Michael Granger for their help and advice! + diff --git a/pack/acp/start/vimoutliner/vimoutliner/scripts/otl_handler/devel-mode b/pack/acp/start/vimoutliner/vimoutliner/scripts/otl_handler/devel-mode new file mode 100644 index 0000000..f77cf6a --- /dev/null +++ b/pack/acp/start/vimoutliner/vimoutliner/scripts/otl_handler/devel-mode @@ -0,0 +1,5 @@ +PerlModule Apache2::Reload +PerlInitHandler Apache2::Reload +PerlSetVar ReloadAll Off +PerlSetVar ReloadModules "Apache::OTL" +PerlSetVar ReloadConstantRedefineWarnings Off diff --git a/pack/acp/start/vimoutliner/vimoutliner/scripts/otl_handler/javascript/jquery.js b/pack/acp/start/vimoutliner/vimoutliner/scripts/otl_handler/javascript/jquery.js new file mode 100644 index 0000000..4384f4c --- /dev/null +++ b/pack/acp/start/vimoutliner/vimoutliner/scripts/otl_handler/javascript/jquery.js @@ -0,0 +1,12 @@ +/* + * jQuery 1.0.2 - New Wave Javascript + * + * Copyright (c) 2006 John Resig (jquery.com) + * Dual licensed under the MIT (MIT-LICENSE.txt) + * and GPL (GPL-LICENSE.txt) licenses. + * + * $Date: 2006-10-09 20:23:18 -0400 (Mon, 09 Oct 2006) $ + * $Rev: 1b5eb968d2c4 $ + */ + +eval(function(p,a,c,k,e,d){e=function(c){return(c35?String.fromCharCode(c+29):c.toString(36))};if(!''.replace(/^/,String)){while(c--){d[e(c)]=k[c]||e(c)}k=[function(e){return d[e]}];e=function(){return'\\w+'};c=1};while(c--){if(k[c]){p=p.replace(new RegExp('\\b'+e(c)+'\\b','g'),k[c])}}return p}('l(1Y 1O.6=="P"){1O.P=1O.P;6=q(a,c){l(a&&1Y a=="q"&&6.C.1T)v 6(15).1T(a);a=a||6.1k||15;l(a.2J)v 6(6.1X(a,[]));l(c&&c.2J)v 6(c).2j(a);l(1O==7)v 1f 6(a,c);u m=/^[^<]*(<.+>)[^>]*$/.36(a);l(m)a=6.31([m[1]]);7.1o(a.N==2y||a.D&&!a.1S&&a[0]!=P&&a[0].1S?6.1X(a,[]):6.2j(a,c));u C=1d[1d.D-1];l(C&&1Y C=="q")7.U(C)};l(1Y $!="P")6.3W$=$;u $=6;6.C=6.89={2J:"1.0.2",4u:q(){v 7.D},1o:q(26){l(26&&26.N==2y){7.D=0;[].1l.17(7,26);v 7}F v 26==P?6.1X(7,[]):7[26]},U:q(C,1h){v 6.U(7,C,1h)},8b:q(16){u 2c=-1;7.U(q(i){l(7==16)2c=i});v 2c},1r:q(1P,W,B){v 1P.N!=1N||W!=P?7.U(q(){l(W==P)H(u I 1q 1P)6.1r(B?7.1a:7,I,1P[I]);F 6.1r(B?7.1a:7,1P,W)}):6[B||"1r"](7[0],1P)},1g:q(1P,W){v 7.1r(1P,W,"20")},2V:q(e){e=e||7;u t="";H(u j=0;j0:14},2K:q(1h,1p,2N,C){u 3G=7.4u()>1;u a=6.31(1h);v 7.U(q(){u 16=7;l(1p&&7.2x.2h()=="60"&&a[0].2x.2h()!="61"){u 25=7.4R("25");l(!25.D){16=15.4E("25");7.44(16)}F 16=25[0]}H(u i=(2N<0?a.D-1:0);i!=(2N<0?2N:a.D);i+=2N){C.17(16,[3G?a[i].3D(V):a[i]])}})},28:q(a,1h){u C=1h&&1h[1h.D-1];u 2i=1h&&1h[1h.D-2];l(C&&C.N!=1v)C=Q;l(2i&&2i.N!=1v)2i=Q;l(!C){l(!7.3d)7.3d=[];7.3d.1l(7.1o());7.1o(a)}F{u 1U=7.1o();7.1o(a);l(2i&&a.D||!2i)7.U(2i||C).1o(1U);F 7.1o(1U).U(C)}v 7}};6.1L=6.C.1L=q(16,I){l(!I){I=16;16=7}H(u i 1q I)16[i]=I[i];v 16};6.1L({5C:q(){6.63=V;6.U(6.2l.5u,q(i,n){6.C[i]=q(a){u K=6.2t(7,n);l(a&&a.N==1N)K=6.19(a,K).r;v 7.28(K,1d)}});6.U(6.2l.2q,q(i,n){6.C[i]=q(){u a=1d;v 7.U(q(){H(u j=0;j"}F l(!a[i].1c("<3v")){1p="3v";a[i]="<1p>"+a[i]+""}F l(!a[i].1c("<3M")||!a[i].1c("<6r")){1p="3M";a[i]="<1p><25><3v>"+a[i]+""}u 1F=15.4E("1F");1F.2u=a[i];l(1p){1F=1F.1M;l(1p!="4j")1F=1F.1M;l(1p=="3M")1F=1F.1M}H(u j=0;j<1F.2e.D;j++)r.1l(1F.2e[j])}F l(a[i].2J||a[i].D&&!a[i].1S)H(u k=0;km[3]-0",4J:"m[3]-0==i",5o:"m[3]-0==i",2f:"i==0",1R:"i==r.D-1",52:"i%2==0",53:"i%2","4J-32":"6.1x(a,m[3]).1m","2f-32":"6.1x(a,0).1m","1R-32":"6.1x(a,0).1R","6v-32":"6.1x(a).D==1",5v:"a.2e.D",5A:"!a.2e.D",5r:"(a.7L||a.2u).1c(m[3])>=0",6w:"a.B!=\'1V\'&&6.1g(a,\'1t\')!=\'21\'&&6.1g(a,\'4e\')!=\'1V\'",1V:"a.B==\'1V\'||6.1g(a,\'1t\')==\'21\'||6.1g(a,\'4e\')==\'1V\'",7I:"!a.2R",2R:"a.2R",34:"a.34",4f:"a.4f || 6.1r(a, \'4f\')",2V:"a.B==\'2V\'",5G:"a.B==\'5G\'",5H:"a.B==\'5H\'",4l:"a.B==\'4l\'",4L:"a.B==\'4L\'",4n:"a.B==\'4n\'",5I:"a.B==\'5I\'",4m:"a.B==\'4m\'",48:"a.B==\'48\'",5B:"a.2x.41().4U(/5B|5O|6C|48/)"},".":"6.1e.3l(a,m[2])","@":{"=":"z==m[4]","!=":"z!=m[4]","^=":"z && !z.1c(m[4])","$=":"z && z.2U(z.D - m[4].D,m[4].D)==m[4]","*=":"z && z.1c(m[4])>=0","":"z"},"[":"6.2j(m[2],a).D"},3j:["\\\\.\\\\.|/\\\\.\\\\.","a.1n",">|/","6.1x(a.1M)","\\\\+","6.1x(a).3p","~",q(a){u r=[];u s=6.1x(a);l(s.n>0)H(u i=s.n;i=1)t=t.2U(t.1c("/"),t.D)}u K=[1k];u 1J=[];u 1R=Q;2d(t.D>0&&1R!=t){u r=[];1R=t;t=6.2I(t).1A(/^\\/\\//i,"");u 3k=14;H(u i=0;i<6.3j.D;i+=2){l(3k)51;u 2o=1f 3T("^("+6.3j[i]+")");u m=2o.36(t);l(m){r=K=6.2t(K,6.3j[i+1]);t=6.2I(t.1A(2o,""));3k=V}}l(!3k){l(!t.1c(",")||!t.1c("|")){l(K[0]==1k)K.3O();1J=6.1X(1J,K);r=K=[1k];t=" "+t.2U(1,t.D)}F{u 3P=/^([#.]?)([a-4X-9\\\\*3W-]*)/i;u m=3P.36(t);l(m[1]=="#"){u 4q=15.5z(m[2]);r=K=4q?[4q]:[];t=t.1A(3P,"")}F{l(!m[2]||m[1]==".")m[2]="*";H(u i=0;i<\\/2b>");u 2b=15.5z("5V");2b.2A=q(){l(7.2Y!="1I")v;7.1n.3g(7);6.1T()};2b=Q}F l(6.18.3e){6.4r=3R(q(){l(15.2Y=="62"||15.2Y=="1I"){56(6.4r);6.4r=Q;6.1T()}},10)}6.L.1Z(1O,"2T",6.1T)};l(6.18.1y)6(1O).3J(q(){u L=6.L,1i=L.1i;H(u B 1q 1i){u 3H=1i[B],i=3H.D;l(i>0)68 l(B!=\'3J\')L.22(3H[i-1],B);2d(--i)}});6.C.1L({4z:6.C.1C,1C:q(11,G){v 11?7.1W({1z:"1C",27:"1C",1j:"1C"},11,G):7.4z()},5W:6.C.1s,1s:q(11,G){v 11?7.1W({1z:"1s",27:"1s",1j:"1s"},11,G):7.5W()},6h:q(11,G){v 7.1W({1z:"1C"},11,G)},6j:q(11,G){v 7.1W({1z:"1s"},11,G)},6k:q(11,G){v 7.U(q(){u 4B=6(7).4o(":1V")?"1C":"1s";6(7).1W({1z:4B},11,G)})},84:q(11,G){v 7.1W({1j:"1C"},11,G)},6n:q(11,G){v 7.1W({1j:"1s"},11,G)},6q:q(11,2q,G){v 7.1W({1j:2q},11,G)},1W:q(I,11,G){v 7.1w(q(){7.2P=I;H(u p 1q I){u e=1f 6.2O(7,6.11(11,G),p);l(I[p].N==4M)e.2M(e.1m(),I[p]);F e[I[p]](I)}})},1w:q(B,C){l(!C){C=B;B="2O"}v 7.U(q(){l(!7.1w)7.1w={};l(!7.1w[B])7.1w[B]=[];7.1w[B].1l(C);l(7.1w[B].D==1)C.17(7)})}});6.1L({5i:q(e,p){l(e.4K)v;l(p=="1z"&&e.4D!=3f(6.20(e,p)))v;l(p=="27"&&e.4F!=3f(6.20(e,p)))v;u a=e.1a[p];u o=6.20(e,p,1);l(p=="1z"&&e.4D!=o||p=="27"&&e.4F!=o)v;e.1a[p]=e.3t?"":"4I";u n=6.20(e,p,1);l(o!=n&&n!="4I"){e.1a[p]=a;e.4K=V}},11:q(s,o){o=o||{};l(o.N==1v)o={1I:o};u 4N={6x:6z,6A:4H};o.2F=(s&&s.N==4M?s:4N[s])||4S;o.3o=o.1I;o.1I=q(){6.4P(7,"2O");l(o.3o&&o.3o.N==1v)o.3o.17(7)};v o},1w:{},4P:q(E,B){B=B||"2O";l(E.1w&&E.1w[B]){E.1w[B].3O();u f=E.1w[B][0];l(f)f.17(E)}},2O:q(E,2m,I){u z=7;z.o={2F:2m.2F||4S,1I:2m.1I,2p:2m.2p};z.R=E;u y=z.R.1a;z.a=q(){l(2m.2p)2m.2p.17(E,[z.2a]);l(I=="1j")6.1r(y,"1j",z.2a);F l(3f(z.2a))y[I]=3f(z.2a)+"5f";y.1t="2Q"};z.57=q(){v 3Z(6.1g(z.R,I))};z.1m=q(){u r=3Z(6.20(z.R,I));v r&&r>-6R?r:z.57()};z.2M=q(4t,2q){z.42=(1f 54()).55();z.2a=4t;z.a();z.3Y=3R(q(){z.2p(4t,2q)},13)};z.1C=q(p){l(!z.R.1G)z.R.1G={};z.R.1G[I]=7.1m();l(I=="1j")z.2M(z.R.1G[I],1);F z.2M(0,z.R.1G[I]);l(I!="1j")y[I]="6Z"};z.1s=q(){l(!z.R.1G)z.R.1G={};z.R.1G[I]=7.1m();z.o.1s=V;z.2M(z.R.1G[I],0)};l(!z.R.71)z.R.59=6.1g(z.R,"39");y.39="1V";z.2p=q(47,46){u t=(1f 54()).55();l(t>z.o.2F+z.42){56(z.3Y);z.3Y=Q;z.2a=46;z.a();z.R.2P[I]=V;u 1J=V;H(u i 1q z.R.2P)l(z.R.2P[i]!==V)1J=14;l(1J){y.39=z.R.59;l(z.o.1s)y.1t=\'21\';l(z.o.1s){H(u p 1q z.R.2P){l(p=="1j"&&6.18.1y)6.1r(y,p,z.R.1G[p]);F y[p]=z.R.1G[p]+"5f";l(p==\'1z\'||p==\'27\')6.5i(z.R,p)}}}l(1J&&z.o.1I&&z.o.1I.N==1v)z.o.1I.17(z.R)}F{u p=(t-7.42)/z.o.2F;z.2a=((-5t.7m(p*5t.7q)/2)+0.5)*(46-47)+47;z.a()}}}});6.C.1L({7v:q(M,1K,G){7.2T(M,1K,G,1)},2T:q(M,1K,G,1E){l(M.N==1v)v 7.3B("2T",M);G=G||q(){};u B="4d";l(1K){l(1K.N==1v){G=1K;1K=Q}F{1K=6.2C(1K);B="4x"}}u 3q=7;6.3C(B,M,1K,q(3r,12){l(12=="2w"||!1E&&12=="5s"){3q.5y(3r.2Z).U(G,[3r.2Z,12]);6("2b",3q).U(q(){l(7.3m)6.4v(7.3m);F 37.4i(1O,7.2V||7.7A||7.2u||"")})}F G.17(3q,[3r.2Z,12])},1E);v 7},7F:q(){v 6.2C(7)}});l(6.18.1y&&1Y 3b=="P")3b=q(){v 1f 7K(5J.5K.1c("7R 5")>=0?"7U.5P":"7W.5P")};1f q(){u e="4G,5M,5F,5D,5x".3y(",");H(u i=0;i-1)?"&":"?")+6.2C(J);6.3C("4d",M,Q,q(r,12){l(G)G(6.3n(r,B),12)},1E)},5Z:q(M,J,G,B){6.1o(M,J,G,B,1)},4v:q(M,G){6.1o(M,G,"2b")},64:q(M,J,G){l(G)6.1o(M,J,G,"3S");F{6.1o(M,J,"3S")}},6b:q(M,J,G,B){6.3C("4x",M,6.2C(J),q(r,12){l(G)G(6.3n(r,B),12)})},1u:0,6i:q(1u){6.1u=1u},38:{},3C:q(B,M,J,K,1E){l(!M){K=B.1I;u 2w=B.2w;u 2k=B.2k;u 49=B.49;u 1i=1Y B.1i=="85"?B.1i:V;u 1u=1Y B.1u=="6s"?B.1u:6.1u;u 1E=B.1E||14;J=B.J;M=B.M;B=B.B}l(1i&&!6.3I++)6.L.1Q("4G");u 4p=14;u O=1f 3b();O.6y(B||"4d",M,V);l(J)O.30("6D-6E","6F/x-6J-6L-6O");l(1E)O.30("6S-40-6V",6.38[M]||"6W, 6Y 70 72 3V:3V:3V 73");O.30("X-74-75","3b");l(O.78)O.30("7c","7g");u 2A=q(43){l(O&&(O.2Y==4||43=="1u")){4p=V;u 12=6.4y(O)&&43!="1u"?1E&&6.4Q(O,M)?"5s":"2w":"2k";l(12!="2k"){u 3F;3x{3F=O.4b("4T-40")}3h(e){}l(1E&&3F)6.38[M]=3F;l(2w)2w(6.3n(O,49),12);l(1i)6.L.1Q("5x")}F{l(2k)2k(O,12);l(1i)6.L.1Q("5D")}l(1i)6.L.1Q("5F");l(1i&&!--6.3I)6.L.1Q("5M");l(K)K(O,12);O.2A=q(){};O=Q}};O.2A=2A;l(1u>0)7X(q(){l(O){O.82();l(!4p)2A("1u");O=Q}},1u);O.65(J)},3I:0,4y:q(r){3x{v!r.12&&6l.6m=="4l:"||(r.12>=4H&&r.12<6B)||r.12==4W||6.18.3e&&r.12==P}3h(e){}v 14},4Q:q(O,M){3x{u 50=O.4b("4T-40");v O.12==4W||50==6.38[M]||6.18.3e&&O.12==P}3h(e){}v 14},3n:q(r,B){u 4k=r.4b("7G-B");u J=!B&&4k&&4k.1c("O")>=0;J=B=="O"||J?r.8j:r.2Z;l(B=="2b")37.4i(1O,J);l(B=="3S")37("J = "+J);v J},2C:q(a){u s=[];l(a.N==2y||a.2J){H(u i=0;i'; + $(this).prepend(str); + }); + + // attach folds + $(".outline ul li").toggle( + + // hide + function(){ + if ( $(this).children("ul").size() == 0 ) return; + $(this).children("ul").slideUp("slow"); + $(this).find(".linenum").addClass("linenum-folded"); + }, + + // show + function(){ + $(this).children("ul").slideDown("slow"); + $(this).find(".linenum").removeClass("linenum-folded"); + } + ); + +}); diff --git a/pack/acp/start/vimoutliner/vimoutliner/scripts/otl_handler/javascript/theme3.js b/pack/acp/start/vimoutliner/vimoutliner/scripts/otl_handler/javascript/theme3.js new file mode 100644 index 0000000..e3b78cf --- /dev/null +++ b/pack/acp/start/vimoutliner/vimoutliner/scripts/otl_handler/javascript/theme3.js @@ -0,0 +1,22 @@ +$(document).ready(function(){ + + // append content div + $("body").prepend("
    test
    "); + $("#content").hide(); + + // FIXME - document.width + document.height + $(".outline").click(function(){ + $("#content").html( $(this).html() ); + $("body").background("#7b7c8c"); + $("#content").show(); + }); + + $("#content").click(function(){ + $(this).hide(); + $("body").background("#acadc3"); + }); + + // re-activate links (the event is stomped on by the li event) + $(".outline a").click(function(){ window.location.href = this; return false; }); + +}); diff --git a/pack/acp/start/vimoutliner/vimoutliner/scripts/otl_handler/sample.otl b/pack/acp/start/vimoutliner/vimoutliner/scripts/otl_handler/sample.otl new file mode 100644 index 0000000..aa2dc4e --- /dev/null +++ b/pack/acp/start/vimoutliner/vimoutliner/scripts/otl_handler/sample.otl @@ -0,0 +1,39 @@ +<:title=Sample OTL list :counts=1 :timer=1 :style=styles/theme1.css :legend=1 :last_mod=1 + +: Theme examples: +: basic advanced advanced2 + +[_] 29% Things to get for party + [_] 25% Food + [_] Chips + [_] Dips + [X] Honey roasted peanuts + [_] Sausage + [_] 33% Party favors + [_] Hats + [_] Whistles + [X] Beer bong + +[_] 19% House projects + [_] 25% Paint + [_] 50% Buy supplies + [_] Paint + [X] Brushes + [X] Trays 2006-09-14 + [_] Overalls + [_] 0% Rooms done + [_] Bathroom + [_] Bedroom + : Red? + [_] 13% Upgrade electrical + [_] 2 circuits to computer room + [_] 40% Get equipment + [X] Romex wire + [_] Entry feed wire + : How much of this do I really need? I should probably go out to the street and measure stuff. + : Make sure the inspector has access to examine stuff on side of house. + [_] Service meter + [X] Grounding rods + [_] Breakers + [_] Learn about electricity + [_] Don't die diff --git a/pack/acp/start/vimoutliner/vimoutliner/scripts/otl_handler/styles/theme1.css b/pack/acp/start/vimoutliner/vimoutliner/scripts/otl_handler/styles/theme1.css new file mode 100644 index 0000000..090d945 --- /dev/null +++ b/pack/acp/start/vimoutliner/vimoutliner/scripts/otl_handler/styles/theme1.css @@ -0,0 +1,88 @@ + +body +{ + width: 600px; + font-size: 0.9em; + font-family: sans; +} + +ul +{ + list-style-type: none; + line-height: 1.5em; + padding-left: 20px; +} + +.date +{ + font-size: 0.6em; +} + +.outline +{ + margin-bottom: 30px; +} + +.percent +{ + color: blue; +} + +.comment, .counts +{ + font-size: 0.7em; + line-height: 1em; + padding-top: 2px; + margin-bottom: 5px; + font-family: sans; +} + +.comment_pre +{ + font-style: normal; + font-family: courier; + white-space: pre; +} + +.counts +{ + margin-left: 10px; +} + +.counts:before { content: "("; } +.counts:after { content: ")"; } + +.todo +{ + padding-left: 4px; +} + +.done +{ + background-color: #f4f4f4; + color: #777; + padding-left: 4px; +} + +.done:before +{ + font-size: 1.5em; + color: green; + content: "\2611 "; +} + +.todo:before +{ + font-size: 1.5em; + color: #777; + content: "\2610 "; +} + +.legend .todo, .legend .done { border: 0 } +.legend +{ + margin-bottom: 30px; + margin-top: 20px; +} + + diff --git a/pack/acp/start/vimoutliner/vimoutliner/scripts/otl_handler/styles/theme2.css b/pack/acp/start/vimoutliner/vimoutliner/scripts/otl_handler/styles/theme2.css new file mode 100644 index 0000000..869a876 --- /dev/null +++ b/pack/acp/start/vimoutliner/vimoutliner/scripts/otl_handler/styles/theme2.css @@ -0,0 +1,152 @@ + +body +{ + background-color: #444; + font: 11px/1.8em sans-serif; + margin: 0; + padding-bottom: 50px; + color: #ccc; +} + +a, a:visited +{ + text-decoration: none; + color: #7f9ab5; +} + +.header +{ + background-color: #aaa; + padding: 3px 0 3px 120px; + margin-top: 50px; + color: #3a5f85; + border-top: 5px solid #333; + font-size: 20px; + font-weight: bold; +} + +.last_mod +{ + padding-left: 120px; + background-color: #333; + border-bottom: 1px solid #000; + font-size: 0.85em; + color: #999; +} + +.percent +{ + display: none; + color: #7f9ab5; + font-weight: bold; + position: absolute; + left: 115px; +} + +.linenum +{ + color: #7f9ab5; + position: absolute; + left: 0; + font-size: 9px; + font-weight: normal; + font-style: normal; + width: 60px; + text-align: right; +} + +.linenum-folded +{ + color: #666; +} + +.timer +{ + color: #666; + position: absolute; + top: 5px; + right: 10px; +} + +.outline +{ + width: 400px; + margin: 20px 0 0 150px; + display: none; + cursor: pointer; +} + +.outline ul +{ + margin: 0; + padding: 0 10px 0 5px; + list-style-type: none; +} + +.outline ul li +{ + padding: 0 0 0 10px; + display: block; + color: #fff; + font-size: 14px; + font-weight: bold; +} + +.outline ul li:hover +{ + color: #fff; +} + +.outline ul li ul li +{ + border-left: 1px solid #666; + color: #ccc; + font-size: 11px; + font-weight: normal; +} + +.outline ul li ul li:hover +{ + border-left: 1px solid #aaa; +} + +.done +{ + color: #777 !important; + font-style: italic; +} + +.done:after +{ + font-size: 0.9em; + content: " (done)"; +} + +.comment +{ + padding-right: 2px !important; + font-style: italic; + border-top: 1px solid #666; + border-bottom: 1px solid #666; + border-right: 1px solid #666; +} + +.comment_pre +{ + font-style: normal; + font-family: courier; + white-space: pre; +} + +.comment:hover +{ + border-top: 1px solid #aaa; + border-bottom: 1px solid #aaa; + border-right: 1px solid #aaa; +} + +.selected +{ + background-color: #3d3d3d; +} + diff --git a/pack/acp/start/vimoutliner/vimoutliner/scripts/otl_handler/styles/theme3.css b/pack/acp/start/vimoutliner/vimoutliner/scripts/otl_handler/styles/theme3.css new file mode 100644 index 0000000..4f8b25c --- /dev/null +++ b/pack/acp/start/vimoutliner/vimoutliner/scripts/otl_handler/styles/theme3.css @@ -0,0 +1,109 @@ + +body +{ + background-color: #acadc3; + font: 12px Verdana, sans-serif; + color: #000; + text-align: center; +} + +a, a:visited +{ + text-decoration: none; + color: blue; +} + +.header +{ + margin-top: 40px; + font-size: 2em; + font-weight: bold; +} + +.header:after { content: " ----|" } +.header:before { content: "|---- " } + +.last_mod { font-size: .85em; } +.percent { font-weight: bold; } + +.sort +{ + margin-bottom: 30px; + font-size: .85em; +} + +.outline +{ + cursor: pointer; + float: left; + padding: 20px; + border: 1px solid #8082a9; + margin-left: 10px; + background-color: #ccc; +} + +.outline:hover +{ + border: 1px solid #000; +} + +.outline ul, #content ul +{ + padding: 0; + margin: 0; + list-style-type: none; +} + +.outline ul li ul li { display: none; } + +#content ul li ul { padding-left: 20px; } + +#content ul li +{ + font-weight: bold; + font-size: 1.5em; + text-align: center; + color: #3a3d85; +} + +#content ul li ul li +{ + font-weight: normal; + text-align: left; + font-size: 10px; + color: #000; +} + +#content .done { color: #777; } +.comment { font-style: italic; } + +#content ul li .percent { color: #ff7e00; } +#content ul li ul li .percent { color: #000; } + +#content .comment +{ + font-style: italic; + border-left: 1px solid #999; + padding-left: 5px; + margin-bottom: 3px; +} + +#content .comment_pre +{ + font-style: normal; + font-family: courier; + white-space: pre; +} + +#content +{ + position: absolute; + left: 15%; + width: 60%; + height: 80%; + cursor: pointer; + background-color: #fff; + border: 2px solid #3a3d85; + padding: 10px; +} + diff --git a/pack/acp/start/vimoutliner/vimoutliner/scripts/otlgrep.py b/pack/acp/start/vimoutliner/vimoutliner/scripts/otlgrep.py new file mode 100755 index 0000000..7b2dea3 --- /dev/null +++ b/pack/acp/start/vimoutliner/vimoutliner/scripts/otlgrep.py @@ -0,0 +1,212 @@ +#!/usr/bin/python2 +# otlgrep.py +# grep an outline for a regex and return the branch with all the leaves. +# +# Copyright 2005 Noel Henson All rights reserved + +########################################################################### +# Basic function +# +# This program searches an outline file for a branch that contains +# a line matching the regex argument. The parent headings (branches) +# and the children (sub-branches and leaves) of the matching headings +# are returned. +# +# Examples +# +# Using this outline: +# +# Pets +# Indoor +# Cats +# Sophia +# Hillary +# Rats +# Finley +# Oliver +# Dogs +# Kirby +# Outdoor +# Dogs +# Kirby +# Hoover +# Goats +# Primrose +# Joey +# +# a grep for Sophia returns: +# +# Indoor +# Cats +# Sophia +# +# a grep for Dogs returns: +# +# Indoor +# Dogs +# Kirby +# Hoover +# Outdoor +# Dogs +# Kirby +# Hoover +# +# This program is free software; you can redistribute it and/or modify +# it under the terms of the GNU General Public License as published by +# the Free Software Foundation; either version 2 of the License. +# +# This program is distributed in the hope that it will be useful, +# but WITHOUT ANY WARRANTY; without even the implied warranty of +# MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the +# GNU General Public License for more details. +# +# You should have received a copy of the GNU General Public License +# along with this program; if not, write to the Free Software +# Foundation, Inc., 675 Mass Ave, Cambridge, MA 02139, USA. + +########################################################################### +# include whatever mdules we need + +import sys +import re + +########################################################################### +# global variables + +debug = 0 +ignorecase = 0 +pattern = "" +inputfiles = [] + +########################################################################### +# function definitions# usage +# +# print debug statements +# input: string +# output: string printed to standard out + + +def dprint(*vals): + global debug + if debug != 0: + print vals + + +# usage +# print the simplest form of help +# input: none +# output: simple command usage is printed on the console +def showUsage(): + print """ + Usage: + otlgrep.py [options] pattern [file...] + Options + -i Ignore case + --help Show help. + [file...] is zero or more files to search. Wildcards are supported. + if no file is specified, input is expected on stdin. + output is on STDOUT + """ + + +# getArgs +# Check for input arguments and set the necessary switches +# input: none +# output: possible console output for help, switch variables may be set + +def getArgs(): + global debug, pattern, inputfiles, ignorecase + if (len(sys.argv) == 1): + showUsage() + sys.exit()() + else: + for i in range(len(sys.argv)): + if (i != 0): + if (sys.argv[i] == "-d"): + debug = 1 # test for debug flag + elif (sys.argv[i] == "-i"): + ignorecase = 1 # test for debug flag + elif (sys.argv[i] == "-?"): # test for help flag + showUsage() # show the help + sys.exit() # exit + elif (sys.argv[i] == "--help"): + showUsage() + sys.exit() + elif (sys.argv[i][0] == "-"): + print "Error! Unknown option. Aborting" + sys.exit() + else: # get the input file name + if (pattern == ""): + pattern = sys.argv[i] + else: + inputfiles.append(sys.argv[i]) + + +# getLineLevel +# get the level of the current line (count the number of tabs) +# input: linein - a single line that may or may not have tabs at the beginning +# output: returns a number 1 is the lowest +def getLineLevel(linein): + strstart = linein.lstrip() # find the start of text in line + x = linein.find(strstart) # find the text index in the line + n = linein.count("\t", 0, x) # count the tabs + return(n) # return the count + 1 (for level) + + +# processFile +# split an outline file +# input: file - the filehandle of the file we are splitting +# output: output files +def processFile(file): + global debug, pattern, ignorecase + + parents = [] + parentprinted = [] + for i in range(10): + parents.append("") + parentprinted.append(0) + + matchlevel = 0 + line = file.readline() # read the outline title + # and discard it + line = file.readline() # read the first parent heading + while (line != ""): + level = getLineLevel(line) + parents[level] = line + parentprinted[level] = 0 + if (ignorecase == 1): + linesearch = re.search(pattern, line.strip(), re.I) + else: + linesearch = re.search(pattern, line.strip()) + if (linesearch is not None): + matchlevel = level + for i in range(level): # print my ancestors + if (parentprinted[i] == 0): + print parents[i][:-1] + parentprinted[i] = 1 + print parents[level][:-1] # print myself + line = file.readline() + while (line != "") and (getLineLevel(line) > matchlevel): + print line[:-1] + line = file.readline() + else: + line = file.readline() + + +# main +# split an outline +# input: args and input file +# output: output files + +def main(): + global inputfiles, debug + getArgs() + if (len(inputfiles) == 0): + processFile(sys.stdin) + else: + for i in range(len(inputfiles)): + file = open(inputfiles[i], "r") + processFile(file) + file.close() + +main() diff --git a/pack/acp/start/vimoutliner/vimoutliner/scripts/otlhead.sh b/pack/acp/start/vimoutliner/vimoutliner/scripts/otlhead.sh new file mode 100755 index 0000000..ea05fda --- /dev/null +++ b/pack/acp/start/vimoutliner/vimoutliner/scripts/otlhead.sh @@ -0,0 +1,12 @@ +#!/bin/bash +if [ "$#" -lt 1 ] ; then + echo " Usage: otlhead level < file" + echo " Keep the number of levels specified, remove the rest." + echo " Great for generating summaries." + echo " level - the number of levels to include" + echo " file - an otl file" + echo " input - standard in" + echo " output - standard out" + exit 0 +fi +sed "/^\(\t\)\{$1\}.*$/ { D }" diff --git a/pack/acp/start/vimoutliner/vimoutliner/scripts/otlsplit.py b/pack/acp/start/vimoutliner/vimoutliner/scripts/otlsplit.py new file mode 100755 index 0000000..2715e89 --- /dev/null +++ b/pack/acp/start/vimoutliner/vimoutliner/scripts/otlsplit.py @@ -0,0 +1,191 @@ +#!/usr/bin/python2 +# otlslit.py +# split an outline into several files. +# +# Copyright 2005 Noel Henson All rights reserved + +########################################################################### +# Basic function +# +# This program accepts text outline files and splits them into +# several smaller files. The output file names are produced from the +# heading names of the parents. +# +# This program is free software; you can redistribute it and/or modify +# it under the terms of the GNU General Public License as published by +# the Free Software Foundation; either version 2 of the License. +# +# This program is distributed in the hope that it will be useful, +# but WITHOUT ANY WARRANTY; without even the implied warranty of +# MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the +# GNU General Public License for more details. +# +# You should have received a copy of the GNU General Public License +# along with this program; if not, see . + +########################################################################### +# include whatever mdules we need + +import sys +import re +########################################################################### +# global variables + +debug = 0 +subdir = "" +level = 1 +title = 0 +inputfile = "" + + +########################################################################### +# function definitions# usage +# +# print debug statements +# input: string +# output: string printed to standard out +def dprint(*vals): + global debug + if debug != 0: + print vals + + +# usage +# print the simplest form of help +# input: none +# output: simple command usage is printed on the console +def showUsage(): + print """ + Usage: + otlsplit.py [options] inputfile + Options + -l level The number of levels to split down to. The default is 1 + -D dir Specifiy a target directory for the output files + -t Include a title line (the parerent heading) in split files + -h Show help. + output is on STDOUT + """ + + +# getArgs +# Check for input arguments and set the necessary switches +# input: none +# output: possible console output for help, switch variables may be set +def getArgs(): + global debug, level, inputfile, title, subdir + if (len(sys.argv) == 1): + showUsage() + sys.exit()() + else: + for i in range(len(sys.argv)): + if (i != 0): + if (sys.argv[i] == "-d"): + debug = 1 # test for debug flag + elif (sys.argv[i] == "-?"): # test for help flag + showUsage() # show the help + sys.exit() # exit + elif (sys.argv[i] == "-l"): # test for the level flag + level = int(sys.argv[i + 1]) # get the level + i = i + 1 # increment the pointer + elif (sys.argv[i] == "-D"): # test for the subdir flag + subdir = sys.argv[i + 1] # get the subdir + i = i + 1 # increment the pointer + elif (sys.argv[i] == "-t"): + title = 1 # test for title flag + elif (sys.argv[i] == "--help"): + showUsage() + sys.exit() + elif (sys.argv[i] == "-h"): + showUsage() + sys.exit() + elif (sys.argv[i][0] == "-"): + print "Error! Unknown option. Aborting" + sys.exit() + else: # get the input file name + inputfile = sys.argv[i] + + +# getLineLevel +# get the level of the current line (count the number of tabs) +# input: linein - a single line that may or may not have tabs at the beginning +# output: returns a number 1 is the lowest +def getLineLevel(linein): + strstart = linein.lstrip() # find the start of text in line + x = linein.find(strstart) # find the text index in the line + n = linein.count("\t", 0, x) # count the tabs + return(n + 1) # return the count + 1 (for level) + + +# convertSensitiveChars +# get the level of the current line (count the number of tabs) +# input: line - a single line that may or may not have tabs at the beginning +# output: returns a string +def convertSensitiveChars(line): + line = re.sub('\W', '_', line.strip()) + return(line) + + +# makeFileName +# make a file name from the string array provided +# input: line - a single line that may or may not have tabs at the beginning +# output: returns a string +def makeFileName(nameParts): + global debug, level, subdir + + filename = "" + for i in range(level): + filename = filename + convertSensitiveChars(nameParts[i]).strip() + "-" + filename = filename[:-1] + ".otl" + if subdir != "": + filename = subdir + "/" + filename + return(filename.lower()) + + +# processFile +# split an outline file +# input: file - the filehandle of the file we are splitting +# output: output files +def processFile(ifile): + global debug, level, title + + nameparts = [] + for i in range(10): + nameparts.append("") + + outOpen = 0 + + line = ifile.readline() # read the outline title + # and discard it + line = ifile.readline() # read the first parent heading + dprint(level) + while (line != ""): + linelevel = getLineLevel(line) + if (linelevel < level): + if outOpen == 1: + ifile.close() + outOpen = 0 + nameparts[linelevel] = line + dprint(level, linelevel, line) + else: + if outOpen == 0: + ofile = open(makeFileName(nameparts), "w") + outOpen = 1 + if title == 1: + dprint("title:", title) + ofile.write(nameparts[level - 1]) + ofile.write(line[level:]) + line = file.readline() + + +# main +# split an outline +# input: args and input file +# output: output files +def main(): + global inputfile, debug + getArgs() + file = open(inputfile, "r") + processFile(file) + file.close() + +main() diff --git a/pack/acp/start/vimoutliner/vimoutliner/scripts/otltail.sh b/pack/acp/start/vimoutliner/vimoutliner/scripts/otltail.sh new file mode 100755 index 0000000..82df8a0 --- /dev/null +++ b/pack/acp/start/vimoutliner/vimoutliner/scripts/otltail.sh @@ -0,0 +1,15 @@ +#!/bin/bash +if [ "$#" -lt 1 ] ; then + echo " Usage: otltail level < file" + echo " Remove the specified number of parent headings." + echo " This is a way to promote children. It is" + echo " useful for converting a single outline into a" + echo " number of pages for a web site or chapters for" + echo " a book." + echo " level - the number of levels to include" + echo " file - an otl file" + echo " input - standard in" + echo " output - standard out" + exit 0 +fi +sed "/^\(\t\)\{$1\}.*$/! { D }" | sed "s/^\(\t\)\{$1\}//" diff --git a/pack/acp/start/vimoutliner/vimoutliner/scripts/outline_calendar/2005.otl b/pack/acp/start/vimoutliner/vimoutliner/scripts/outline_calendar/2005.otl new file mode 100644 index 0000000..5d93abe --- /dev/null +++ b/pack/acp/start/vimoutliner/vimoutliner/scripts/outline_calendar/2005.otl @@ -0,0 +1,1472 @@ +January 2005 + 2005_01_01 Sat + To do + Diary + Timesheet + 2005_01_02 Sun + To do + Diary + Timesheet + 2005_01_03 Mon + To do + Diary + Timesheet + 2005_01_04 Tue + To do + Diary + Timesheet + 2005_01_05 Wed + To do + Diary + Timesheet + 2005_01_06 Thu + To do + Diary + Timesheet + 2005_01_07 Fri + To do + Diary + Timesheet + 2005_01_08 Sat + To do + Diary + Timesheet + 2005_01_09 Sun + To do + Diary + Timesheet + 2005_01_10 Mon + To do + Diary + Timesheet + 2005_01_11 Tue + To do + Diary + Timesheet + 2005_01_12 Wed + To do + Diary + Timesheet + 2005_01_13 Thu + To do + Diary + Timesheet + 2005_01_14 Fri + To do + Diary + Timesheet + 2005_01_15 Sat + To do + Diary + Timesheet + 2005_01_16 Sun + To do + Diary + Timesheet + 2005_01_17 Mon + To do + Diary + Timesheet + 2005_01_18 Tue + To do + Diary + Timesheet + 2005_01_19 Wed + To do + Diary + Timesheet + 2005_01_20 Thu + To do + Diary + Timesheet + 2005_01_21 Fri + To do + Diary + Timesheet + 2005_01_22 Sat + To do + Diary + Timesheet + 2005_01_23 Sun + To do + Diary + Timesheet + 2005_01_24 Mon + To do + Diary + Timesheet + 2005_01_25 Tue + To do + Diary + Timesheet + 2005_01_26 Wed + To do + Diary + Timesheet + 2005_01_27 Thu + To do + Diary + Timesheet + 2005_01_28 Fri + To do + Diary + Timesheet + 2005_01_29 Sat + To do + Diary + Timesheet + 2005_01_30 Sun + To do + Diary + Timesheet + 2005_01_31 Mon + To do + Diary + Timesheet +February 2005 + 2005_02_01 Tue + To do + Diary + Timesheet + 2005_02_02 Wed + To do + Diary + Timesheet + 2005_02_03 Thu + To do + Diary + Timesheet + 2005_02_04 Fri + To do + Diary + Timesheet + 2005_02_05 Sat + To do + Diary + Timesheet + 2005_02_06 Sun + To do + Diary + Timesheet + 2005_02_07 Mon + To do + Diary + Timesheet + 2005_02_08 Tue + To do + Diary + Timesheet + 2005_02_09 Wed + To do + Diary + Timesheet + 2005_02_10 Thu + To do + Diary + Timesheet + 2005_02_11 Fri + To do + Diary + Timesheet + 2005_02_12 Sat + To do + Diary + Timesheet + 2005_02_13 Sun + To do + Diary + Timesheet + 2005_02_14 Mon + To do + Diary + Timesheet + 2005_02_15 Tue + To do + Diary + Timesheet + 2005_02_16 Wed + To do + Diary + Timesheet + 2005_02_17 Thu + To do + Diary + Timesheet + 2005_02_18 Fri + To do + Diary + Timesheet + 2005_02_19 Sat + To do + Diary + Timesheet + 2005_02_20 Sun + To do + Diary + Timesheet + 2005_02_21 Mon + To do + Diary + Timesheet + 2005_02_22 Tue + To do + Diary + Timesheet + 2005_02_23 Wed + To do + Diary + Timesheet + 2005_02_24 Thu + To do + Diary + Timesheet + 2005_02_25 Fri + To do + Diary + Timesheet + 2005_02_26 Sat + To do + Diary + Timesheet + 2005_02_27 Sun + To do + Diary + Timesheet + 2005_02_28 Mon + To do + Diary + Timesheet +March 2005 + 2005_03_01 Tue + To do + Diary + Timesheet + 2005_03_02 Wed + To do + Diary + Timesheet + 2005_03_03 Thu + To do + Diary + Timesheet + 2005_03_04 Fri + To do + Diary + Timesheet + 2005_03_05 Sat + To do + Diary + Timesheet + 2005_03_06 Sun + To do + Diary + Timesheet + 2005_03_07 Mon + To do + Diary + Timesheet + 2005_03_08 Tue + To do + Diary + Timesheet + 2005_03_09 Wed + To do + Diary + Timesheet + 2005_03_10 Thu + To do + Diary + Timesheet + 2005_03_11 Fri + To do + Diary + Timesheet + 2005_03_12 Sat + To do + Diary + Timesheet + 2005_03_13 Sun + To do + Diary + Timesheet + 2005_03_14 Mon + To do + Diary + Timesheet + 2005_03_15 Tue + To do + Diary + Timesheet + 2005_03_16 Wed + To do + Diary + Timesheet + 2005_03_17 Thu + To do + Diary + Timesheet + 2005_03_18 Fri + To do + Diary + Timesheet + 2005_03_19 Sat + To do + Diary + Timesheet + 2005_03_20 Sun + To do + Diary + Timesheet + 2005_03_21 Mon + To do + Diary + Timesheet + 2005_03_22 Tue + To do + Diary + Timesheet + 2005_03_23 Wed + To do + Diary + Timesheet + 2005_03_24 Thu + To do + Diary + Timesheet + 2005_03_25 Fri + To do + Diary + Timesheet + 2005_03_26 Sat + To do + Diary + Timesheet + 2005_03_27 Sun + To do + Diary + Timesheet + 2005_03_28 Mon + To do + Diary + Timesheet + 2005_03_29 Tue + To do + Diary + Timesheet + 2005_03_30 Wed + To do + Diary + Timesheet + 2005_03_31 Thu + To do + Diary + Timesheet +April 2005 + 2005_04_01 Fri + To do + Diary + Timesheet + 2005_04_02 Sat + To do + Diary + Timesheet + 2005_04_03 Sun + To do + Diary + Timesheet + 2005_04_04 Mon + To do + Diary + Timesheet + 2005_04_05 Tue + To do + Diary + Timesheet + 2005_04_06 Wed + To do + Diary + Timesheet + 2005_04_07 Thu + To do + Diary + Timesheet + 2005_04_08 Fri + To do + Diary + Timesheet + 2005_04_09 Sat + To do + Diary + Timesheet + 2005_04_10 Sun + To do + Diary + Timesheet + 2005_04_11 Mon + To do + Diary + Timesheet + 2005_04_12 Tue + To do + Diary + Timesheet + 2005_04_13 Wed + To do + Diary + Timesheet + 2005_04_14 Thu + To do + Diary + Timesheet + 2005_04_15 Fri + To do + Diary + Timesheet + 2005_04_16 Sat + To do + Diary + Timesheet + 2005_04_17 Sun + To do + Diary + Timesheet + 2005_04_18 Mon + To do + Diary + Timesheet + 2005_04_19 Tue + To do + Diary + Timesheet + 2005_04_20 Wed + To do + Diary + Timesheet + 2005_04_21 Thu + To do + Diary + Timesheet + 2005_04_22 Fri + To do + Diary + Timesheet + 2005_04_23 Sat + To do + Diary + Timesheet + 2005_04_24 Sun + To do + Diary + Timesheet + 2005_04_25 Mon + To do + Diary + Timesheet + 2005_04_26 Tue + To do + Diary + Timesheet + 2005_04_27 Wed + To do + Diary + Timesheet + 2005_04_28 Thu + To do + Diary + Timesheet + 2005_04_29 Fri + To do + Diary + Timesheet + 2005_04_30 Sat + To do + Diary + Timesheet +May 2005 + 2005_05_01 Sun + To do + Diary + Timesheet + 2005_05_02 Mon + To do + Diary + Timesheet + 2005_05_03 Tue + To do + Diary + Timesheet + 2005_05_04 Wed + To do + Diary + Timesheet + 2005_05_05 Thu + To do + Diary + Timesheet + 2005_05_06 Fri + To do + Diary + Timesheet + 2005_05_07 Sat + To do + Diary + Timesheet + 2005_05_08 Sun + To do + Diary + Timesheet + 2005_05_09 Mon + To do + Diary + Timesheet + 2005_05_10 Tue + To do + Diary + Timesheet + 2005_05_11 Wed + To do + Diary + Timesheet + 2005_05_12 Thu + To do + Diary + Timesheet + 2005_05_13 Fri + To do + Diary + Timesheet + 2005_05_14 Sat + To do + Diary + Timesheet + 2005_05_15 Sun + To do + Diary + Timesheet + 2005_05_16 Mon + To do + Diary + Timesheet + 2005_05_17 Tue + To do + Diary + Timesheet + 2005_05_18 Wed + To do + Diary + Timesheet + 2005_05_19 Thu + To do + Diary + Timesheet + 2005_05_20 Fri + To do + Diary + Timesheet + 2005_05_21 Sat + To do + Diary + Timesheet + 2005_05_22 Sun + To do + Diary + Timesheet + 2005_05_23 Mon + To do + Diary + Timesheet + 2005_05_24 Tue + To do + Diary + Timesheet + 2005_05_25 Wed + To do + Diary + Timesheet + 2005_05_26 Thu + To do + Diary + Timesheet + 2005_05_27 Fri + To do + Diary + Timesheet + 2005_05_28 Sat + To do + Diary + Timesheet + 2005_05_29 Sun + To do + Diary + Timesheet + 2005_05_30 Mon + To do + Diary + Timesheet + 2005_05_31 Tue + To do + Diary + Timesheet +June 2005 + 2005_06_01 Wed + To do + Diary + Timesheet + 2005_06_02 Thu + To do + Diary + Timesheet + 2005_06_03 Fri + To do + Diary + Timesheet + 2005_06_04 Sat + To do + Diary + Timesheet + 2005_06_05 Sun + To do + Diary + Timesheet + 2005_06_06 Mon + To do + Diary + Timesheet + 2005_06_07 Tue + To do + Diary + Timesheet + 2005_06_08 Wed + To do + Diary + Timesheet + 2005_06_09 Thu + To do + Diary + Timesheet + 2005_06_10 Fri + To do + Diary + Timesheet + 2005_06_11 Sat + To do + Diary + Timesheet + 2005_06_12 Sun + To do + Diary + Timesheet + 2005_06_13 Mon + To do + Diary + Timesheet + 2005_06_14 Tue + To do + Diary + Timesheet + 2005_06_15 Wed + To do + Diary + Timesheet + 2005_06_16 Thu + To do + Diary + Timesheet + 2005_06_17 Fri + To do + Diary + Timesheet + 2005_06_18 Sat + To do + Diary + Timesheet + 2005_06_19 Sun + To do + Diary + Timesheet + 2005_06_20 Mon + To do + Diary + Timesheet + 2005_06_21 Tue + To do + Diary + Timesheet + 2005_06_22 Wed + To do + Diary + Timesheet + 2005_06_23 Thu + To do + Diary + Timesheet + 2005_06_24 Fri + To do + Diary + Timesheet + 2005_06_25 Sat + To do + Diary + Timesheet + 2005_06_26 Sun + To do + Diary + Timesheet + 2005_06_27 Mon + To do + Diary + Timesheet + 2005_06_28 Tue + To do + Diary + Timesheet + 2005_06_29 Wed + To do + Diary + Timesheet + 2005_06_30 Thu + To do + Diary + Timesheet +July 2005 + 2005_07_01 Fri + To do + Diary + Timesheet + 2005_07_02 Sat + To do + Diary + Timesheet + 2005_07_03 Sun + To do + Diary + Timesheet + 2005_07_04 Mon + To do + Diary + Timesheet + 2005_07_05 Tue + To do + Diary + Timesheet + 2005_07_06 Wed + To do + Diary + Timesheet + 2005_07_07 Thu + To do + Diary + Timesheet + 2005_07_08 Fri + To do + Diary + Timesheet + 2005_07_09 Sat + To do + Diary + Timesheet + 2005_07_10 Sun + To do + Diary + Timesheet + 2005_07_11 Mon + To do + Diary + Timesheet + 2005_07_12 Tue + To do + Diary + Timesheet + 2005_07_13 Wed + To do + Diary + Timesheet + 2005_07_14 Thu + To do + Diary + Timesheet + 2005_07_15 Fri + To do + Diary + Timesheet + 2005_07_16 Sat + To do + Diary + Timesheet + 2005_07_17 Sun + To do + Diary + Timesheet + 2005_07_18 Mon + To do + Diary + Timesheet + 2005_07_19 Tue + To do + Diary + Timesheet + 2005_07_20 Wed + To do + Diary + Timesheet + 2005_07_21 Thu + To do + Diary + Timesheet + 2005_07_22 Fri + To do + Diary + Timesheet + 2005_07_23 Sat + To do + Diary + Timesheet + 2005_07_24 Sun + To do + Diary + Timesheet + 2005_07_25 Mon + To do + Diary + Timesheet + 2005_07_26 Tue + To do + Diary + Timesheet + 2005_07_27 Wed + To do + Diary + Timesheet + 2005_07_28 Thu + To do + Diary + Timesheet + 2005_07_29 Fri + To do + Diary + Timesheet + 2005_07_30 Sat + To do + Diary + Timesheet + 2005_07_31 Sun + To do + Diary + Timesheet +August 2005 + 2005_08_01 Mon + To do + Diary + Timesheet + 2005_08_02 Tue + To do + Diary + Timesheet + 2005_08_03 Wed + To do + Diary + Timesheet + 2005_08_04 Thu + To do + Diary + Timesheet + 2005_08_05 Fri + To do + Diary + Timesheet + 2005_08_06 Sat + To do + Diary + Timesheet + 2005_08_07 Sun + To do + Diary + Timesheet + 2005_08_08 Mon + To do + Diary + Timesheet + 2005_08_09 Tue + To do + Diary + Timesheet + 2005_08_10 Wed + To do + Diary + Timesheet + 2005_08_11 Thu + To do + Diary + Timesheet + 2005_08_12 Fri + To do + Diary + Timesheet + 2005_08_13 Sat + To do + Diary + Timesheet + 2005_08_14 Sun + To do + Diary + Timesheet + 2005_08_15 Mon + To do + Diary + Timesheet + 2005_08_16 Tue + To do + Diary + Timesheet + 2005_08_17 Wed + To do + Diary + Timesheet + 2005_08_18 Thu + To do + Diary + Timesheet + 2005_08_19 Fri + To do + Diary + Timesheet + 2005_08_20 Sat + To do + Diary + Timesheet + 2005_08_21 Sun + To do + Diary + Timesheet + 2005_08_22 Mon + To do + Diary + Timesheet + 2005_08_23 Tue + To do + Diary + Timesheet + 2005_08_24 Wed + To do + Diary + Timesheet + 2005_08_25 Thu + To do + Diary + Timesheet + 2005_08_26 Fri + To do + Diary + Timesheet + 2005_08_27 Sat + To do + Diary + Timesheet + 2005_08_28 Sun + To do + Diary + Timesheet + 2005_08_29 Mon + To do + Diary + Timesheet + 2005_08_30 Tue + To do + Diary + Timesheet + 2005_08_31 Wed + To do + Diary + Timesheet +September 2005 + 2005_09_01 Thu + To do + Diary + Timesheet + 2005_09_02 Fri + To do + Diary + Timesheet + 2005_09_03 Sat + To do + Diary + Timesheet + 2005_09_04 Sun + To do + Diary + Timesheet + 2005_09_05 Mon + To do + Diary + Timesheet + 2005_09_06 Tue + To do + Diary + Timesheet + 2005_09_07 Wed + To do + Diary + Timesheet + 2005_09_08 Thu + To do + Diary + Timesheet + 2005_09_09 Fri + To do + Diary + Timesheet + 2005_09_10 Sat + To do + Diary + Timesheet + 2005_09_11 Sun + To do + Diary + Timesheet + 2005_09_12 Mon + To do + Diary + Timesheet + 2005_09_13 Tue + To do + Diary + Timesheet + 2005_09_14 Wed + To do + Diary + Timesheet + 2005_09_15 Thu + To do + Diary + Timesheet + 2005_09_16 Fri + To do + Diary + Timesheet + 2005_09_17 Sat + To do + Diary + Timesheet + 2005_09_18 Sun + To do + Diary + Timesheet + 2005_09_19 Mon + To do + Diary + Timesheet + 2005_09_20 Tue + To do + Diary + Timesheet + 2005_09_21 Wed + To do + Diary + Timesheet + 2005_09_22 Thu + To do + Diary + Timesheet + 2005_09_23 Fri + To do + Diary + Timesheet + 2005_09_24 Sat + To do + Diary + Timesheet + 2005_09_25 Sun + To do + Diary + Timesheet + 2005_09_26 Mon + To do + Diary + Timesheet + 2005_09_27 Tue + To do + Diary + Timesheet + 2005_09_28 Wed + To do + Diary + Timesheet + 2005_09_29 Thu + To do + Diary + Timesheet + 2005_09_30 Fri + To do + Diary + Timesheet +October 2005 + 2005_10_01 Sat + To do + Diary + Timesheet + 2005_10_02 Sun + To do + Diary + Timesheet + 2005_10_03 Mon + To do + Diary + Timesheet + 2005_10_04 Tue + To do + Diary + Timesheet + 2005_10_05 Wed + To do + Diary + Timesheet + 2005_10_06 Thu + To do + Diary + Timesheet + 2005_10_07 Fri + To do + Diary + Timesheet + 2005_10_08 Sat + To do + Diary + Timesheet + 2005_10_09 Sun + To do + Diary + Timesheet + 2005_10_10 Mon + To do + Diary + Timesheet + 2005_10_11 Tue + To do + Diary + Timesheet + 2005_10_12 Wed + To do + Diary + Timesheet + 2005_10_13 Thu + To do + Diary + Timesheet + 2005_10_14 Fri + To do + Diary + Timesheet + 2005_10_15 Sat + To do + Diary + Timesheet + 2005_10_16 Sun + To do + Diary + Timesheet + 2005_10_17 Mon + To do + Diary + Timesheet + 2005_10_18 Tue + To do + Diary + Timesheet + 2005_10_19 Wed + To do + Diary + Timesheet + 2005_10_20 Thu + To do + Diary + Timesheet + 2005_10_21 Fri + To do + Diary + Timesheet + 2005_10_22 Sat + To do + Diary + Timesheet + 2005_10_23 Sun + To do + Diary + Timesheet + 2005_10_24 Mon + To do + Diary + Timesheet + 2005_10_25 Tue + To do + Diary + Timesheet + 2005_10_26 Wed + To do + Diary + Timesheet + 2005_10_27 Thu + To do + Diary + Timesheet + 2005_10_28 Fri + To do + Diary + Timesheet + 2005_10_29 Sat + To do + Diary + Timesheet + 2005_10_30 Sun + To do + Diary + Timesheet + 2005_10_31 Mon + To do + Diary + Timesheet +November 2005 + 2005_11_01 Tue + To do + Diary + Timesheet + 2005_11_02 Wed + To do + Diary + Timesheet + 2005_11_03 Thu + To do + Diary + Timesheet + 2005_11_04 Fri + To do + Diary + Timesheet + 2005_11_05 Sat + To do + Diary + Timesheet + 2005_11_06 Sun + To do + Diary + Timesheet + 2005_11_07 Mon + To do + Diary + Timesheet + 2005_11_08 Tue + To do + Diary + Timesheet + 2005_11_09 Wed + To do + Diary + Timesheet + 2005_11_10 Thu + To do + Diary + Timesheet + 2005_11_11 Fri + To do + Diary + Timesheet + 2005_11_12 Sat + To do + Diary + Timesheet + 2005_11_13 Sun + To do + Diary + Timesheet + 2005_11_14 Mon + To do + Diary + Timesheet + 2005_11_15 Tue + To do + Diary + Timesheet + 2005_11_16 Wed + To do + Diary + Timesheet + 2005_11_17 Thu + To do + Diary + Timesheet + 2005_11_18 Fri + To do + Diary + Timesheet + 2005_11_19 Sat + To do + Diary + Timesheet + 2005_11_20 Sun + To do + Diary + Timesheet + 2005_11_21 Mon + To do + Diary + Timesheet + 2005_11_22 Tue + To do + Diary + Timesheet + 2005_11_23 Wed + To do + Diary + Timesheet + 2005_11_24 Thu + To do + Diary + Timesheet + 2005_11_25 Fri + To do + Diary + Timesheet + 2005_11_26 Sat + To do + Diary + Timesheet + 2005_11_27 Sun + To do + Diary + Timesheet + 2005_11_28 Mon + To do + Diary + Timesheet + 2005_11_29 Tue + To do + Diary + Timesheet + 2005_11_30 Wed + To do + Diary + Timesheet +December 2005 + 2005_12_01 Thu + To do + Diary + Timesheet + 2005_12_02 Fri + To do + Diary + Timesheet + 2005_12_03 Sat + To do + Diary + Timesheet + 2005_12_04 Sun + To do + Diary + Timesheet + 2005_12_05 Mon + To do + Diary + Timesheet + 2005_12_06 Tue + To do + Diary + Timesheet + 2005_12_07 Wed + To do + Diary + Timesheet + 2005_12_08 Thu + To do + Diary + Timesheet + 2005_12_09 Fri + To do + Diary + Timesheet + 2005_12_10 Sat + To do + Diary + Timesheet + 2005_12_11 Sun + To do + Diary + Timesheet + 2005_12_12 Mon + To do + Diary + Timesheet + 2005_12_13 Tue + To do + Diary + Timesheet + 2005_12_14 Wed + To do + Diary + Timesheet + 2005_12_15 Thu + To do + Diary + Timesheet + 2005_12_16 Fri + To do + Diary + Timesheet + 2005_12_17 Sat + To do + Diary + Timesheet + 2005_12_18 Sun + To do + Diary + Timesheet + 2005_12_19 Mon + To do + Diary + Timesheet + 2005_12_20 Tue + To do + Diary + Timesheet + 2005_12_21 Wed + To do + Diary + Timesheet + 2005_12_22 Thu + To do + Diary + Timesheet + 2005_12_23 Fri + To do + Diary + Timesheet + 2005_12_24 Sat + To do + Diary + Timesheet + 2005_12_25 Sun + To do + Diary + Timesheet + 2005_12_26 Mon + To do + Diary + Timesheet + 2005_12_27 Tue + To do + Diary + Timesheet + 2005_12_28 Wed + To do + Diary + Timesheet + 2005_12_29 Thu + To do + Diary + Timesheet + 2005_12_30 Fri + To do + Diary + Timesheet + 2005_12_31 Sat + To do + Diary + Timesheet diff --git a/pack/acp/start/vimoutliner/vimoutliner/scripts/outline_calendar/vimrc b/pack/acp/start/vimoutliner/vimoutliner/scripts/outline_calendar/vimrc new file mode 100644 index 0000000..7537878 --- /dev/null +++ b/pack/acp/start/vimoutliner/vimoutliner/scripts/outline_calendar/vimrc @@ -0,0 +1,31 @@ +" add the calendar tag file to the tag search stack +set tags^=~/Outlines/outline_calendar/vo_calendar_tags.tag + +" open the calendar at date +" a:1 is executed before the jump +function ToDate(date, ...) + let l:precmd = a:0>0 ? a:1 : "" + exec l:precmd + exec "tag " . a:date . "|normal zO" +endfunction + +" open the calendar at a requested date +" default is today +" a:1 is executed before the jump +function ToSomeDay(...) + let l:precmd = a:0>0 ? a:1 : "" + let l:today = strftime("%Y-%m-%d") + let l:date = input('Date To Goto (yyyy-mm-dd): ', today) + call ToDate(l:date, l:precmd) +endfunction + +" small case jumps use same window +nmap td :call ToDate(strftime("%Y-%m-%d")) +nmap ts :call ToSomeDay() +nmap tc :call ToDate(expand("")) + +" upper case jumps open new window +nmap tD :call ToDate(strftime("%Y-%m-%d"),"new") +nmap tS :call ToSomeDay("new") +nmap tC :call ToDate(expand(""),"new") + diff --git a/pack/acp/start/vimoutliner/vimoutliner/scripts/outline_calendar/vo_calendar_ctags.conf b/pack/acp/start/vimoutliner/vimoutliner/scripts/outline_calendar/vo_calendar_ctags.conf new file mode 100644 index 0000000..579da09 --- /dev/null +++ b/pack/acp/start/vimoutliner/vimoutliner/scripts/outline_calendar/vo_calendar_ctags.conf @@ -0,0 +1,9 @@ +--langdef=outline +--langmap=outline:.otl +--regex-outline=/_tag_ set ([^ ]+)/_tag_\1/ +--regex-outline=/^\t+([1-9][0-9]{3})_([01][0-9])_([0-3][0-9])/\1-\2-\3/ + +--languages=-all,+outline +--recurse + +--totals=yes diff --git a/pack/acp/start/vimoutliner/vimoutliner/scripts/outline_calendar/vo_calendar_generator.rb b/pack/acp/start/vimoutliner/vimoutliner/scripts/outline_calendar/vo_calendar_generator.rb new file mode 100755 index 0000000..adbbc6f --- /dev/null +++ b/pack/acp/start/vimoutliner/vimoutliner/scripts/outline_calendar/vo_calendar_generator.rb @@ -0,0 +1,110 @@ +#!/usr/bin/ruby + +# usage: +# calendar_generator.rb + +# indent for months, days are indented one more level +# both 0 and 1 make sense +MONTHINDENT = 0 + + +# insert _tag_ todo and _tag_ done items under each day +# DIARY = ["Zu erledigen", "Tagebuch", "Abrechnen"] +# DIARY = [] # for empty days. +DIARY = ["To do", "Diary", "Timesheet"] # deluxe edition + + +# adapt to your preference +# Sunday should be first, Saturday last entry +# DAYNAMES = %w(So Mo Di Mi Do Fr Sa) +DAYNAMES = %w(Sun Mon Tue Wed Thu Fri Sat) + + +# January should be first, December last entry +# MONTHNAMES = %w(Januar Februar Mrz April Mai Juni Juli August September Oktober November Dezember) +MONTHNAMES = %w(January February March April May June July August September October November December) + +# you should not need to change anything below here +# but you are welcome to write equivalent functionality +# in your language of choice. +# ------------------------------------------------------------ +require "date" + +TAGFORMAT = "%.4d_%.2d_%.2d" + + +def indent(sublevel) + "\t"*(MONTHINDENT+sublevel) +end + +def month(date) + MONTHNAMES[date.month - 1] + + (MONTHINDENT == 0 ? " " + date.year.to_s : "") +end + +class Shelf + def initialize(path) + begin + @shelf = File.readlines(path) + rescue + @shelf = Array.new + end + @path = path + end + def parse + unless @books + @books = Hash.new + (0...@shelf.size).step(2) do |i| + @books[@shelf[i].strip] = @shelf[i+1].strip + end + end + end + def save() + File.open(@path, "w") do |out| + @books.sort.each do |key,value| + out.puts(key) + out.puts("\t" + value) + end if @books + end + end + def update(year) + re = /^_tag_calendar_#{year}/ + unless @shelf.any? { |str| re.match(str) } + parse + @books["_tag_calendar_#{year}"] = "#{year}.otl" + save + end + end +end + +def update_shelf(year) + shelf = Shelf.new(CALENDAR + "/vo_calendar_shelf.otl") + shelf.update(year) +end + +CALENDAR = ARGV.shift + +ARGV.each do |arg| + + File.open(CALENDAR + "/" + arg + ".otl", "w") do |out| + + update_shelf(arg) + year = arg.to_i + d = Date.new(year, 1, 1) + out.puts year if MONTHINDENT == 1 + + while d.year == year + out.puts indent(0) + month(d) + month = d.month + while d.month == month + out.puts indent(1) + (TAGFORMAT % [d.year, d.month, d.day]) + + " " + DAYNAMES[d.wday] + DIARY.each do |item| + out.puts indent(2) + item + end + d += 1 + end + end + + end +end diff --git a/pack/acp/start/vimoutliner/vimoutliner/scripts/outline_calendar/vo_calendar_readme.otl b/pack/acp/start/vimoutliner/vimoutliner/scripts/outline_calendar/vo_calendar_readme.otl new file mode 100644 index 0000000..5761781 --- /dev/null +++ b/pack/acp/start/vimoutliner/vimoutliner/scripts/outline_calendar/vo_calendar_readme.otl @@ -0,0 +1,195 @@ +Outline Calendar 1.3 + What's new + in 1.3 + vimrc-script by Lee Bigelow for easy calendar access + small modifications to this outline + update from 1.2.2 + edit tagfile path in outline_calendar/vimrc + add 'source .../outline_calendar/vimrc' to your ~/.vimrc + in 1.2.2 + changed personal _tag_ set definition + : it may appear anywhere, but takes only next space-delimited + : word into account. The advantage is that I can set a tag + : behind a calendar date and jump to the current week via + : _tag_kalender + in 1.2.1 + removed spurious underscores in td function + in 1.2 + use ~/.vimoutlinerrc to avoid tagfile collisions + ,,d-dates usable as links into calendar + calendar dates (almost) without syntactic noise + update to documentation + in 1.1 + we are almost votl_maketags.pl-compatible again + you can use vo_calendar_shelf.otl to attach your calendar shelf to your outline tree + files follow vimoutliner naming convention + all installation files are kept within one directory + minor refinements to console user interface + defaults and samples are in English now + Prerequisites + ruby + used for generating the skeleton calendar and the shelf + could be replaced by perl, awk, python, ... + maybe even by a shell script or a small forth program ;-) + bash + use of special variable expansion in shell-frontend + ctags + create the tags-file for interoutline links and calendar access + regex support necessary + $ ctags --version + : Exuberant Ctags 5.5.1, Copyright (C) 1996-2003 Darren Hiebert + : Compiled: Aug 15 2003, 21:06:30 + : Addresses: , http://ctags.sourceforge.net + : Optional compiled features: +wildcards, +regex + vimoutliner + you should already have it + Known incompatibilities + none + Installation and Configuration + Installation + I recommend keeping all Outlines in one directory + it's easier on ctags + move the distribution folder there + : $ mv outline_calendar ~/Outlines + add another tag file to vim's lookup table + the following line should go into $HOME/.vimrc + : source ~/Outlines/outline_calendar/vimrc + configure the various scripts (see below) + source vo_calendar_ui.sh into your shell + $HOME/.bashrc is probably a good place for this + something like the following should do it + $ . $HOME/Outlines/outline_calendar/vo_calendar_ui.sh + you're ready to run + try + $ calgen 2005 2006 2007 + : you get three yearly calendars plus a shelf to + : access them through _tag_xxx linking + $ tagvout + : this should create a tag file inside the outline + : calendar directory + $ td + : now vimoutliner should be positioned on today + $ vim + in normal mode type \tS + enter a date after the prompt and hit return + the calendar should open in a new window + Configure the calendar layout in vo_calendar_generator.rb + Month layout + with MONTHINDENT=1 + 2006 + January + _2006-01-01_ Sun + _2006-01-02_ Mon + or with MONTHINDENT=0 + January 2006 + _2006-01-01_ Sun + _2006-01-02_ Mon + Optional diary headings for each day + with DIARY=[] + _2006-01-01_ Sun + _2006-01-02_ Mon + with DIARY=["Todo", "Billing", "Personal notes"] + _2006-01-01_ Sun + Todo + Billing + Personal notes + _2006-01-02_ Mon + Todo + Billing + Personal notes + change the language of the calendar + DAYNAMES + names of weekdays starting with Sunday + MONTHNAMES + names of months + calendar skeletons + need not be generated with the ruby script + but we do have an "API" to keep things compatible + : I suggest an approach that can be executed in + : the same way as my ruby script. If you did it + : with perl, you could call the script + : vo_calendar_generator.pl. + : Its first command line parameter should be the + : directory, where the calendar files are stored, + : the remaining parameters denote the years, for which + : calendar skeletons should be generated. + calendar shelf + do not edit manually, a really stupid parser (tm) is reading this + : it contains the _tag_ format links into the various + : yearly calendars. It is "parsed" (if you can call it + : that) to insert a newly created calendar in the correct + : position. + Configure the directory layout in vo_calendar_ui.sh + See the comments there for further explanations + Ideally you only have to set the variable OUTLINES, but YMMV + Configure tag harvesting in vo_calendar_ctags.conf + it should not need any changes + if it does, "man 1 ctags" is your friend + what it does, line by line + define a new language called outline + outline handling rules are applied only to .otl files + recognise headings starting with "_tag_ set " + everything after "_tag_ set " is considered as tag content + : this provides an alternative way of defining tags + : for both interoutline and intraoutline jumps. + : It can safely be removed without harming the + : outline calendar. + : If you keep it, your non-calendar tags will be + : stored in the calendar tagfile, too, but this should + : not be a problem. + recognise headings starting with a yyyy_mm_dd date + Underscore as date separator + are distinct from ,,d dates + date stamps will not be jumped to + date stamps will only be jumped from + they are mangled to hyphens as tag marker + plain ,,d dates can be used to enter the calendar from anywhere + all dates typed by you are in ISO-format yyyy-mm-dd + only tag outline files + handle files in subdirectories, too + show some impressive statistics + Usage + administrative + once: install and configure (see above) + rarely: generate a new calendar + $ calgen 2005 2006 2007 + this will go a long way + often: refresh the tag file + $ tagvout + you might even want to put it in your crontab + don't rely on shell functions there, use plain commands + modulo local changes the crontab entry would look like this: + : */10 * * * * /usr/bin/ctags -f $HOME/.vimoutliner/vo_tags.tag --options=$HOME/Outlines/outline_calendar/vo_calendar_ctags.conf $HOME/Outlines &> /dev/null + refresh tag file every 10 minutes + remove the configuration line --totals, you won't need it there + open calendar from running shell + edit today's calendar entries + $ td + : vimoutliner should open on today + : if you're running X, you'll get a gvim, otherwise a vim + : you'll be on today's entry + move around, add some items to the outline + move cursor on a ISO-format date yyyy-mm-dd and it + edit any available day + $ td 2005-05-04 + : release day + open calendar from running vim session + mappings for normal mode + \td and \tD + jump to today + \tc and \tC + jump to the date at the cursor position + \ts and \tS + ask for date to jump to + Notes + the mappings are defined as t... + the uppercase variant opens a new window within the current session + Author(s) + (c) Stefan Schmiedl 2005-05-04 + Contributors: + Lee Bigelow brought the \t? functions into existence + License + thou shalt neither sue nor blame me + it's worth what you paid for it + thou can do whatever else thou want to do with it + just remember to have fun on the way diff --git a/pack/acp/start/vimoutliner/vimoutliner/scripts/outline_calendar/vo_calendar_shelf.otl b/pack/acp/start/vimoutliner/vimoutliner/scripts/outline_calendar/vo_calendar_shelf.otl new file mode 100644 index 0000000..d8224b0 --- /dev/null +++ b/pack/acp/start/vimoutliner/vimoutliner/scripts/outline_calendar/vo_calendar_shelf.otl @@ -0,0 +1,6 @@ +_tag_calendar_2003 + 2003.otl +_tag_calendar_2004 + 2004.otl +_tag_calendar_2005 + 2005.otl diff --git a/pack/acp/start/vimoutliner/vimoutliner/scripts/outline_calendar/vo_calendar_ui.sh b/pack/acp/start/vimoutliner/vimoutliner/scripts/outline_calendar/vo_calendar_ui.sh new file mode 100755 index 0000000..0d5b911 --- /dev/null +++ b/pack/acp/start/vimoutliner/vimoutliner/scripts/outline_calendar/vo_calendar_ui.sh @@ -0,0 +1,39 @@ +# parent folder of all outlines +OUTLINES=$HOME/Outlines + +# folder for calendar files +# should be a subfolder of $OUTLINES +CALENDAR=$OUTLINES/outline_calendar + +# file for calendar tags +CALENDARTAGS=$CALENDAR/vo_calendar_tags.tag + +# folders to tag for interoutline links and calendar access +# if $CALENDAR is not below $OUTLINES, you need +# TAGFOLDERS=($OUTLINES $CALENDAR) +TAGFOLDERS=($OUTLINES) + +# script to generate calendar skeletons +CALGENSCRIPT=$CALENDAR/vo_calendar_generator.rb + +# option file for ctags +CTAGSOPTIONS=$CALENDAR/vo_calendar_ctags.conf + + +# you should not need to change anything below here +# that's what all the variables above are for +# ------------------------------------------------------------ + +function td() { + local date + date=${1:-`date +%Y-%m-%d`} + ${DISPLAY:+g}vim -c ":ta $date" $CALENDAR/${date%%-*}.otl +} + +function tagvout() { + ctags -f $CALENDARTAGS --options=$CTAGSOPTIONS ${TAGFOLDERS[*]} +} + +function calgen() { + $CALGENSCRIPT $CALENDAR $* +} diff --git a/pack/acp/start/vimoutliner/vimoutliner/scripts/outline_freemind/freemind.py b/pack/acp/start/vimoutliner/vimoutliner/scripts/outline_freemind/freemind.py new file mode 100755 index 0000000..99bebf8 --- /dev/null +++ b/pack/acp/start/vimoutliner/vimoutliner/scripts/outline_freemind/freemind.py @@ -0,0 +1,198 @@ +#!/usr/bin/python2 + +''' +usage: + freemind.py -o [fmt] , where ofmt selects output format: {otl,mm} + +freemind.py -o otl : + Read in an freemind XML .mm file and generate a outline file + compatable with vim-outliner. +freemind.py -o mm : + Read in an otl file and generate an XML mind map viewable in freemind + +NOTE: + Make sure that you check that round trip on your file works. + +Author: Julian Ryde +''' +import sys +import getopt +import codecs + +import otl +import xml.etree.ElementTree as et +from xml.etree.ElementTree import XMLParser + +debug = False + + +class Outline: # The target object of the parser + depth = -1 + indent = '\t' + current_tag = None + + def start(self, tag, attrib): # Called for each opening tag. + self.depth += 1 + self.current_tag = tag + # print the indented heading + if tag == 'node' and self.depth > 1: + #if 'tab' in attrib['TEXT']: + #import pdb; pdb.set_trace() + print (self.depth - 2) * self.indent + attrib['TEXT'] + + def end(self, tag): # Called for each closing tag. + self.depth -= 1 + self.current_tag = None + + def data(self, data): + if self.current_tag == 'p': + bodyline = data.rstrip('\r\n') + bodyindent = (self.depth - 5) * self.indent + ": " + #textlines = textwrap.wrap(bodytext, width=77-len(bodyindent), + # break_on_hyphens=False) + #for line in textlines: + print bodyindent + bodyline + + def close(self): # Called when all data has been parsed. + pass + + +def mm2otl(*arg, **kwarg): + fname = arg[0][0] + file = codecs.open(fname, 'r', encoding='utf-8') + + filelines = file.readlines() + outline = Outline() + parser = XMLParser(target=outline, encoding='utf-8') + parser.feed(filelines[0].encode('utf-8')) + parser.close() + + +# TODO body text with manual breaks +# TODO commandline arguments for depth, maxlength etc. +# TODO do not read whole file into memory? +# TODO handle decreasing indent by more than one tab +# TODO handle body text lines sometimes not ending with space + +depth = 99 + + +def attach_note(node, textlines): + et.ElementTree + # Format should look like + # + # + # + # + # %s + # + # + # + notenode = et.SubElement(node, 'richcontent') + notenode.set('TYPE', 'NOTE') + htmlnode = et.SubElement(notenode, 'html') + bodynode = et.SubElement(htmlnode, 'body') + for line in textlines: + pnode = et.SubElement(bodynode, 'p') + pnode.text = line + + +def otl2mm(*arg, **kwarg): + fname = arg[0][0] + + # node ID should be based on the line number of line in the + # otl file for easier debugging + #for lineno, line in enumerate(open(fname)): + # enumerate starts at 0 I want to start at 1 + # FIXME freemind.py|107| W806 local variable 'lineno' is assigned to but never used + lineno = 0 + + mapnode = et.Element('map') + mapnode.set('version', '0.9.0') + + topnode = et.SubElement(mapnode, 'node') + topnode.set('TEXT', fname) + + parents = [mapnode, topnode] + + #left_side = True # POSITION="right" + + # read otl file into memory + filelines = codecs.open(fname, 'r', encoding='utf-8') + + # first handle the body texts turn it into a list of headings + # with associated body text for each one this is because the + # body text especially multi-line is what makes it awkward. + headings = [] + bodytexts = [] + for line in filelines: + if otl.is_heading(line): + headings.append(line) + bodytexts.append([]) + else: + # TODO this ': ' removal should go in otl.py? + bodytexts[-1].append(line.lstrip()[2:] + '\n') + + #import pdb; pdb.set_trace() + oldheading = '' + for heading, bodytext in zip(headings, bodytexts): + if debug: + print heading, bodytext + + level = otl.level(heading) + oldlevel = otl.level(oldheading) + + if level == oldlevel: + pass + elif level > oldlevel: + # about to go down in the hierarchy so add this line + # as a parent to the stack + # FIXME freemind.py|149| W802 undefined name 'node' + parents.append(node) + elif level < oldlevel: + # about to go up in the hierarchy so remove parents from the stack + leveldiff = oldlevel - level + parents = parents[:-leveldiff] + + node = et.SubElement(parents[-1], 'node') + node.set('TEXT', heading.lstrip().rstrip('\r\n')) + #if len(bodytext) > 0: + attach_note(node, bodytext) + + oldheading = heading + + xmltree = et.ElementTree(mapnode) + xmltree.write(sys.stdout, 'utf-8') + print + + +def usage(): + print "usage: %s -[mo] " % (sys.argv[0]) + + +def main(): + args = sys.argv + try: + opts, args = getopt.getopt(sys.argv[1:], 'moh', [""]) + except getopt.GetoptError, err: + usage() + print str(err) + sys.exit(2) + + for o, a in opts: + if o == "-m": + otl2mm(args) + elif o == "-o": + mm2otl(args) + elif o == "-h": + usage() + sys.exit(0) + else: + usage() + assert False, "unhandled option: %s" % o + return args + +if __name__ == "__main__": + main() + +# vim: set noet : diff --git a/pack/acp/start/vimoutliner/vimoutliner/scripts/outline_freemind/freemind_outline.py b/pack/acp/start/vimoutliner/vimoutliner/scripts/outline_freemind/freemind_outline.py new file mode 100644 index 0000000..5930cfb --- /dev/null +++ b/pack/acp/start/vimoutliner/vimoutliner/scripts/outline_freemind/freemind_outline.py @@ -0,0 +1,48 @@ +#!/usr/bin/python2 +'''Converts a freemind xml .mm file to an outline file compatable with vim +outliner. + +Make sure that you check that round trip on your file works. + +Author: Julian Ryde +''' +import sys +from xml.etree.ElementTree import XMLParser +import textwrap +import codecs + +class Outline: # The target object of the parser + depth = -1 + indent = '\t' + current_tag = None + def start(self, tag, attrib): # Called for each opening tag. + self.depth += 1 + self.current_tag = tag + # print the indented heading + if tag == 'node' and self.depth > 1: + #if 'tab' in attrib['TEXT']: + #import pdb; pdb.set_trace() + print (self.depth-2)*self.indent + attrib['TEXT'] + def end(self, tag): # Called for each closing tag. + self.depth -= 1 + self.current_tag = None + def data(self, data): + if self.current_tag == 'p': + bodyline = data.rstrip('\r\n') + bodyindent = (self.depth-5)*self.indent + ": " + #textlines = textwrap.wrap(bodytext, width=77-len(bodyindent), break_on_hyphens=False) + #for line in textlines: + print bodyindent + bodyline + + def close(self): # Called when all data has been parsed. + pass + +outline = Outline() +parser = XMLParser(target=outline, encoding='utf-8') + +fname = sys.argv[1] +file = codecs.open(fname, 'r', encoding='utf-8') +filelines = file.readlines(); +print "filelines", type(filelines[0]), filelines[0] +parser.feed(filelines[0].encode('utf-8')) +parser.close() diff --git a/pack/acp/start/vimoutliner/vimoutliner/scripts/outline_freemind/otl.py b/pack/acp/start/vimoutliner/vimoutliner/scripts/outline_freemind/otl.py new file mode 100644 index 0000000..9268fdc --- /dev/null +++ b/pack/acp/start/vimoutliner/vimoutliner/scripts/outline_freemind/otl.py @@ -0,0 +1,26 @@ +# Some integer IDs +# headings are 1, 2, 3, .... +bodynowrap = -1 # ; +bodywrap = 0 # : + +def level(line): + '''return the heading level 1 for top level and down and 0 for body text''' + if line.lstrip().find(':')==0: return bodywrap + if line.lstrip().find(';')==0: return bodynowrap + strstart = line.lstrip() # find the start of text in lin + x = line.find(strstart) # find the text index in the line + n = line.count("\t",0,x) # count the tabs + return(n+1) # return the count + 1 (for level) + +def is_bodywrap(line): + return level(line) == bodywrap + +def is_bodynowrap(line): + return level(line) == bodynowrap + +def is_heading(line): + return level(line) > 0 + +def is_body(line): + return not is_heading(line) + diff --git a/pack/acp/start/vimoutliner/vimoutliner/scripts/outline_freemind/outline_freemind.py b/pack/acp/start/vimoutliner/vimoutliner/scripts/outline_freemind/outline_freemind.py new file mode 100755 index 0000000..cea78da --- /dev/null +++ b/pack/acp/start/vimoutliner/vimoutliner/scripts/outline_freemind/outline_freemind.py @@ -0,0 +1,114 @@ +#!/usr/bin/python2 +'''Read in an otl file and generate an xml mind map viewable in freemind + +Make sure that you check that round trip on your file works. + +Author: Julian Ryde +''' + +import sys +import os +import xml.etree.ElementTree as et +import otl +import codecs + +fname = sys.argv[1] +max_length = 40 +depth = 99 + +debug = False + +# TODO body text with manual breaks +# TODO commandline arguments for depth, maxlength etc. +# TODO do not read whole file into memory? +# TODO handle decreasing indent by more than one tab +# TODO handle body text lines sometimes not ending with space + +otlfile = open(fname) +indent = ' ' + +def attach_note(node, textlines): + et.ElementTree + # Format should look like + # + # + # + # + # %s + # + # + # + notenode = et.SubElement(node, 'richcontent') + notenode.set('TYPE', 'NOTE') + htmlnode = et.SubElement(notenode, 'html') + headnode = et.SubElement(htmlnode, 'head') + bodynode = et.SubElement(htmlnode, 'body') + for line in textlines: + pnode = et.SubElement(bodynode, 'p') + pnode.text = line + +# node ID should be based on the line number of line in the otl file for easier +# debugging +#for lineno, line in enumerate(open(fname)): +# enumerate starts at 0 I want to start at 1 +lineno = 0 + +mapnode = et.Element('map') +mapnode.set('version', '0.9.0') + +topnode = et.SubElement(mapnode, 'node') +topnode.set('TEXT', fname) + +parents = [mapnode, topnode] + +#left_side = True # POSITION="right" + +# read otl file into memory +filelines = codecs.open(fname, 'r', encoding='utf-8') + +# remove those that are too deep or body text and pesky end of line characters +#filelines = [line.rstrip('\r\n') for line in filelines if otl.level(line) <= depth] +#filelines = [line for line in filelines if otl.is_heading(line)] + +# first handle the body texts turn it into a list of headings with associated +# body text for each one this is because the body text especially multi-line is +# what makes it awkward. +headings = [] +bodytexts = [] +for line in filelines: + if otl.is_heading(line): + headings.append(line) + bodytexts.append([]) + else: + # TODO this ': ' removal should go in otl.py? + bodytexts[-1].append(line.lstrip()[2:] + '\n') + +#import pdb; pdb.set_trace() +oldheading = '' +for heading, bodytext in zip(headings, bodytexts): + if debug: print heading, bodytext + + level = otl.level(heading) + oldlevel = otl.level(oldheading) + + if level == oldlevel: + pass + elif level > oldlevel: + # about to go down in the hierarchy so add this line as a parent to the + # stack + parents.append(node) + elif level < oldlevel: + # about to go up in the hierarchy so remove parents from the stack + leveldiff = oldlevel - level + parents = parents[:-leveldiff] + + node = et.SubElement(parents[-1], 'node') + node.set('TEXT', heading.lstrip().rstrip('\r\n')) + #if len(bodytext) > 0: + attach_note(node, bodytext) + + oldheading = heading + +xmltree = et.ElementTree(mapnode) +xmltree.write(sys.stdout, 'utf-8') +print diff --git a/pack/acp/start/vimoutliner/vimoutliner/scripts/outline_freemind/test.otl b/pack/acp/start/vimoutliner/vimoutliner/scripts/outline_freemind/test.otl new file mode 100644 index 0000000..dd918c6 --- /dev/null +++ b/pack/acp/start/vimoutliner/vimoutliner/scripts/outline_freemind/test.otl @@ -0,0 +1,27 @@ +A + : This is some early multi-line body text which should wrap. This is some + : early multi-line body text which should wrap. This is some early + : multi-line body text which should wrap. + a + : single line body text + b + 1 + c +B + d + 2 + 3 + 4 +C + +This is a very long heading line that should be longer than the wrap width and so tests this case +Heading with a tab in the middle + : body text with tab in it +Body text with empy line in it + : First line + : + : Third line +Difficult characters + [_] ' " & +Last line body text + : This is a last line of body text diff --git a/pack/acp/start/vimoutliner/vimoutliner/scripts/outline_freemind/test.sh b/pack/acp/start/vimoutliner/vimoutliner/scripts/outline_freemind/test.sh new file mode 100755 index 0000000..15607a1 --- /dev/null +++ b/pack/acp/start/vimoutliner/vimoutliner/scripts/outline_freemind/test.sh @@ -0,0 +1,10 @@ +#!/bin/sh + +tmp=/tmp +dirname=`dirname $0` +fname=$dirname/test.otl +[ -n "$1" ] && fname=$1 + +$dirname/freemind.py -m $fname > $tmp/test.mm +$dirname/freemind.py -o $tmp/test.mm > $tmp/return.otl +diff -Nur $fname $tmp/return.otl diff --git a/pack/acp/start/vimoutliner/vimoutliner/scripts/vo2html.rb b/pack/acp/start/vimoutliner/vimoutliner/scripts/vo2html.rb new file mode 100644 index 0000000..a4faa03 --- /dev/null +++ b/pack/acp/start/vimoutliner/vimoutliner/scripts/vo2html.rb @@ -0,0 +1,329 @@ +#! /usr/bin/ruby + +# = Synopsis +# +# vo2xo: Converts VIM Outliner files to HTML slides. +# +# = Usage +# +# vo2html [OPTION] input-file +# +# -?, --help: show help +# +# -h, --head file-name: +# insert the contents of the named file within the HTML HEAD element. +# +# -b, --body file-name: +# insert the contents of the named file just after the start of the HTML BODY element. +# +# -t, --tail file-name: +# insert the contents of the named file just before the end the HTML BODY element. +# +# input-file: The VIM Outliner file to be converted. + +# LICENSE +# Copyright (C) 2006 Bruce Perens +# +# This license incorporates by reference the terms of GPL Version 3 or, at +# your choice, any later version of the GPL published by the Free Software +# Foundation, Inc. of Boston, MA, USA. +# +# You may not modify this license. You must preserve it and the accompanying +# copyright declaration in any whole or fragmentary verisons of the software +# to which they apply. +# +require 'getoptlong' +require 'rdoc/usage' +require 'rubygems' +require 'builder' +gem 'ruby-mp3info' +require 'mp3info' + +class OutlineParser +private + LeadingTabPattern = /^(\t*)(.*)$/.freeze + ColonPattern = /^:[ \t]*(.*)$/.freeze + +protected + def initialize(file) + @file = file + @pushback = nil + @nesting = 0 + end + + # Get a line, with push-back. + def get_line + if (line = @pushback) + @pushback = nil + return line + else + return @file.gets + end + end + + # Recursive parser for VIM Outliner. + # + # Meant to be called from itself when nesting increases - it calls its + # callers "nest" method, which calls "parse". This fits well with nesting + # output paradigms like that of Builder::XmlMarkup. + # + # Returns when nesting decreases, or if got_heading is set, just before the + # next top-level heading in the input stream. You should iteratively call + # parse() until more() returns false. This facilitates per-heading handling + # such as in the Xoxo converter, which uses first-level heading to demarcate + # the boundaries of slides. + # + # got_heading: If set, this will return just before the next top-level + # heading, leaving it in the push-back. + # + def parse(got_heading = false) + + while (line = get_line()) + m = line.match(LeadingTabPattern) + n = m[1].length # This line's nesting level. + after_tabs = m[2] # Content after zero or more leading tabs. + + # Drop empty lines, and lines with only tabs. + next if after_tabs == '' + + if n != @nesting # The nesting level changes with this line. + previous = @nesting + @nesting = n + @pushback = line + + # If nesting increases, recursively parse it through nest(). + # If nesting decreases, return to nest(), which will in turn + # return here. Both of these can be true in sequence! Nest() + # detects when a nesting level is closed by looking ahead one + # line and then pushing it back. That line can be one or MORE + # levels lesser than the current nesting level. + # + nest(n) if n > previous + return true if n < previous + elsif + if (p = after_tabs.match(ColonPattern)) and p[1].length > 0 + text(p[1], n) + else + if got_heading and n == 0 + @pushback = line + return true # Return before the next top-level heading. + end + + got_heading = true + heading(after_tabs, n) + end + end + end + false + end + +public +# Simple parser that returns true if there is any remaining content + # and leaves that content in the push-back. + # The return value is the content minus any leading tabs. + # + # Usage + # Return true if there is more content: + # if more + # Return the content of the next line to be read. + # more + # + # The second form is used to get the document title from the first line + # in the file. + # + def more + while (line = get_line()) + if (m = line.match(LeadingTabPattern)) and m[2].length > 0 + @pushback = line + return m[2] + end + end + false + end + +end + +class OutlineToHTML < OutlineParser +private + Type = [ :DOCTYPE, + :html, + :PUBLIC, + '-//W3C//DTD XHTML 1.0 Strict//EN', + 'http://www.w3.org/TR/xhtml1/DTD/xhtml1-strict.dtd' + ].freeze + + def wrap(nesting) + if nesting > 1 + @x.li { yield } + else + yield + end + end + +protected + def heading(text, nesting) + if nesting == 0 + @x.h1(text) + else + @x.li(text) + end + end + + def nest(nesting) + wrap(nesting) { @x.ul(:class => "list-#{nesting}") { parse(true) } } + end + + def text(t, nesting) + @x.p(t) + end + +public + def initialize(input_file, head_insert, body_insert, tail_insert) + @head_insert = head_insert.read if head_insert + @body_insert = body_insert.read if body_insert + @tail_insert = tail_insert.read if tail_insert + super(input_file) + end + + def convert + n = 0 + presentation_title = more + + while (title = more) + audio_filename = "#{n + 1}.mp3" + next_audio_filename = "#{n + 2}.mp3" + + @x = ::Builder::XmlMarkup.new(:indent => 2) + @x.declare!(*Type) + @x.html { + body_parameters = {} + + @x.head { + if title != presentation_title + @x.title("#{presentation_title} - #{title}") + else + @x.title("#{presentation_title}") + end + + @x << eval('"' + @head_insert + '"') if @head_insert + + if File.exists?(audio_filename) + seconds = nil + + Mp3Info.open(audio_filename) { |mp3| + seconds = mp3.length.ceil + 1 + } + + parameters = { + :'http-equiv' => 'refresh', + :content => "#{seconds};url=#{n + 2}.html" + } + @x.meta(parameters) + if File.exists?(next_audio_filename) + program = "function Preload() { a = new Image(); a.src = '#{next_audio_filename}'; p = new Image(); p.src = '#{n + 2}.html' }" + @x.script(program, :language => 'JavaScript') + body_parameters[:onload] = "Preload()" + end + end + } + @x.body(body_parameters) { + @x << eval('"' + @body_insert + '"') if @body_insert + attributes = { :class => 'content' } + # Fix: I don't yet know if this is the last slide, so I can't + # decide whether to do this onclick action or not. + # Oops. We have to generate the body tag after its contents. + # This might be awkward to do within Builder. + attributes[:onclick] = "document.location='#{n + 2}.html'" + @x.div(attributes) { + parse(false) + } + @x.div(:class => 'bottom') { + @x << eval('"' + @tail_insert + '"') if @tail_insert + + @x.div(:class => 'navbar-wrapper') { + @x.ul(:class => 'navbar') { + @x.li(:class => 'previous') { + if n > 0 + @x.a('Previous', :href => "#{n}.html") + end + } + + @x.li(:class => 'top') { + @x.a(presentation_title, :href => "1.html") + } + + @x.li(:class => 'next') { + if more + @x.a('Next', :href => "#{n + 2}.html") + end + } + } + } + if File.exists?(audio_filename) + @x.object(:type => 'audio/mpeg', :data => audio_filename, :width => "95%", :height => 42) { + message = "Your web browser isn't configured correctly to play the audio file #{audio_filename}, and thus you are missing the sound-track to this program." + + @x.param(:name => 'autoplay', :value => true) + @x.param(:name => 'playcount', :value => 1) + @x.param(:name => 'showcontrols', :value => false) + @x.param(:name => 'showdisplay', :value => false) + @x.span(message, :class => 'error') + } + end + } + } + } + File.open("#{n += 1}.html", "w") { |f| + f.write(@x.target!) + } + @x = nil + end + end + +end + + +opts = GetoptLong.new( + [ '--help', '-?', GetoptLong::NO_ARGUMENT ], + [ '--head', '-h', GetoptLong::REQUIRED_ARGUMENT ], + [ '--body', '-b', GetoptLong::REQUIRED_ARGUMENT ], + [ '--tail', '-t', GetoptLong::REQUIRED_ARGUMENT ] +) + +head_insert = nil +body_insert = nil +tail_insert = nil + +begin + opts.each do |opt, arg| + case opt + when '--help' + RDoc::usage + when '--head' + head_insert = File.new(arg, 'r') + when '--body' + body_insert = File.new(arg, 'r') + when '--tail' + tail_insert = File.new(arg, 'r') + end + end + + if ARGV.length != 1 + RDoc::usage + exit 0 + end + + input_file = File.new(ARGV[0], 'r') +rescue Exception => error + $stderr.print("Error: #{error}\n") + exit(1) +end + +c = OutlineToHTML.new(input_file, head_insert, body_insert, tail_insert) +if not c.more + $stderr.write("Error: Input file contains no content.\n") + exit(1) +end + +c.convert +exit(0) diff --git a/pack/acp/start/vimoutliner/vimoutliner/scripts/vo2odp.rb b/pack/acp/start/vimoutliner/vimoutliner/scripts/vo2odp.rb new file mode 100644 index 0000000..963fcf3 --- /dev/null +++ b/pack/acp/start/vimoutliner/vimoutliner/scripts/vo2odp.rb @@ -0,0 +1,415 @@ +#! /usr/bin/ruby + +# = Synopsis +# +# vo2xo: Converts VIM Outliner files to OpenDocument presentations. +# +# = Usage +# +# vo2odp [OPTION] input-file output-file +# +# -?, --help: show help +# +# input-file: The VIM Outliner file to be converted. + +# LICENSE +# Copyright (C) 2006 Bruce Perens +# +# You may apply the terms of GPL Version 3 or, at your choice, any later +# version of the GPL published by the Free Software Foundation, Inc. of +# Boston, MA, USA, to this software. +# +# You may not modify this license. You must preserve it and the accompanying +# copyright declaration in any whole or fragmentary verisons of the software +# to which they apply. +# +require 'getoptlong' +require 'rdoc/usage' +require 'rubygems' +require_gem 'builder' +require_gem 'rubyzip' +require 'zip/zipfilesystem' + +class OutlineParser +private + LeadingTabPattern = /^(\t*)(.*)$/.freeze + ColonPattern = /^:[ \t]*(.*)$/.freeze + +protected + def initialize(file) + @file = file + @pushback = nil + @nesting = 0 + end + + # Get a line, with push-back. + def get_line + if (line = @pushback) + @pushback = nil + return line + else + return @file.gets + end + end + + # Recursive parser for VIM Outliner. + # + # Meant to be called from itself when nesting increases - it calls its + # callers "nest" method, which calls "parse". This fits well with nesting + # output paradigms like that of Builder::XmlMarkup. + # + # Returns when nesting decreases, or if got_heading is set, just before the + # next top-level heading in the input stream. You should iteratively call + # parse() until more() returns false. This facilitates per-heading handling + # such as in the Xoxo converter, which uses first-level heading to demarcate + # the boundaries of slides. + # + # got_heading: If set, this will return just before the next top-level + # heading, leaving it in the push-back. + # + def parse(got_heading = false) + + while (line = get_line()) + m = line.match(LeadingTabPattern) + n = m[1].length # This line's nesting level. + after_tabs = m[2] # Content after zero or more leading tabs. + + # Drop empty lines, and lines with only tabs. + next if after_tabs == '' + + if n != @nesting # The nesting level changes with this line. + previous = @nesting + @nesting = n + @pushback = line + + # If nesting increases, recursively parse it through nest(). + # If nesting decreases, return to nest(), which will in turn + # return here. Both of these can be true in sequence! Nest() + # detects when a nesting level is closed by looking ahead one + # line and then pushing it back. That line can be one or MORE + # levels lesser than the current nesting level. + # + nest(n) if n > previous + return true if n < previous + elsif + if (p = after_tabs.match(ColonPattern)) and p[1].length > 0 + text(p[1], n) + else + if got_heading and n == 0 + @pushback = line + return true # Return before the next top-level heading. + end + + got_heading = true + heading(after_tabs, n) + end + end + end + false + end + +public + # Simple parser that return true if there is any remaining content + # and leaves that content in the push-back. + # The return value is the content minus any leading tabs. + # + # Usage + # Return true if there is more content: + # if more + # Return the content of the next line to be read. + # more + # + # The second form is used to get the document title from the first line + # in the file. + # + def more + while (line = get_line()) + if (m = line.match(LeadingTabPattern)) and m[2].length > 0 + @pushback = line + return m[2] + end + end + false + end + +end + +module OpenDocument +end +module OpenDocument::Presentation +private + DocumentAttributes = { + :'office:version' => '1.0', + :'xmlns:anim' => 'urn:oasis:names:tc:opendocument:xmlns:animation:1.0', + :'xmlns:chart' => 'urn:oasis:names:tc:opendocument:xmlns:chart:1.0', + :'xmlns:dc' => 'http://purl.org/dc/elements/1.1/', + :'xmlns:dom' => 'http://www.w3.org/2001/xml-events', + :'xmlns:dr3d' => 'urn:oasis:names:tc:opendocument:xmlns:dr3d:1.0', + :'xmlns:draw' => 'urn:oasis:names:tc:opendocument:xmlns:drawing:1.0', + :'xmlns:fo' => 'urn:oasis:names:tc:opendocument:xmlns:xsl-fo-compatible:1.0', + :'xmlns:form' => 'urn:oasis:names:tc:opendocument:xmlns:form:1.0', + :'xmlns:math' => 'http://www.w3.org/1998/Math/MathML', + :'xmlns:meta' => 'urn:oasis:names:tc:opendocument:xmlns:meta:1.0', + :'xmlns:number' => 'urn:oasis:names:tc:opendocument:xmlns:datastyle:1.0', + :'xmlns:office' => 'urn:oasis:names:tc:opendocument:xmlns:office:1.0', + :'xmlns:ooo' => 'http://openoffice.org/2004/office', + :'xmlns:oooc' => 'http://openoffice.org/2004/calc', + :'xmlns:ooow' => 'http://openoffice.org/2004/writer', + :'xmlns:presentation' => 'urn:oasis:names:tc:opendocument:xmlns:presentation:1.0', + :'xmlns:script' => 'urn:oasis:names:tc:opendocument:xmlns:script:1.0', + :'xmlns:smil' => 'urn:oasis:names:tc:opendocument:xmlns:smil-compatible:1.0', + :'xmlns:style' => 'urn:oasis:names:tc:opendocument:xmlns:style:1.0', + :'xmlns:svg' => 'urn:oasis:names:tc:opendocument:xmlns:svg-compatible:1.0', + :'xmlns:table' => 'urn:oasis:names:tc:opendocument:xmlns:table:1.0', + :'xmlns:text' => 'urn:oasis:names:tc:opendocument:xmlns:text:1.0', + :'xmlns:xforms' => 'http://www.w3.org/2002/xforms', + :'xmlns:xlink' => 'http://www.w3.org/1999/xlink', + :'xmlns:xsd' => 'http://www.w3.org/2001/XMLSchema', + :'xmlns:xsi' => 'http://www.w3.org/2001/XMLSchema-instance', + }.freeze + + + # Bullet style for a particular indentation level. + def bullet_style(x, level, char, space_before, label_width, font_size) + x.tag!('text:list-level-style-bullet', :'text:level' => level, + :'text:bullet-char' => char) { + if level > 1 + x.tag!('style:list-level-properties', + :'text:space-before' => space_before, + :'text:min-label-width' => label_width) + end + x.tag!('style:text-properties', :'fo:font-family' => 'StarSymbol', + :'style:use-window-font-color' => 'true', :'fo:font-size' => font_size) + } + end + + # Paragraph style for a particular level. + def paragraph_style(x, name, left_margin, text_indent) + x.tag!('style:style', :'style:name' => name, + :'style:family' => 'paragraph') { + x.tag!('style:paragraph-properties', :'fo:margin-left' => left_margin, + :'fo:margin-right' => '0cm', :'fo:text-indent' => text_indent) + + } + end + + # Presentation style. + def presentation_style(x, name, parent, min_font_height, additional = {}) + x.tag!('style:style', :'style:name' => name, + :'style:family' => 'presentation', + :'style:parent-style-name' => parent) { + x.tag!('style:graphic-properties', {:'draw:fill-color' => '#ffffff', + :'fo:min-height' => min_font_height}.merge(additional)) + } + end + + # OpenOffice automatic styles. + # I started with a normal output file of OpenOffice, and attempted to compress + # the information: not for efficiency, but to make it understandable. The + # output should be close to identical. + # + def automatic_styles(x) + x.tag!('office:automatic-styles') { + + shared = { :'presentation:display-footer' => 'true', + :'presentation:display-page-number' => 'false', + :'presentation:display-date-time' => 'true' } + + x.tag!('style:style', :'style:name' => 'dp1', :'style:family' => 'drawing-page') { + x.tag!('style:drawing-page-properties', + { :'presentation:background-visible' => 'true', + :'presentation:background-objects-visible' => 'true' }.merge(shared)) + } + x.tag!('style:style', :'style:name' => 'dp2', :'style:family' => 'drawing-page') { + x.tag!('style:drawing-page-properties', + { :'presentation:display-header' => 'true' }.merge(shared)) + } + + x.tag!('style:style', :'style:name' => 'gr1', :'style:family' => 'graphic') { + x.tag!('style:graphic-properties', :'style:protect' => 'size') + } + + presentation_style(x, 'pr1', 'Default-title', '3.256cm') + presentation_style(x, 'pr2', 'Default-outline1', '13.609cm') + presentation_style(x, 'pr3', 'Default-notes', '12.573cm', + :'draw:auto-grow-height' => 'true') + + paragraph_style(x, 'P1', '0cm', '0cm') + paragraph_style(x, 'P2', '1.2cm', '-0.9cm') + paragraph_style(x, 'P3', '0.6cm', '-0.6cm') + + x.tag!('text:list-style', :'style:name' => 'L1') { + 1.upto(9) { |n| + bullet_style(x, n, :'â—', "#{(n - 1) * 0.6}cm", '0.6cm', + '45%') + } + } + x.tag!('text:list-style', :'style:name' => 'L2') { + bullet_style(x, 1, :'â—', '0.6cm', '0.9cm', '45%') + bullet_style(x, 2, :'–', '1.6cm', '0.8cm', '75%') + bullet_style(x, 3, :'â—', '3.0cm', '0.6cm', '45%') + bullet_style(x, 4, :'–', '4.2cm', '0.6cm', '75%') + bullet_style(x, 5, :'â—', '5.4cm', '0.6cm', '45%') + bullet_style(x, 6, :'â—', '6.6cm', '0.6cm', '45%') + bullet_style(x, 7, :'â—', '7.8cm', '0.6cm', '45%') + bullet_style(x, 8, :'â—', '9.0cm', '0.6cm', '45%') + bullet_style(x, 9, :'â—', '10.2cm', '0.6cm', '45%') + } + } + end + +public + def wrap(x) + x.instruct! + x.tag!('office:document-content', DocumentAttributes) { + automatic_styles(x) + x.tag!('office:body') { + x.tag!('office:presentation') { + yield(x) + } + } + } + x + end +end + +class OpenDocument::Manifest +public + def add(path, type) + @files[path] = type + end + + def content + x = Builder::XmlMarkup.new(:indent => 2) + x.instruct! + x.tag!('manifest:manifest', + :'xmlns:manifest' => 'urn:oasis:names:tc:opendocument:xmlns:manifest:1.0') { + x.tag!('manifest:file-entry', + :'manifest:media-type' => \ + 'application/vnd.oasis.opendocument.presentation', + :'manifest:full-path' => '/') + @files.each { |k, v| + x.tag!('manifest:file-entry', :'manifest:media-type' => v, + :'manifest:full-path' => k) + } + } + x.target! + end + + def initialize + @files = {} + end +end + +class OutlineToODP < OutlineParser + include OpenDocument::Presentation + +protected + def nest_headings(text, nesting, recurse) + @x.tag!('text:list-item') { + if recurse == 0 + @x.tag!('text:p', :'text:style-name' => "P#{nesting + 1}") { + @x << text + @x << "\n" + } + else + @x.tag!('text:list') { nest_headings(text, nesting, recurse - 1) } + end + } + end + + def heading(text, nesting) + if nesting == 0 + @x.tag!('draw:page', :'draw:name' => text, :'draw:style-name' => 'dp1', + :'draw:master-page-name' => 'Default', + :'presentation:presentation-page-layout-name' => 'AL1T2') { + @x.tag!('draw:frame', :'presentation:style-name' => 'pr1', + :'draw:layer' => 'layout', :'svg:width' => '25.199cm', + :'svg:height' => '3.256cm', :'svg:x' => '1.4cm', :'svg:y' => '0.962cm', + :'presentation:class' => 'title', :'presentation:placeholder' => true) { + @x.tag!('draw:text-box') { + @x.tag!('text:p', :'text:style-name' => 'P1') { + @x << text + @x << "\n" + } + } + } + @x.tag!('draw:frame', :'presentation:style-name' => 'pr2', + :'draw:layer' => 'layout', :'svg:width' => '25.199cm', + :'svg:height' => '13.609cm', :'svg:x' => '1.4cm', :'svg:y' => '4.914cm', + :'presentation:class' => 'outline', :'presentation:placeholder' => true) { + @x.tag!('draw:text-box') { + parse(true) + } + } + } + else + @x.tag!('text:list', :'text:style-name' => 'L2') { + nest_headings(text, nesting, nesting - 1) + } + end + end + + def nest(nesting) + parse(true) + end + + def text(t, nesting) + end + +public + def initialize(input_file) + super(input_file) + end + + def convert + @x = Builder::XmlMarkup.new(:indent => 2) + wrap(@x) { + while more + parse(false) + end + } + @x.target! + end +end + + +opts = GetoptLong.new( + [ '--help', '-?', GetoptLong::NO_ARGUMENT ] +) + +begin + opts.each do |opt, arg| + case opt + when '--help' + RDoc::usage + end + end + + if ARGV.length != 2 + RDoc::usage + exit 0 + end + + input_file = File.new(ARGV[0], 'r') + output_file = Zip::ZipFile.open(ARGV[1], Zip::ZipFile::CREATE) +rescue Exception => error + $stderr.print("Error: #{error}\n") + exit(1) +end + +c = OutlineToODP.new(input_file) +if not c.more + $stderr.write("Error: Input file contains no content.\n") + exit(1) +end + + manifest = OpenDocument::Manifest.new + output_file.file.open('content.xml', 'w') { |f| f.write(c.convert) } + manifest.add('content.xml', 'text/xml') + output_file.dir.mkdir('META-INF') + output_file.file.open('META-INF/manifest.xml', 'w') { |f| + f.write(manifest.content) + } + output_file.close +exit(0) diff --git a/pack/acp/start/vimoutliner/vimoutliner/scripts/vo2xo.rb b/pack/acp/start/vimoutliner/vimoutliner/scripts/vo2xo.rb new file mode 100644 index 0000000..4c59000 --- /dev/null +++ b/pack/acp/start/vimoutliner/vimoutliner/scripts/vo2xo.rb @@ -0,0 +1,239 @@ +#! /usr/bin/ruby + +# = Synopsis +# +# vo2xo: Converts VIM Outliner files to Xoxo presentations. +# +# = Usage +# +# vo2xo [OPTION] input-file +# +# -?, --help: show help +# +# -b, --body file-name: +# insert the contents of the named file at the start of the HTML BODY element. +# +# -h, --head file-name: +# insert the contents of the named file within the HTML HEAD element. +# +# input-file: The VIM Outliner file to be converted. + +# LICENSE +# Copyright (C) 2006 Bruce Perens +# +# This license incorporates by reference the terms of GPL Version 3 or, at +# your choice, any later version of the GPL published by the Free Software +# Foundation, Inc. of Boston, MA, USA. +# +# You may not modify this license. You must preserve it and the accompanying +# copyright declaration in any whole or fragmentary verisons of the software +# to which they apply. +# +require 'getoptlong' +require 'rdoc/usage' +require 'rubygems' +require_gem 'builder' + +class OutlineParser +private + LeadingTabPattern = /^(\t*)(.*)$/.freeze + ColonPattern = /^:[ \t]*(.*)$/.freeze + +protected + def initialize(file) + @file = file + @pushback = nil + @nesting = 0 + end + + # Get a line, with push-back. + def get_line + if (line = @pushback) + @pushback = nil + return line + else + return @file.gets + end + end + + # Recursive parser for VIM Outliner. + # + # Meant to be called from itself when nesting increases - it calls its + # callers "nest" method, which calls "parse". This fits well with nesting + # output paradigms like that of Builder::XmlMarkup. + # + # Returns when nesting decreases, or if got_heading is set, just before the + # next top-level heading in the input stream. You should iteratively call + # parse() until more() returns false. This facilitates per-heading handling + # such as in the Xoxo converter, which uses first-level heading to demarcate + # the boundaries of slides. + # + # got_heading: If set, this will return just before the next top-level + # heading, leaving it in the push-back. + # + def parse(got_heading = false) + + while (line = get_line()) + m = line.match(LeadingTabPattern) + n = m[1].length # This line's nesting level. + after_tabs = m[2] # Content after zero or more leading tabs. + + # Drop empty lines, and lines with only tabs. + next if after_tabs == '' + + if n != @nesting # The nesting level changes with this line. + previous = @nesting + @nesting = n + @pushback = line + + # If nesting increases, recursively parse it through nest(). + # If nesting decreases, return to nest(), which will in turn + # return here. Both of these can be true in sequence! Nest() + # detects when a nesting level is closed by looking ahead one + # line and then pushing it back. That line can be one or MORE + # levels lesser than the current nesting level. + # + nest(n) if n > previous + return true if n < previous + elsif + if (p = after_tabs.match(ColonPattern)) and p[1].length > 0 + text(p[1], n) + else + if got_heading and n == 0 + @pushback = line + return true # Return before the next top-level heading. + end + + got_heading = true + heading(after_tabs, n) + end + end + end + false + end + +public + # Simple parser that return true if there is any remaining content + # and leaves that content in the push-back. + # The return value is the content minus any leading tabs. + # + # Usage + # Return true if there is more content: + # if more + # Return the content of the next line to be read. + # more + # + # The second form is used to get the document title from the first line + # in the file. + # + def more + while (line = get_line()) + if (m = line.match(LeadingTabPattern)) and m[2].length > 0 + @pushback = line + return m[2] + end + end + false + end + +end + +class OutlineToXoxo < OutlineParser +private + Type = [ :DOCTYPE, + :html, + :PUBLIC, + '-//W3C//DTD XHTML 1.0 Strict//EN', + 'http://www.w3.org/TR/xhtml1/DTD/xhtml1-strict.dtd' + ].freeze + + +protected + def heading(text, nesting) + if nesting == 0 + @x.h1(text) + else + @x.li { @x.tag!("h#{nesting + 1}", text) } + end + end + + def nest(nesting) + if nesting == 1 + @x.ul { parse(true) } + else + @x.li(:class => 'nesting') { @x.ul { parse(true) } } + end + end + + def text(t, nesting) + @x.p(t) + end + +public + def initialize(input_file, head_insert, body_insert) + @head_insert = head_insert + @body_insert = body_insert + super(input_file) + end + + def convert + @x = Builder::XmlMarkup.new(:indent => 2) + @x.declare!(*Type) + @x.html { + @x.head { + @x.title(more) + @x << @head_insert.read if @head_insert + } + @x.body { + @x << @body_insert.read if @body_insert + @x.ul { + @x.li(:class => "slide") { parse(false) } while more + } + } + } + @x.target! + end + +end + + +opts = GetoptLong.new( + [ '--help', '-?', GetoptLong::NO_ARGUMENT ], + [ '--body', '-b', GetoptLong::REQUIRED_ARGUMENT ], + [ '--head', '-h', GetoptLong::REQUIRED_ARGUMENT ] +) + +body_insert = nil +head_insert = nil + +begin + opts.each do |opt, arg| + case opt + when '--help' + RDoc::usage + when '--body' + body_insert = File.new(arg, 'r') + when '--head' + head_insert = File.new(arg, 'r') + end + end + + if ARGV.length != 1 + RDoc::usage + exit 0 + end + + input_file = File.new(ARGV[0], 'r') +rescue Exception => error + $stderr.print("Error: #{error}\n") + exit(1) +end + +c = OutlineToXoxo.new(input_file, head_insert, body_insert) +if not c.more + $stderr.write("Error: Input file contains no content.\n") + exit(1) +end + +$stdout.write(c.convert) +exit(0) diff --git a/pack/acp/start/vimoutliner/vimoutliner/scripts/votl_maketags.1 b/pack/acp/start/vimoutliner/vimoutliner/scripts/votl_maketags.1 new file mode 100644 index 0000000..7a1c60b --- /dev/null +++ b/pack/acp/start/vimoutliner/vimoutliner/scripts/votl_maketags.1 @@ -0,0 +1,50 @@ +.\" Hey, EMACS: -*- nroff -*- +.\" First parameter, NAME, should be all caps +.\" Second parameter, SECTION, should be 1-8, maybe w/ subsection +.\" other parameters are allowed: see man(7), man(1) +.TH vo_maketags 1 "August 13, 2003" +.\" Please adjust this date whenever revising the manpage. +.\" +.\" Some roff macros, for reference: +.\" .nh disable hyphenation +.\" .hy enable hyphenation +.\" .ad l left justify +.\" .ad b justify to both left and right margins +.\" .nf disable filling +.\" .fi enable filling +.\" .br insert line break +.\" .sp insert n+1 empty lines +.\" for manpage-specific macros, see man(7) +.SH NAME +vo_maketags \- build TAGS for vim outliner +.SH SYNOPSIS +.B vo_maketags +.RI [ filename ] +.SH DESCRIPTION +This manual page documents briefly the +.B vo_maketags +Perl script. +.PP +.B vo_maketags +is a +.BR perl (1) +script that creates tag file which works with +.B vimoutliner +.RB ( vim (1) +plugin for editing outlines). +.SH OPTIONS +.B vo_maketags +script called just with filename of the processed outline, which +is a top of the hierarchy of linked outlines. +.SH SEE ALSO +.BR vim (1) +.ig +.br +The script is fully documented on +.UR http://www.vimoutliner.org +http://www.vimoutliner.org +.UE +.. +.SH AUTHOR +This manual page was written by Matej Cepl , +for the Debian GNU/Linux system (but may be used by others). diff --git a/pack/acp/start/vimoutliner/vimoutliner/scripts/votl_maketags.pl b/pack/acp/start/vimoutliner/vimoutliner/scripts/votl_maketags.pl new file mode 100644 index 0000000..ff6d3ee --- /dev/null +++ b/pack/acp/start/vimoutliner/vimoutliner/scripts/votl_maketags.pl @@ -0,0 +1,338 @@ +#!/usr/bin/perl -w +# ####################################################################### +# votl_maketags.pl: Vim outline tagging system, main program, version 0.3.5 +# Copyright (C) 2001-2003, 2011 by Steve Litt (slitt@troubleshooters.com) +# +# This program is free software; you can redistribute it and/or modify +# it under the terms of the GNU General Public License as published by +# the Free Software Foundation; either version 2 of the License, or +# (at your option) any later version. +# +# This program is distributed in the hope that it will be useful, +# but WITHOUT ANY WARRANTY; without even the implied warranty of +# MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the +# GNU General Public License for more details. +# +# You should have received a copy of the GNU General Public License +# along with this program; if not, see . +# +# Steve Litt, slitt@troubleshooters.com, http://www.troubleshooters.com +# ####################################################################### + +# ####################################################################### +# ####################################################################### +# ####################################################################### +# HISTORY +# V0.1.0 Pre-alpha +# Starting at a "top level" indent-defined Vim outline, this +# program finds all "tags" defined as headlines starting with +# _tag_, and containing a subheadline containing the file +# to which the tag should jump. This program creates a tags +# file. +#Steve Litt, 5/28/2001 +#End of version 0.1.0 +# +# V0.1.1 Pre-alpha +# Bug fixes, including ../ resolution +# +#Steve Litt, 5/28/2001 +#End of version 0.1.1 +# +# +# V0.1.2 Pre-alpha +# More bug fixes, and facility to create a new outline +# file from a tag whose corresponding file doesn't yet +# exist. +#Steve Litt, 5/30/2001 +#End of version 0.1.2 +# +# V0.1.3 Pre-alpha +# More bug fixes. This was the first version released +# file from a tag whose corresponding file doesn't yet +# exist. +#Steve Litt, 6/01/2001 +#End of version 0.1.3 +# +# V0.2.0 Pre-alpha +#Steve Litt, 12/03/2002 +# This file unchanged. The overall Vimoutliner version +# 0.2.0 has extensive improvements, including intuitive +# collapse/expand. +#End of version 0.2.0 +#END OF HISTORY +# +# +# V0.1.2 Pre-alpha +# More bug fixes, and facility to create a new outline +# file from a tag whose corresponding file doesn't yet +# exist. +#Steve Litt, 5/30/2001 +#End of version 0.1.2 +# V0.3.5 release 20110303 +# Changed vo_tags.tag directory from +# $HOME/.vimoutliner/ +# to +# $HOME/.vim/vimoutliner/ +#Steve Litt, 3/3/2011 +#End of version 0.3.5 release 20110303 +#END OF HISTORY +# +# ####################################################################### + + +use strict; +use vars qw($TAGFILENAME); +use Cwd; + +$TAGFILENAME = $ENV{"HOME"} . "/.vim/vimoutliner/vo_tags.tag"; +##### OLD LOCATION BELOW, REMOVE IN 0.3.6, COMMENT FOR NOW +#$TAGFILENAME = $ENV{"HOME"} . "/.vimoutliner/vo_tags.tag"; + +sub process1Outline($$); #Early prototype the recursive routine +sub makeDirectory($); #Early prototype the recursive routine + +sub makeTagFileStartingAt($) + { + unless(@ARGV == 1) + { + usage(); + die; + } + my($absoluteFileName) = deriveAbsoluteFileName(Cwd::cwd(), $_[0]); + + my(%processedFiles) = (); + recordFileAsProcessed($absoluteFileName,\%processedFiles); + unlink $TAGFILENAME; + process1Outline($absoluteFileName, \%processedFiles); + sortAndDeleteDupsFromTagFile(); + } + +sub sortAndDeleteDupsFromTagFile() + { + my($TEMPTAGFILENAME) = "$ENV{'HOME'}/temptagfile.tag"; + system("sort $TAGFILENAME | uniq > $TEMPTAGFILENAME"); + system("rm $TAGFILENAME"); + system("mv $TEMPTAGFILENAME $TAGFILENAME"); + } + + +sub process1Outline($$) + { + my($fileName) = $_[0]; + my($processedFilesHashRef) = $_[1]; + + unless(fileExists($fileName)) + { + makeDirectory($fileName); + makeEmptyFile($fileName); + } + + print "Begin processing file $fileName.\n"; + + my($baseDirectory) = getBaseDirectory($fileName); + my(%tags) = getTagsFromFile($fileName); + my(@tagKeys) = keys(%tags); + my($tagKey); + foreach $tagKey (@tagKeys) + { + my($absoluteFileName); + if(isAbsoluteFilePath($tags{$tagKey})) + { + $absoluteFileName = $tags{$tagKey}; + } + else + { + $absoluteFileName = + deriveAbsoluteFileName($baseDirectory, $tags{$tagKey}); + } + appendTagToTagFile($tagKey,$absoluteFileName); + if(notProcessedYet($absoluteFileName, $processedFilesHashRef)) + { + recordFileAsProcessed($absoluteFileName,$processedFilesHashRef); + process1Outline($absoluteFileName, $processedFilesHashRef); + } + } + } + +sub appendTagToTagFile($$) + { + open(TAGFILE, ">>$TAGFILENAME"); + print TAGFILE "$_[0] $_[1] :1\n"; + close(TAGFILE); + } + + +sub makeEmptyFile($) + { + open(OUTLINEFILE, ">" . $_[0]); + close(OUTLINEFILE); + } + + +sub makeDirectory($) + { + my($completeFileName) = $_[0]; + my($directoryName) = ($completeFileName =~ m/^(.*?)[^\/]*$/); + unless($directoryName eq "") + { + my($temp) = ($directoryName =~ m/^(.*).$/); + makeDirectory($temp); + print "Creating $directoryName..."; + if(mkdir $directoryName) + { + print " succeeded.\n"; + } + else + { + print " no action: $!.\n"; + } + } + } + +sub fileExists($) + { + my($outlineFileName) = $_[0]; + my($success) = open(OUTLINEFILE, "<" . $outlineFileName); + if($success) + { + close(OUTLINEFILE); + return(1); + } + else + { + return(0); + } + } + +sub getTagsFromFile($) + { + my($outlineFileName) = $_[0]; + my(%tags); + my($tagString) = ""; + my($success) = open(OUTLINEFILE, "<" . $outlineFileName); + unless($success) + { + print "Failed to open $outlineFileName\n"; + return(()); + } + while() + { + my($line) = $_; + chomp($line); + if($line =~ m/^\s*(_tag_\S+)/) + { + $tagString = $1; + } + elsif($tagString ne "") + { + $line =~ m/^\s*(\S+)/; + my($filename) = $1; + $tags{$tagString} = + deriveAbsoluteFileName(getBaseDirectory($_[0]), $1); + $tagString = ""; + } + } + return(%tags); + } + +sub recordFileAsProcessed($$) + { + my($absoluteFileName) = $_[0]; + my($processedFilesHashRef) = $_[1]; + ${$processedFilesHashRef}{$absoluteFileName} = "1"; + } + +sub notProcessedYet($$) + { + my($absoluteFileName) = $_[0]; + my(%processedFiles) = %{$_[1]}; + if(defined($processedFiles{$absoluteFileName})) + { + return(0); + } + else + { + return(1); + } + } + +sub dia($) + { + print "dia " . $_[0] . "\n"; + } + + +sub isAbsoluteFilePath($) + { + if($_[0] =~ m/^\//) + { + return 1; + } + else + { + return 0; + } + } + +sub getFileNameOnly($) + { + my($fileString); + if ($_[0] =~ m/.+\/(.*)$/) + { + $fileString= $1 + } + else + { + $fileString = $_[0]; + } + + return $fileString; + } + +sub getBaseDirectory($) + { + my($dirString) = ($_[0] =~ m/(.+\/).*$/); + return $dirString; + } + +sub deriveAbsoluteFileName($$) + { + my($absoluteFileName); + my($baseDirectory) = $_[0]; + my($passedFileName) = $_[1]; + unless($baseDirectory =~ m/\/$/) + { + $baseDirectory= $baseDirectory . "/"; + } + if($passedFileName =~ m/^\//) + { + $absoluteFileName = $passedFileName; + } + else + { + $absoluteFileName = $baseDirectory . $passedFileName; + } + + $absoluteFileName =~ s/\/\.\//\//g; #remove all "./"; + deleteDoubleDots($absoluteFileName); + + return($absoluteFileName); + } + +sub deleteDoubleDots($) + { + while($_[0] =~ m/\.\./) + { + $_[0] =~ s/\/[^\/]*\/\.\.//; + } + } + +sub usage() + { + print "\nUsage is:\n"; + print "otltags topLevelOutlineFileName\n\n"; + } + + +makeTagFileStartingAt($ARGV[0]) + diff --git a/pack/acp/start/vimoutliner/vimoutlinerrc b/pack/acp/start/vimoutliner/vimoutlinerrc new file mode 100644 index 0000000..12aaed0 --- /dev/null +++ b/pack/acp/start/vimoutliner/vimoutlinerrc @@ -0,0 +1,67 @@ +"Extra configurations and mappings ****************************************** +"This mapping is fold-level and fold-state dependent +"map dd p +"map dd P + +"Common Plugins +" The vo_modules_load variable holds name of all VO modules you want to load. +" If you do not want to load any VO modules leave it blank + +" This setting loads the checkboxes, tags and smart_paste plugins as default. +let g:vo_modules_load = "checkbox:tags:smart_paste" + +" Uncomment the following line to enable the math plugin. +"let g:vo_modules_load .= ':math' + +" Uncomment the following line to enable new hoisting. +" let g:vo_modules_load .= ':newhoist' + +" Uncomment the following line to enable the format plugin. +"let g:vo_modules_load .= ':format' + +" Uncomment the following line to enable clocking. +"let g:vo_modules_load .= ':clock' + +"User Preferences *************************************************** +"let maplocalleader = ',,' " uncomment for compatibility with + " previous versions of VO + +"setlocal ignorecase " searches ignore case +"setlocal smartcase " searches use smart case +"setlocal wrapmargin=5 +"setlocal tw=78 +"setlocal tabstop=4 " tabstop and shiftwidth must match +"setlocal shiftwidth=4 " values from 2 to 8 work well +"setlocal background=dark " for dark backgrounds +"setlocal nowrap + +" colorscheme votl_light " set a VO specific colorscheme + +"Checkbox Tags +" Tags can contain any word characters (:help word) +" tags must not contain whitespace +" tags must be unique +" there can be no intersections between lists +" 'high', 'High', and 'HIGH' are considered to be unique and nonintersecting +" each sub-list represents a unique circular 'ring' of tags +" currently, these options do not affect checkboxes +" status indicators like DONE, NOT DONE and CANCELED are +" refelected in the checkbox state: [X], [_] and [-], respectively +" each tag is a [] block, just like a checkbox; chosen for possible future integration +" each tag must be delimited by whitespace +" [TODO] [Feature] <-- this +" [TODO][Feature] <-- not this + +let g:cbTags = [ +\ ['TODO','FEEDBACK','VERIFY','DELEGATED','HOLDING'] +\,['Feature','Enhancement','Bug'] +\,['Low','Normal','High','URGENT'] +\,['@Home','@Lab','@Work','@Shopping'] +\] + + +"Hoisting *********************************************************** +"Uncomment and set to 1 to debug hoisting +"let g:hoistParanoia=0 + +" vim: filetype=vim diff --git a/plugins.md b/plugins.md index 5250bfc..62ad145 100644 --- a/plugins.md +++ b/plugins.md @@ -20,3 +20,4 @@ Git submodules are slow, so handle this manually. * [vim-ps1](https://github.com/PProvost/vim-ps1) * [vim-speeddating](https://github.com/tpope/vim-speeddating) * [vim-surround](https://github.com/tpope/vim-surround) +* [vimoutliner](https://github.com/vimoutliner/vimoutliner)