clwiki 2.4.0 → 3.0.4

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

@@ -1,241 +0,0 @@
-# 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

@@ -1,27 +0,0 @@
-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

@@ -1,56 +0,0 @@
-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

@@ -1,62 +0,0 @@
-# $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

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

data/lib/cl_wiki/tools/singlepage.rb

@@ -1,58 +0,0 @@
-$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
-
-
-