home *** CD-ROM | disk | FTP | other *** search
/ PC World 2007 May / PCWorld_2007-05_cd.bin / komunikace / bitcomet / bitcomet_setup.exe / scripts / mp3_sogou.lua < prev    next >
Text File  |  2007-01-10  |  923b  |  37 lines
  1. ∩╗┐function url_process(linkurl, fileurl, str)
  2.     local pattern_name = "µ¡îσÉì∩╝Ü%s*(.-)</"
  3.     local pattern_ext  = "µá╝σ╝Å∩╝Ü%s*(.-)%s* "
  4.     local start, _, tmp
  5.  
  6.     local base_name, ext, url
  7.  
  8.     start, _, tmp = string.find(str, pattern_name)
  9.     --print(start, tmp)
  10.     if start == nil then return ""  else base_name = tmp end
  11.     base_name = string.gsub(base_name, "<.->", "")
  12.  
  13.     start, _, tmp = string.find(str, pattern_ext)
  14.     --print(start, tmp)
  15.     if start == nil then return "" else ext = tmp end 
  16.     ext = "." .. string.lower(ext)
  17.  
  18.     return base_name .. ext
  19. end
  20.  
  21. function url_query(str)
  22.     local start
  23.     local pattern_url = "d%.sogou%.com/down"
  24.  
  25.     start = string.find(str, pattern_url)
  26.     if start == nil then
  27.         return false
  28.     end
  29.  
  30.     return true
  31. end
  32.  
  33. f = {}
  34. f.process = url_process
  35. f.accept = url_query
  36. inteligent_name_table["mp3_sogou.lua"] = f
  37.