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