home *** CD-ROM | disk | FTP | other *** search
/ PC World 2008 May / PCWorld_2008-05_cd.bin / komunikace / bitcomet / bitcomet_setup.exe / scripts / soft_skycn.lua < prev    next >
Encoding:
Text File  |  2007-01-11  |  869 b   |  34 lines
  1. ∩╗┐function url_process(linkurl, fileurl, str)
  2.     local pattern_name = "<[Tt][Ii][Tt][Ll][Ee]>(.-)%s*%- σñ⌐τ⌐║Φ╜»Σ╗╢τ½Ö.*</[Tt][Ii][Tt][Ll][Ee]>"
  3.  
  4.     local pattern_ext  = ".*(%..-)$"
  5.     local start, _, tmp
  6.  
  7.     local base_name, ext
  8.  
  9.     start, _, tmp = string.find(str, pattern_name)
  10.     --print(start, tmp)
  11.     if start == nil then return ""  else base_name = tmp end
  12.  
  13.     start, _, tmp = string.find(linkurl, pattern_ext)
  14.     --print(start, tmp)
  15.     if start == nil then return "" else ext = tmp end 
  16.  
  17.     return base_name .. ext
  18. end
  19.  
  20. function url_query(str)
  21.     local start
  22.     local pattern_url = "http://www.skycn.com/soft/"
  23.  
  24.     start = string.find(str, pattern_url)
  25.     if start == nil then return false end
  26.  
  27.     return true
  28. end
  29.  
  30. f = {}
  31. f.process = url_process
  32. f.accept = url_query
  33. inteligent_name_table["soft_skycn.lua"] = f
  34.