Changeset 1368
- Timestamp:
- 02/25/08 18:16:39
- Files:
-
- HTTP/Cache.lua (modified) (3 diffs)
- HTTP/Data.lua (modified) (3 diffs)
- HTTP/File.lua (modified) (3 diffs)
- HTTP/Nanoki.lua (modified) (1 diff)
- HTTP/NaturalComparator.lua (modified) (1 diff)
- HTTP/Template.lua (modified) (3 diffs)
- HTTP/Token.lua (modified) (1 diff)
- HTTP/Trie.lua (modified) (2 diffs)
- HTTP/Unidecode.lua (modified) (5 diffs)
- HTTP/Wiki.lua (modified) (1 diff)
- HTTP/WikiAbout.lua (modified) (1 diff)
- HTTP/WikiContent.lua (modified) (1 diff)
- HTTP/WikiContentService.lua (modified) (1 diff)
- HTTP/WikiControlService.lua (modified) (1 diff)
- HTTP/WikiDateNavigation.lua (modified) (1 diff)
- HTTP/WikiDateService.lua (modified) (1 diff)
- HTTP/WikiDiffService.lua (modified) (1 diff)
- HTTP/WikiEditorService.lua (modified) (1 diff)
- HTTP/WikiFeed.lua (modified) (3 diffs)
- HTTP/WikiFileService.lua (modified) (1 diff)
- HTTP/WikiIndexNavigation.lua (modified) (1 diff)
- HTTP/WikiIndexService.lua (modified) (1 diff)
- HTTP/WikiMessage.lua (modified) (2 diffs)
- HTTP/WikiPath.lua (modified) (1 diff)
- HTTP/WikiPreview.lua (modified) (1 diff)
- HTTP/WikiRecent.lua (modified) (2 diffs)
- HTTP/WikiRecentService.lua (modified) (1 diff)
- HTTP/WikiRevisionService.lua (modified) (1 diff)
- HTTP/WikiSearchService.lua (modified) (1 diff)
- HTTP/WikiService.lua (modified) (2 diffs)
- HTTP/WikiVersionService.lua (modified) (1 diff)
- HTTP/etc/custom-screen.css (modified) (1 diff)
Legend:
- Unmodified
- Added
- Removed
- Modified
- Copied
- Moved
HTTP/Cache.lua
r1302 r1368 26 26 local self = setmetatable( _M, {} ) 27 27 local meta = getmetatable( self ) 28 29 -------------------------------------------------------------------------------- 30 -- Utilities 31 -------------------------------------------------------------------------------- 28 32 29 33 local function Read( aPath, aContent, aTime ) … … 63 67 end 64 68 69 -------------------------------------------------------------------------------- 70 -- Metamethods 71 -------------------------------------------------------------------------------- 72 65 73 function meta:__call( aPath, aContent, aTime ) 66 74 local aModification = lfs.attributes( aPath, 'modification' ) … … 74 82 return Write( aPath, aContent, aTime ) 75 83 end 84 85 function meta:__concat( aValue ) 86 return tostring( self ) .. tostring( aValue ) 87 end 88 89 function meta:__tostring() 90 return ( '%s/%s' ):format( self._NAME, self._VERSION ) 91 end HTTP/Data.lua
r1290 r1368 34 34 local self = setmetatable( _M, {} ) 35 35 local meta = getmetatable( self ) 36 37 -------------------------------------------------------------------------------- 38 -- Utilities 39 -------------------------------------------------------------------------------- 40 36 41 local encoders = {} 37 42 … … 123 128 encoders[ 'table' ] = EncodeTable 124 129 130 -------------------------------------------------------------------------------- 131 -- Metamethods 132 -------------------------------------------------------------------------------- 133 125 134 function meta:__call( anObject ) 126 135 if type( anObject ) == 'table' then … … 147 156 end 148 157 158 function meta:__concat( aValue ) 159 return tostring( self ) .. tostring( aValue ) 160 end 161 162 function meta:__tostring() 163 return ( '%s/%s' ):format( self._NAME, self._VERSION ) 164 end 165 HTTP/File.lua
r1338 r1368 35 35 self.separator = package.path:match( '(%p)%?%.' ) or '/' 36 36 37 -------------------------------------------------------------------------------- 38 -- Utilities 39 -------------------------------------------------------------------------------- 40 37 41 local function Reader( aPath ) 38 42 return assert( io.open( aPath, 'rb' ) ) … … 93 97 end 94 98 99 -------------------------------------------------------------------------------- 100 -- Metamethods 101 -------------------------------------------------------------------------------- 102 95 103 function meta:__call( ... ) 96 104 local aPath = table.concat( { ... }, self.separator ) … … 104 112 105 113 return aFile 114 end 115 116 function meta:__concat( aValue ) 117 return tostring( self ) .. tostring( aValue ) 118 end 119 120 function meta:__tostring() 121 return ( '%s/%s' ):format( self._NAME, self._VERSION ) 106 122 end 107 123 HTTP/Nanoki.lua
r1367 r1368 145 145 local aService = nil 146 146 147 --HTTP[ '/' ] = WikiMainService() 147 148 HTTP[ '/a' ] = WikiAbout() 148 149 HTTP[ '/etc/(.+)' ] = HTTPFile( 'etc/' ) 149 150 151 Environment( HTTPRequest.AddressFilter, 'forwarded', Forwarded( ... ) ) 150 152 HTTPResponse.filter[ #HTTPResponse.filter + 1 ] = ServerFilter 151 Environment( HTTPRequest.AddressFilter, 'forwarded', Forwarded( ... ) )152 153 HTTPRequest.secure = Secure( ... ) 153 154 HTTP/NaturalComparator.lua
r1296 r1368 82 82 end 83 83 84 function meta:__concat( aValue ) 85 return tostring( self ) .. tostring( aValue ) 86 end 87 84 88 function meta:__tostring() 85 89 return ( '%s/%s' ):format( self._NAME, self._VERSION ) HTTP/Template.lua
r1130 r1368 29 29 local self = setmetatable( _M, {} ) 30 30 local meta = getmetatable( self ) 31 32 -------------------------------------------------------------------------------- 33 -- Utilities 34 -------------------------------------------------------------------------------- 31 35 32 36 local contents = setmetatable( {}, { __mode = 'k' } ) … … 64 68 end 65 69 70 -------------------------------------------------------------------------------- 71 -- Metamethods 72 -------------------------------------------------------------------------------- 73 66 74 function meta:__call( aContent ) 67 75 local aTemplate = {} … … 81 89 82 90 return self( aContent ) 91 end 92 93 function meta:__concat( aValue ) 94 return tostring( self ) .. tostring( aValue ) 95 end 96 97 function meta:__tostring() 98 return ( '%s/%s' ):format( self._NAME, self._VERSION ) 83 99 end 84 100 HTTP/Token.lua
r1365 r1368 107 107 end 108 108 109 function meta:__concat( aValue ) 110 return tostring( self ) .. tostring( aValue ) 111 end 112 113 function meta:__tostring() 114 return ( '%s/%s' ):format( self._NAME, self._VERSION ) 115 end 116 109 117 function self:__call() 110 118 return ID( context[ self ] ) HTTP/Trie.lua
r1303 r1368 28 28 local meta = getmetatable( self ) 29 29 30 local paths = setmetatable( {}, { __mode = 'k' } )31 32 30 -------------------------------------------------------------------------------- 33 31 -- Utilities 34 32 -------------------------------------------------------------------------------- 33 34 local paths = setmetatable( {}, { __mode = 'k' } ) 35 35 36 36 local function SetPath( self, aPath ) … … 89 89 function meta:__index( aKey ) 90 90 return Key( aKey ) 91 end 92 93 function meta:__concat( aValue ) 94 return tostring( self ) .. tostring( aValue ) 95 end 96 97 function meta:__tostring() 98 return ( '%s/%s' ):format( self._NAME, self._VERSION ) 91 99 end 92 100 HTTP/Unidecode.lua
r1076 r1368 11 11 -- import dependencies 12 12 local io = require( 'io' ) 13 local math = require( 'math' ) 14 local string = require( 'string' ) 13 15 16 local assert = assert 14 17 local getmetatable = getmetatable 15 18 local pairs = pairs … … 19 22 local require = require 20 23 local setmetatable = setmetatable 24 local tostring = tostring 25 26 -------------------------------------------------------------------------------- 27 -- Unidecode 28 -- as per Sean M. Burke's Text::Unidecode 29 -- http://search.cpan.org/~sburke/Text-Unidecode-0.04/lib/Text/Unidecode.pm 30 -- http://interglacial.com/~sburke/tpj/as_html/tpj22.html 31 -------------------------------------------------------------------------------- 32 33 module( 'Unidecode' ) 34 _VERSION = '1.0' 35 36 local self = setmetatable( _M, {} ) 37 local meta = getmetatable( self ) 21 38 22 39 -------------------------------------------------------------------------------- … … 89 106 90 107 -------------------------------------------------------------------------------- 91 -- Unidecode 92 -- as per Sean M. Burke's Text::Unidecode 93 -- http://search.cpan.org/~sburke/Text-Unidecode-0.04/lib/Text/Unidecode.pm 94 -- http://interglacial.com/~sburke/tpj/as_html/tpj22.html 108 -- Utilities 95 109 -------------------------------------------------------------------------------- 96 110 97 module( 'Unidecode' )98 _VERSION = '1.0'99 100 local self = setmetatable( _M, {} )101 local meta = getmetatable( self )102 111 local data = setmetatable( {}, {} ) 103 112 local metadata = getmetatable( data ) … … 128 137 end 129 138 139 -------------------------------------------------------------------------------- 140 -- Metamethods 141 -------------------------------------------------------------------------------- 142 130 143 function meta:__call( aValue ) 131 144 if aValue then … … 136 149 end 137 150 151 function meta:__concat( aValue ) 152 return tostring( self ) .. tostring( aValue ) 153 end 154 155 function meta:__tostring() 156 return ( '%s/%s' ):format( self._NAME, self._VERSION ) 157 end HTTP/Wiki.lua
r1338 r1368 130 130 end 131 131 132 aNewContent = WikiContent( aNewName ) 133 132 134 WikiDate[ aNewContent.creation ] = aNewContent.name 133 135 WikiRecent[ aNewContent.modification ] = aNewContent.name HTTP/WikiAbout.lua
r1287 r1368 76 76 end 77 77 78 function meta:__concat( aValue ) 79 return tostring( self ) .. tostring( aValue ) 80 end 81 78 82 function meta:__tostring() 79 83 local Nanoki = require( 'Nanoki' ) HTTP/WikiContent.lua
r1349 r1368 435 435 function meta:__index( aKey ) 436 436 return Name( aKey, 0 ) 437 end 438 439 function meta:__concat( aValue ) 440 return tostring( self ) .. tostring( aValue ) 441 end 442 443 function meta:__tostring() 444 return ( '%s/%s' ):format( self._NAME, self._VERSION ) 437 445 end 438 446 HTTP/WikiContentService.lua
r1346 r1368 398 398 end 399 399 400 function meta:__concat( aValue ) 401 return tostring( self ) .. tostring( aValue ) 402 end 403 404 function meta:__tostring() 405 return ( '%s/%s' ):format( self._NAME, self._VERSION ) 406 end 407 400 408 function self:__concat( aValue ) 401 409 return tostring( self ) .. tostring( aValue ) HTTP/WikiControlService.lua
r1357 r1368 309 309 end 310 310 311 function meta:__concat( aValue ) 312 return tostring( self ) .. tostring( aValue ) 313 end 314 315 function meta:__tostring() 316 return ( '%s/%s' ):format( self._NAME, self._VERSION ) 317 end 318 311 319 function self:__concat( aValue ) 312 320 return tostring( self ) .. tostring( aValue ) HTTP/WikiDateNavigation.lua
r1212 r1368 187 187 188 188 return aNavigation 189 end 190 191 function meta:__concat( aValue ) 192 return tostring( self ) .. tostring( aValue ) 193 end 194 195 function meta:__tostring() 196 return ( '%s/%s' ):format( self._NAME, self._VERSION ) 189 197 end 190 198 HTTP/WikiDateService.lua
r1327 r1368 212 212 end 213 213 214 function meta:__concat( aValue ) 215 return tostring( self ) .. tostring( aValue ) 216 end 217 218 function meta:__tostring() 219 return ( '%s/%s' ):format( self._NAME, self._VERSION ) 220 end 221 214 222 function self:__concat( aValue ) 215 223 return tostring( self ) .. tostring( aValue ) HTTP/WikiDiffService.lua
r1361 r1368 218 218 end 219 219 220 function meta:__concat( aValue ) 221 return tostring( self ) .. tostring( aValue ) 222 end 223 224 function meta:__tostring() 225 return ( '%s/%s' ):format( self._NAME, self._VERSION ) 226 end 227 220 228 function self:__concat( aValue ) 221 229 return tostring( self ) .. tostring( aValue ) HTTP/WikiEditorService.lua
r1362 r1368 374 374 end 375 375 376 function meta:__concat( aValue ) 377 return tostring( self ) .. tostring( aValue ) 378 end 379 380 function meta:__tostring() 381 return ( '%s/%s' ):format( self._NAME, self._VERSION ) 382 end 383 376 384 function self:__call( aName, aContext ) 377 385 return Save( aName, aContext ) HTTP/WikiFeed.lua
r1310 r1368 18 18 local setmetatable = setmetatable 19 19 local tostring = tostring 20 21 -------------------------------------------------------------------------------- 22 -- WikiFeed 23 -------------------------------------------------------------------------------- 24 25 module( 'WikiFeed' ) 26 _VERSION = '1.0' 27 28 local self = setmetatable( _M, {} ) 29 local meta = getmetatable( self ) 20 30 21 31 -------------------------------------------------------------------------------- … … 70 80 71 81 -------------------------------------------------------------------------------- 72 -- WikiFeed82 -- Metamethods 73 83 -------------------------------------------------------------------------------- 74 75 module( 'WikiFeed' )76 _VERSION = '1.0'77 78 local self = setmetatable( _M, {} )79 local meta = getmetatable( self )80 84 81 85 function meta:__call( anIterator, aGenerator, aContext ) … … 85 89 86 90 return aFeed 91 end 92 93 function meta:__concat( aValue ) 94 return tostring( self ) .. tostring( aValue ) 95 end 96 97 function meta:__tostring() 98 return ( '%s/%s' ):format( self._NAME, self._VERSION ) 87 99 end 88 100 HTTP/WikiFileService.lua
r1327 r1368 409 409 end 410 410 411 function meta:__concat( aValue ) 412 return tostring( self ) .. tostring( aValue ) 413 end 414 415 function meta:__tostring() 416 return ( '%s/%s' ):format( self._NAME, self._VERSION ) 417 end 418 411 419 function self:__concat( aValue ) 412 420 return tostring( self ) .. tostring( aValue ) HTTP/WikiIndexNavigation.lua
r1167 r1368 126 126 end 127 127 128 function meta:__concat( aValue ) 129 return tostring( self ) .. tostring( aValue ) 130 end 131 132 function meta:__tostring() 133 return ( '%s/%s' ):format( self._NAME, self._VERSION ) 134 end 135 128 136 function self:__concat( aValue ) 129 137 return tostring( self ) .. tostring( aValue ) HTTP/WikiIndexService.lua
r1327 r1368 178 178 end 179 179 180 function meta:__concat( aValue ) 181 return tostring( self ) .. tostring( aValue ) 182 end 183 184 function meta:__tostring() 185 return ( '%s/%s' ):format( self._NAME, self._VERSION ) 186 end 187 180 188 function self:__concat( aValue ) 181 189 return tostring( self ) .. tostring( aValue ) HTTP/WikiMessage.lua
r1239 r1368 30 30 local meta = getmetatable( self ) 31 31 32 -------------------------------------------------------------------------------- 33 -- Utilities 34 -------------------------------------------------------------------------------- 35 32 36 local types = { info = 'info', warning = 'warning', error = 'error' } 33 37 local tags = { info = 'span', warning = 'em', error = 'strong' } 38 39 -------------------------------------------------------------------------------- 40 -- Metamethods 41 -------------------------------------------------------------------------------- 34 42 35 43 function meta:__call( aText, aType ) … … 39 47 40 48 return aMessage 49 end 50 51 function meta:__concat( aValue ) 52 return tostring( self ) .. tostring( aValue ) 53 end 54 55 function meta:__tostring() 56 return ( '%s/%s' ):format( self._NAME, self._VERSION ) 41 57 end 42 58 HTTP/WikiPath.lua
r1255 r1368 67 67 end 68 68 69 function meta:__concat( aValue ) 70 return tostring( self ) .. tostring( aValue ) 71 end 72 73 function meta:__tostring() 74 return ( '%s/%s' ):format( self._NAME, self._VERSION ) 75 end 76 69 77 function self:__newindex( aKey, aValue ) 70 78 AddComponent( self, aValue ) HTTP/WikiPreview.lua
r1304 r1368 51 51 end 52 52 53 function meta:__concat( aValue ) 54 return tostring( self ) .. tostring( aValue ) 55 end 56 57 function meta:__tostring() 58 return ( '%s/%s' ):format( self._NAME, self._VERSION ) 59 end 60 53 61 function self:__tostring() 54 62 local markdown = require( 'markdown' ) HTTP/WikiRecent.lua
r1338 r1368 77 77 end 78 78 79 function meta:__concat( aValue ) 80 return tostring( self ) .. tostring( aValue ) 81 end 82 83 function meta:__tostring() 84 return ( '%s/%s' ):format( self._NAME, self._VERSION ) 85 end 86 79 87 function meta:__index( aKey ) 80 88 return Wiki.NameIterator( Directory() ) … … 90 98 error( ( 'Invalid parameters: %q = %q' ):format( tostring( aKey ), tostring( aValue ) ) ) 91 99 end 92 93 function meta:__concat( aValue )94 return tostring( self ) .. tostring( aValue )95 end96 97 function meta:__tostring()98 return ( '%s/%s' ):format( self._NAME, self._VERSION )99 endHTTP/WikiRecentService.lua
r1350 r1368 221 221 end 222 222 223 function meta:__concat( aValue ) 224 return tostring( self ) .. tostring( aValue ) 225 end 226 227 function meta:__tostring() 228 return ( '%s/%s' ):format( self._NAME, self._VERSION ) 229 end 230 223 231 function self:__concat( aValue ) 224 232 return tostring( self ) .. tostring( aValue ) HTTP/WikiRevisionService.lua
r1314 r1368 194 194 end 195 195 196 function meta:__concat( aValue ) 197 return tostring( self ) .. tostring( aValue ) 198 end 199 200 function meta:__tostring() 201 return ( '%s/%s' ):format( self._NAME, self._VERSION ) 202 end 203 196 204 function self:__concat( aValue ) 197 205 return tostring( self ) .. tostring( aValue ) HTTP/WikiSearchService.lua
r1327 r1368 200 200 end 201 201 202 function meta:__concat( aValue ) 203 return tostring( self ) .. tostring( aValue ) 204 end 205 206 function meta:__tostring() 207 return ( '%s/%s' ):format( self._NAME, self._VERSION ) 208 end 209 202 210 function self:__concat( aValue ) 203 211 return tostring( self ) .. tostring( aValue ) HTTP/WikiService.lua
r1360 r1368 31 31 module( 'WikiService' ) 32 32 _VERSION = '1.0' 33 34 local self = setmetatable( _M, {} ) 35 local meta = getmetatable( self ) 33 36 34 37 -------------------------------------------------------------------------------- … … 302 305 end 303 306 307 -------------------------------------------------------------------------------- 308 -- Metamethods 309 -------------------------------------------------------------------------------- 310 311 function meta:__concat( aValue ) 312 return tostring( self ) .. tostring( aValue ) 313 end 314 315 function meta:__tostring() 316 return ( '%s/%s' ):format( self._NAME, self._VERSION ) 317 end HTTP/WikiVersionService.lua
r1332 r1368 103 103 end 104 104 105 function meta:__concat( aValue ) 106 return tostring( self ) .. tostring( aValue ) 107 end 108 109 function meta:__tostring() 110 return ( '%s/%s' ):format( self._NAME, self._VERSION ) 111 end 112 105 113 function self:__concat( aValue ) 106 114 return tostring( self ) .. tostring( aValue ) HTTP/etc/custom-screen.css
r1342 r1368 4 4 ul { list-style-type: circle; } 5 5 p img { float: none; margin: 0 0 0 0; padding: 0 0 0 0; } 6 a:link { color: #555; text-decoration: none; }7 a:visited { color: #777; text-decoration: none; }8 a:hover { color: #333; text-decoration: none; }9 a:active { color: #111; text-decoration: none; }6 a:link { color: rgb( 153, 153, 153 ); text-decoration: none; } 7 a:visited { color: rgb( 102, 102, 102 ); text-decoration: none; } 8 a:hover { color: rgb( 051, 051, 051 ); text-decoration: none; } 9 a:active { color: rgb( 204, 204, 204 ); text-decoration: none; } 10 10 11 11 .box { border: 1px solid #999999; }