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