File: core.rb

package info (click to toggle)
aswiki 1.0.4-7
  • links: PTS
  • area: main
  • in suites: lenny
  • size: 348 kB
  • ctags: 302
  • sloc: ruby: 2,189; makefile: 63; xml: 16; sh: 12
file content (146 lines) | stat: -rw-r--r-- 3,359 bytes parent folder | download | duplicates (4)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
75
76
77
78
79
80
81
82
83
84
85
86
87
88
89
90
91
92
93
94
95
96
97
98
99
100
101
102
103
104
105
106
107
108
109
110
111
112
113
114
115
116
117
118
119
120
121
122
123
124
125
126
127
128
129
130
131
132
133
134
135
136
137
138
139
140
141
142
143
144
145
146
# Copyritght (c) 2002 TANIGUCHI Takaki
# This program is distributed under the GNU GPL 2 or later.

require 'aswiki/plugin'
require 'aswiki/util'
require 'aswiki/revlink'

module AsWiki
  class RecentPagesPlugin < Plugin
    Name = 'recentpages'
    include AsWiki::Util
    def onview(line, b, e, av)
      count = (av[1] || 100).to_i
      @data = {:data =>
	@repository.attrlist.sort{|a,b| b[1] <=> a[1]}[0,count].map{|l| 
	  {:plink => wikilink(l[0]), :timestamp => timestr(l[1])}
	}
      }
      load_parts
      return self
    end
  end

  class AllPagesPlugin < Plugin
    Name = 'allpages'
    include AsWiki::Util
    def onview(line, b, e, av)
      @data = {:data => @repository.namelist.sort.collect{|f| wikilink(f)},
	:total => @repository.namelist.length
      }
      load_parts
      return self
    end
  end

  class MetaPagesPlugin < Plugin
    Name = 'metapages'
    include AsWiki::Util
    def onview(line, b, e, av)
      @data = {:data => $metapages.keys.sort.collect{|k| wikilink(k)}}
      load_parts
      return self
    end
  end

  class OrphanedPagesPlugin < Plugin
    Name = 'orphanedpages'
    include AsWiki::Util
    @@run = false
    def onview(line, b, e, av)
      return nil if @@run == true
      @r = AsWiki::Repository.new
      @checked = {} # i want Set ...
      @queue   = {}
      @@run = true
      markandsweep($TOPPAGENAME)
      @@run = false

      @data = {:data => (@r.namelist - @checked.keys).sort.collect{|f|
	  wikilink(f)}}
      load_parts
      return self
    end
    private 
    def markandsweep(pname)
      @checked[pname] = true
      AsWiki::Parser.new(FileScanner[pname], pname).wikinames.
	uniq.each{|n|
	if @r.exist?(n) and not @queue.key?(n) and not @checked.key?(n)
	  @queue[n] = true
	end
      }
      @queue.each_key { |l|
	@queue.delete(l)
	markandsweep(l)
      }
    end
  end

  class NotCreatedPagesPlugin < Plugin
    Name = 'notcreatedpages'
    include AsWiki::Util
    def onview(line, b, e, av)
      @r = AsWiki::Repository.new
      pages = {}
      @r.namelist.each{|p|
	AsWiki::Parser.new(FileScanner[p], p).wikinames.uniq.each{|n|
	  if n !~ /\A\w+:[A-Z]\w+(?!:)/
	    pages[n] = true
	  end
	}
      }
      plist = (pages.keys - @r.namelist).sort.delete_if {|f| 
	f =~ /[^:]+:[^:]+/
      }.collect{|f| wikilink(f)}
      @data = {:data => plist, :total => plist.length}
      load_parts
      return self
    end
  end
  class ReverseLinkListPlugin < Plugin
    Name = 'reverselinklist'
    def onview(line, b, e, av)
      @r = AsWiki::Repository.new
      pages = {}
      rl = RevLink.new
      rl.clear
      @r.namelist.each{|p|
	lm = AsWiki::Parser.new(FileScanner[p], p).wikinames.uniq.
	  delete_if{|n| n =~ /\A\w+:[A-Z]\w+(?!:)/}
	lm.each{|n|
	  if pages.has_key?(n)
	    pages[n] << p
	  else
	    pages[n] = [p]
	  end
	}
	rl.regist(p, lm)
      }
      plist = pages.map{|k,v| 
	{
	  :linkcount => v.size,
	  :plink  => wikilink(k),
	  :pages => v.sort.map{|p| [wikilink(p),"\n"] }
	}
      }.sort{|a,b| b[:linkcount] <=> a[:linkcount]}
      @data = {:data => plist}
      load_parts
      return self
    end
    
  end

  class PluginListPlugin < Plugin
    Name = 'pluginlist'
    def onview(line, b, e, av)
      @data = {:data => 
	Plugin::PluginList.collect{|p|
	  p::Name
	}.sort
      }
      load_parts
      return self
    end
  end
end