home *** CD-ROM | disk | FTP | other *** search
/ PC World 2007 May / PCWorld_2007-05_cd.bin / komunikace / bitcomet / bitcomet_setup.exe / scripts / soft_zol.lua < prev   
Text File  |  2007-01-11  |  808b  |  33 lines
  1. ∩╗┐function url_process(linkurl, fileurl, str)
  2.     local pattern_name = "<[Hh]1>(.-)</[Hh]1>"
  3.     local pattern_ext  = ".*(%..-)$"
  4.     local start, _, tmp
  5.  
  6.     local base_name, ext
  7.  
  8.     start, _, tmp = string.find(str, pattern_name)
  9.     if start == nil then return ""  else base_name = tmp end
  10.  
  11.     if fileurl == nil then return "" end
  12.  
  13.     start, _, tmp = string.find(fileurl, pattern_ext)
  14.     if start == nil then return "" else ext = tmp end 
  15.  
  16.     return base_name .. ext
  17. end
  18.  
  19. function url_query(str)
  20.     local start
  21.     local pattern_url = "http://download.zol.com.cn/link"
  22.  
  23.     start = string.find(str, pattern_url)
  24.     if start == nil then return false end
  25.  
  26.     return true
  27. end
  28.  
  29. f = {}
  30. f.process = url_process
  31. f.accept = url_query
  32. inteligent_name_table["soft_zol.lua"] = f
  33.