clwiki 2.0.0

data/lib/cl_wiki/tools/cron.reminders.rb

@@ -0,0 +1,241 @@
+# modified version of Cron class by John Small mailto:jsmall@laser.net
+# RAA entry as of 1/2/03 is defunct - web site is bad url
+
+# next step -- every minute write to file the time
+# then, every minute, verify the previous minute written to file matches.
+# if not, then simulate every minute in between time and call testAndLaunch
+# ... this way missed time will be caught up
+
+# other approach is to prefigure when items should go and write them to a log
+# then delete them from the log when they are sent -- and do a catch up
+# on every check
+
+require 'cl/util/console'
+require 'cl/util/win'
+require 'rubygems'
+gem 'mosmtp', '>= 2010.141.2'
+require 'mosmtp'
+$LOAD_PATH << '..'
+require 'clwikiconf'
+require 'clwikipage'
+require 'parsedate'
+
+class Cron
+  def loadCrontab()
+    File.open(@crontabFilename, "r") do |f|
+      @crontab = []
+      f.each_line { | line |
+        line.chomp!
+        next if (line =~ /^$/)  # skip blank lines
+        next if (line =~ /^\#/)  # skip comments
+        @crontab << line.split(/ +/,6)
+      }
+    end
+    @crontabAge = File.mtime(@crontabFilename)
+  end
+
+  def inRange(value,range)
+    range.split(/,/).each { | subrange |
+      low, high = subrange.split(/\-/)
+      low = low.to_i
+      if high
+        high = high.to_i
+        return true if value >= low and value <= high;
+      else
+        return true if low == value;
+      end
+    }
+    false
+  end
+
+  def nth_wday_of_month?(nth)
+    require 'date'
+
+    all_wday_in_month = []
+    today = Date.today
+    (-5..5).each do |i|
+      a_date = (today + (i*7))
+      all_wday_in_month << a_date if a_date.mon == today.mon
+    end
+    all_wday_in_month[nth - 1] == today
+  end
+
+  def wday_in_range(current_wday, tweekday)
+    tweekday, nth_wday = tweekday.split('/')
+    result = inRange(current_wday, tweekday)
+    if result && nth_wday
+      result = nth_wday_of_month?(nth_wday.to_i)
+    end
+    result
+  end
+
+  def testAndLaunch(now)
+    @crontab.each { | task |
+      tmin, thour, tmonthday, tmonth, tweekday, tcommand = task
+      launch = false
+
+      # Launch this month of the year?
+      if tmonth.eql?("*") || inRange(now.mon,tmonth)
+        launch = true
+      end
+
+      # Launch this day of the month?
+      if launch && !tmonthday.eql?("*") &&
+        !inRange(now.mday,tmonthday)
+        launch = false
+      end
+
+      # Launch this day of the week?
+      if launch && !tweekday.eql?("*") &&
+        !wday_in_range(now.wday, tweekday)
+        launch = false
+      end
+
+      # Launch this hour of the day?
+      if launch && !thour.eql?("*") &&
+        !inRange(now.hour,thour)
+        launch = false
+      end
+
+      # Launch this minute of the hour?
+      if launch && !tmin.eql?("*") &&
+        !inRange(now.min,tmin)
+        launch = false;
+      end
+
+      if launch || $debug
+        subj = "[rem] " + tcommand.gsub(/_/, ' ')
+        body = time_to_str(now) + "\n" + parse_tcommand_for_wiki_pages(tcommand) + "\n" +
+               "\n" +
+               "http://localhost/clwiki/clwikicgi.rb?page=/UrgentToDo"
+        to = 'chrismo@clabs.org'
+        msg_id = "#{subj.scan(/[A-Za-z0-9]/).to_s}@clabs.org"
+        do_sendmail(to, 'chrismo@clabs.org', subj, body, msg_id)
+        puts 'sent ' + subj + "\n" +
+          ('-' * (subj.length + 5)) + "\n" +
+          body + "\n" if @verbose
+      end
+    }
+  end
+
+  def parse_tcommand_for_wiki_pages(tcommand)
+    content = ''
+    content << tcommand + "\n\n"
+    formatter = ClWikiPageFormatter.new(tcommand, '/UrgentToDo')
+    formatter.formatLinks do |word|
+      if formatter.isWikiName?(word)
+        wiki_page_name = word
+        ref_page_full_name = formatter.expand_path(wiki_page_name, '/UrgentToDo')
+        puts ref_page_full_name
+        if ClWikiPage.page_exists?(ref_page_full_name)
+          ref_page = ClWikiPage.new(ref_page_full_name, $wiki_path)
+          ref_page.read_raw_content
+          content << ref_page_full_name << "\n" <<
+            ('-' * ref_page_full_name.length) << "\n\n" <<
+            ref_page.raw_content << "\n"
+        end
+      end
+    end
+    content
+  end
+
+  def initialize(crontabFilename,verbose=false)
+    @crontabAge = 0
+    @lines = 0
+    @verbose = verbose
+    @crontabFilename = crontabFilename
+  end
+
+  def str_to_time(str)
+    begin
+      Time.local(*([ParseDate.parsedate(str)[0..4], 0].flatten))
+    rescue => e
+      puts(str.inspect)
+      raise e
+    end
+  end
+
+  def time_to_str(time)
+    time.strftime("%m/%d/%Y %H:%M")
+  end
+
+  def run()
+    if @verbose
+      print "\n\nDO NOT CLOSE THIS WINDOW!\n\n"
+    end
+    while (true)
+      if @crontabAge != File.mtime(@crontabFilename)
+        loadCrontab()
+      end
+
+      if $debug
+        testAndLaunch(Time.now)
+      else
+        # we do this to strip the seconds off for pure minute comparisons
+        now = str_to_time(time_to_str(Time.now))
+
+        lastrun_fn = 'cron.reminders.lastrun'
+        if File.exists?(lastrun_fn)
+          lastruntime = File.readlines(lastrun_fn)[0]
+          if lastruntime.nil?
+            File.delete(lastrun_fn)
+            next
+          end
+          lastrun = str_to_time(lastruntime.chomp)
+        else
+          # default to starting a week ago, that should be enough catchup
+          lastrun = now - (60 * 60 * 24 * 7)
+        end
+        nextrun = lastrun + (60)
+        catchup = false
+        if nextrun < now
+          catchup = true
+          time_do = nextrun
+        elsif nextrun == now
+          time_do = now
+        else
+          time_do = nil
+        end
+        if time_do
+          puts 'catching up ' + time_to_str(time_do) if catchup
+          #puts 'doing ' + time_to_str(time_do) if @verbose
+          testAndLaunch(time_do)
+          File.open(lastrun_fn, 'w') do |f| f.puts time_to_str(time_do) end
+        end
+        sleep (60) if !catchup
+      end
+      break if $debug
+    end
+  end
+end
+
+def do_sendmail(to, from, subj, body, msg_id)
+  smtp = MoSmtp.new
+  smtp.subj = subj
+  smtp.body = body
+  smtp.extra_headers = ["In-Reply-To: #{msg_id}", "References: #{msg_id}"]
+  smtp.sendmail
+end
+
+
+if __FILE__ == $0
+  begin
+    $debug = if_switch('-d')
+    $wiki_path = get_switch('-wp')
+    raise 'no wikiPath specified' if !$wiki_path
+    $wiki_conf = ClWikiConfiguration.new
+    $wiki_conf.useIndex = ClWikiConfiguration::USE_INDEX_NO
+    crontabFilename = 'c:/Dev/svn.momo/cweb/wikirep/UrgentToDo.txt';
+    Cron.new(crontabFilename, true).run()
+  rescue Exception => e
+    msgsummary = e.message + "\n" + e.backtrace.join("\n")
+    File.open('cron.reminders.err.txt', 'a+') do |f|
+      f.puts Time.now.to_s
+      f.puts msgsummary
+    end
+    do_sendmail('chrismo@clabs.org', 'chrismo@clabs.org', 'cron.reminders err',
+      msgsummary, "remindererr@clabs.org")
+    puts msgsummary
+  end
+  system 'pause'
+end

data/lib/cl_wiki/tools/movepages.rb

@@ -0,0 +1,27 @@
+require 'ftools'
+
+files = File.readlines('pagestomove.txt')
+srcdir = 'W:/WikiRepository/fotwiki'
+destdir = File.join(srcdir, 'DocuTIMEEmpACT', 'IncidentBase')
+files.collect! do |fn| File.join(srcdir, fn.chomp!) + '.txt' end
+files.each do |fn|
+  File.copy fn, fn + '.bak'
+  filecontent = File.readlines(fn)
+  destfn = File.join(destdir, File.basename(fn))
+  File.open(destfn, 'w+') do |fout|
+    fout.puts filecontent
+  end
+  File.open(fn, 'w+') do |fout|
+    fout.puts 'see //DocuTIMEEmpACT/IncidentBase/' + File.basename(fn, '.txt')
+  end
+  puts 'destfn: ' + destfn
+end
+
+
+# note: this works for easy moves - but with the hierarchy
+# complications in terms of links inside the content, a good
+# first move would be to convert to absolute paths in all
+# wiki pages referenced in content of pages being moved.
+# Then replace any links in moving content appropriately.
+
+# see clwikipage.rb.convert_relative_wikinames_to_absolute

data/lib/cl_wiki/tools/pagestomove.txt

@@ -0,0 +1,56 @@
+20000627LasVegasNv
+20010313ArlingtonTx
+20010320ArlingtonTx
+20010327CorporateGateway
+20010402CorporateGateway
+20010410CorporateGateway
+20010416ArlingtonTx
+20010423CorporateGateway
+20010425CorporateGateway
+20010605CorporateGateway
+20010608LasVegasNv
+20010626OverlandPark
+20010723WhitePlains
+20010807ArlingtonTx
+20010821LasVegasNv
+20010904LasVegasNv
+20010917ArlingtonTx
+20011002LasVegasNv
+20011119LasVegasNv
+20011127LasVegasNv
+20011127CorporateGateway
+20011128WhitePlains
+20020205Dfw01Sql
+20020211LasVegasNv
+20020326WhitePlains
+20020416LasVegasNv
+20020506LasVegasNv
+20020515WhitePlains
+20020528LasVegasNv
+20020708CorporateGateway
+20020715ArlingtonTx
+20020715CorporateGateway
+20020722LasVegasNv
+20020729WhitePlains
+20020729CorporateGateway
+20020730WhitePlains
+20020828CorporateGateway
+20020909CorporateGateway
+20020911WhitePlains
+20020916OverlandPark
+20020917KalamazooMi
+20020918KalamazooMi
+20020924KalamazooMi
+20020930KalamazooMi
+20021001KalamazooMi
+20021105CorporateGateway
+20021119MemphisTn
+20021202OverlandPark
+20021202bOverlandPark
+20021204CorporateGateway
+20021216CorporateSears
+20021216bCorporateSears
+20021217KalamazooMi
+20021217ArlingtonTx
+20021218CorporateSears
+20021223ArlingtonTx

data/lib/cl_wiki/tools/rublog/clWiki.rb

@@ -0,0 +1,62 @@
+# $Id: clWiki.rb,v 1.2 2005/02/19 04:39:10 chrismo Exp $
+=begin
+---------------------------------------------------------------------------
+Copyright (c) 2001-2004, Chris Morris
+All rights reserved.
+
+Redistribution and use in source and binary forms, with or without
+modification, are permitted provided that the following conditions are met:
+
+1. Redistributions of source code must retain the above copyright notice,
+this list of conditions and the following disclaimer.
+
+2. Redistributions in binary form must reproduce the above copyright
+notice, this list of conditions and the following disclaimer in the
+documentation and/or other materials provided with the distribution.
+
+3. Neither the names Chris Morris, cLabs nor the names of contributors to
+this software may be used to endorse or promote products derived from this
+software without specific prior written permission.
+
+THIS SOFTWARE IS PROVIDED BY THE COPYRIGHT HOLDERS AND CONTRIBUTORS ``AS
+IS'' AND ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO,
+THE IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR
+PURPOSE ARE DISCLAIMED. IN NO EVENT SHALL THE COPYRIGHT HOLDERS OR
+CONTRIBUTORS BE LIABLE FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL,
+EXEMPLARY, OR CONSEQUENTIAL DAMAGES (INCLUDING, BUT NOT LIMITED TO,
+PROCUREMENT OF SUBSTITUTE GOODS OR SERVICES; LOSS OF USE, DATA, OR PROFITS;
+OR BUSINESS INTERRUPTION) HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY,
+WHETHER IN CONTRACT, STRICT LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR
+OTHERWISE) ARISING IN ANY WAY OUT OF THE USE OF THIS SOFTWARE, EVEN IF
+ADVISED OF THE POSSIBILITY OF SUCH DAMAGE.
+--------------------------------------------------------------------------
+(based on BSD Open Source License)
+=end
+
+CLWIKI_PATH = "C:/Apache/Apache2/htdocs/clwiki/" 
+CLWIKI_URL = '/clwiki/clwikicgi.rb' 
+$: << CLWIKI_PATH
+
+require 'clwikipage'
+require 'clwikiconf'
+
+class ClWikiConvertor < BaseConvertor
+  handles "txt"
+
+  def convert_html(file_entry, f, all_entries)
+    ClWikiConfiguration.load_xml(File.join(CLWIKI_PATH, $defaultConfFile))
+    $wiki_conf.cgifn = CLWIKI_URL
+    page_name = file_entry.file_name.sub($wiki_path, '')
+    page_name.sub!($wikiPageExt, '')
+    page = ClWikiPage.new(page_name)
+    page.read_content(false)
+    title = page_name.split('/')[-1]
+    title.gsub!(/([^A-Z])([A-Z])/, '\1 \2')
+    title.gsub!(/([^0-9])([0-9])/, '\1 \2')
+    title.gsub!(/_/, ' ')
+    title = "<a href='#{$wiki_conf.cgifn}?page=#{page_name}'>#{title}</a>"
+    body  = page.content
+    HTMLEntry.new(title, body, self)
+  end
+end
+

data/lib/cl_wiki/tools/rublog/readme.txt

@@ -0,0 +1,2 @@
+This is a converter for RubLog, to allow the clWiki repository
+to be viewed with RubLog.

data/lib/cl_wiki/tools/singlepage.rb

@@ -0,0 +1,58 @@
+$LOAD_PATH << '..'
+require 'clwikipage'
+require 'cl/util/console'
+require 'cl/util/smtp'
+
+PageDepth = Struct.new("PageDepth", :name, :depth)
+
+def read_page(pageName)
+  content = ''
+  @stack.push PageDepth.new(pageName, 0)
+  while !@stack.empty?
+    pageDepth = @stack.shift
+    @depth = pageDepth.depth
+    pageName = pageDepth.name
+
+    if @depth <= @depthLimit
+      content << "\n" + pageName + "\n" + ("=" * pageName.length) + "\n"
+      page = ClWikiPage.new(pageName, @wikiPath)
+      page.read_raw_content
+      formatter = ClWikiPageFormatter.new(page.raw_content, pageName)
+      content << formatter.formatLinks do |word|
+        if formatter.isWikiName?(word)
+          wikiPageName = word
+          wikiPageName = '/' + wikiPageName if wikiPageName[0..0] != '/'
+          if !@visited.include?(wikiPageName)
+            @visited << wikiPageName
+            @stack.push PageDepth.new(wikiPageName, @depth + 1)
+          end
+          wikiPageName
+        else
+          word
+        end
+      end
+      content << "\n"
+    end
+    @stack.delete_if { |pgd| pgd.name =~ /journal/i }
+  end
+  content
+end
+
+def show_help
+  puts '-pn     Page name. Must be full path.'
+  puts '-wp     Wiki path.'
+end
+
+@visited = []
+@stack = []
+@depthLimit = 2
+@depth = 0
+pageName = get_switch('-pn')
+@wikiPath = get_switch('-wp')
+content = read_page(pageName)
+puts content
+puts
+File.open('singlepage.out.txt', 'w+') do |f| f.puts content end
+
+
+