To get this week’s top ten from the web, you can first ask billboard using topten.ksh:
\n#!\/bin\/ksh
\necho “—- getting bilboard’s heatseeker”
\ncurl
\n158\/433
\n“http:\/\/206.130.124.43\/\/htmlsite\/html_top.php?id=23&CALL_URL=http%3A\/\/www.billboard.com\/bbcom\/charts\/chart_display.jsp%3Fg%3DSingles%26f%3DHot%2 BDance%2BClub%2BPlay”
\n> \/tmp\/bb-hs.txt
\ncat \/tmp\/bb-hs.txt | sed -e ‘s\/<[^>][^>]*>\/\/g’ -e ‘\/^ *$\/d;s\/\/ \/g;s\/Featuring\/\/g;s\/ the \/\/g’ | tr -s ‘ ‘ | grep “|”|
\ngrep -iv billboard| cut -d ” ” -f4-9 > terms.txt
\nThe top ten list is parsed and ends up as a text only list in “terms.txt”. We now proceed to search and
\ndownload the files both from filestube and skreemr, we use a PHP script called mysearch.php to look for files
\nin filestube(remembver to use your own key for filestube instead of XXXXXXXX):
\n#!\/usr\/bin\/php
\n<?php
\n\/\/ Correct English grammar…
\n$argc > 1 x y z $plural = ‘s’ : $plural = ”;
\n\/\/ Display the number of arguments received
\n\/\/fwrite(STDOUT, “Got $argc argument$pluraln”);
\n$args=””;
\n\/\/ Write out the contents of the $argv array
\nforeach ( $argv as $key => $value ) {
\n\/\/ fwrite(STDOUT,”$key => $valuen”);
\nif($key!=0){
\nif($key>1){
\n$args=”{$args}%20{$value}”;
\n}else{
\n$args=”{$value}”;
\n}
\n}
\n}
\n\/\/print “args are:”;
\n159\/433
\n\/\/print $args;
\n$url=”http:\/\/api.filestube.com\/? key=XXXXXXXXXXXXXXXXXXXXXXX&phrase=$args&extension=mp3&page=1″;
\n$ch = curl_init();
\ncurl_setopt($ch, CURLOPT_URL,$url);
\ncurl_setopt($ch, CURLOPT_FAILONERROR, 1);
\ncurl_setopt($ch, CURLOPT_FOLLOWLOCATION, 1);
\ncurl_setopt($ch, CURLOPT_RETURNTRANSFER,1);
\ncurl_setopt($ch, CURLOPT_TIMEOUT, 30);
\n$result = curl_exec($ch) ;
\nprint curl_error($ch);
\ncurl_close($ch);
\n$document = new DOMDocument(‘1.0’, ‘UTF-8’);
\n$document->loadXML($result);
\n$answer = $document->getElementsByTagName(‘answer’)->item(0);
\nif($answer!=null) {
\n$hasResults = $answer->getElementsByTagName(‘hasResults’)->item(0);
\nif($hasResults->nodeValue == 1)
\n{
\n$hits = $answer->getElementsByTagName(‘hits’);
\nforeach($hits as $hit)
\n{
\n$name = $hit->getElementsByTagName(‘name’)->item(0)->nodeValue;
\n$extension = $hit->getElementsByTagName(‘extension’)->item(0)->nodeValue;
\n$desc = $hit->getElementsByTagName(‘description’)->item(0)->nodeValue;
\n$size = $hit->getElementsByTagName(‘size’)->item(0)->nodeValue;
\n$address = $hit->getElementsByTagName(‘address’)->item(0) ->nodeValue;
\n$details = $hit->getElementsByTagName(‘details’)->item(0) ->nodeValue;
\n$added = $hit->getElementsByTagName(‘added’)->item(0)->nodeValue;
\n$related = $hit->getElementsByTagName(‘related’)->item(0) ->nodeValue;
\n$counter=$hit->getAttribute(‘id’);
\nprint “$name | “;
\nprint ” $address nr”;
\n}
\n}
\nelse {
\nprint ‘0 resultsnr’;
\n}
\n}
\nelse {
\n$error = $document->get ElementsByTagName(‘error’)->item (0);
\nif($error!=null){
\n$message = $error->getElementsByTagName(‘message’)->item(0)->nodeValue;
\nprint ‘Message: ‘.$message.”nr”;
\n}
\n}
\n\/\/——————————-SECOND PAGE!!!
\n$url=”http:\/\/api.filestube.com\/? key=XXXXXXXXXXXXXXXXXXXXXXX
\n&phrase=$args&extension=mp3&page=2″;
\n$ch = curl_init();
\n160\/433
\ncurl_setopt($ch, CURLOPT_URL,$url);
\ncurl_setopt($ch, CURLOPT_FAILONERROR, 1);
\ncurl_setopt($ch, CURLOPT_FOLLOWLOCATION, 1);
\ncurl_setopt($ch, CURLOPT_RETURNTRANSFER,1);
\ncurl_setopt($ch, CURLOPT_TIMEOUT, 30);
\n$result = curl_exec($ch) ;
\nprint curl_error($ch);
\ncurl_close($ch);
\n$document = new DOMDocument(‘1.0’, ‘UTF-8’);
\n$document->loadXML($result);
\n$answer = $document->getElementsByTagName(‘answer’)->item(0);
\nif($answer!=null) {
\n$hasResults = $answer->getElementsByTagName(‘hasResults’)->item(0);
\nif($hasResults->nodeValue == 1)
\n{
\n$hits = $answer->getElementsByTagName(‘hits’);
\nforeach($hits as $hit)
\n{
\n$name = $hit->getElementsByTagName(‘name’)->item(0)->nodeValue;
\n$extension = $hit->getElementsByTagName(‘extension’)->item(0)->nodeValue;
\n$desc = $hit->getElementsByTagName(‘description’)->item(0)->nodeValue;
\n$size = $hit->getElementsByTagName(‘size’)->item(0)->nodeValue;
\n$address = $hit->getElementsByTagName(‘address’)->item(0) ->nodeValue;
\n$details = $hit->getElementsByTagName(‘details’)->item(0) ->nodeValue;
\n$added = $hit->getElementsByTagName(‘added’)->item(0)->nodeValue;
\n$related = $hit->getElementsByTagName(‘related’)->item(0) ->nodeValue;
\n$counter=$hit->getAttribute(‘id’);
\nprint “$name | “;
\nprint ” $address nr”;
\n}
\n}
\nelse {
\nprint ‘0 resultsnr’;
\n}
\n}
\nelse {
\n$error = $document->get ElementsByTagName(‘error’)->item (0);
\nif($error!=null){
\n$message = $error->getElementsByTagName(‘message’)->item(0)->nodeValue;
\nprint ‘Message: ‘.$message.”nr”;
\n}
\n}
\n?>
\nThen we direct all the show with get.ksh:
\n#!\/bin\/ksh
\n#### Get the files from FilesTube
\n(cat terms.txt| while read line;do
\n.\/mysearch.php `echo $line | awk ‘{ print $1 ” ” $2 }’`| grep -i `echo $line | awk ‘{ print $3 }’` | head -1
\ndone) >\/tmp\/results.txt
\n(cat \/tmp\/results.txt | while read result;do
\ncurl “`echo $result | awk -F’|’ ‘{ print $2 }’| sed ‘s\/ \/\/g’`” | egrep ‘src.*mp3’ | awk -F”src=”” ‘{ print $2 }’ | awk ‘{
\n161\/433
\nprint $1 }’ | sed ‘s\/”\/\/g’
\ndone) | while read url;do
\nwget -P \/200gb\/AUTODOWNLOADS “$url”
\ndone
\nrm \/tmp\/results. txt
\n#### Or get them from skreemr
\n(cat terms.txt| while read line;do
\nst=`echo $line | awk ‘{ print $1 “+” $2 “+” $3 }’`
\nwget -P \/200gb\/AUTODOWNLOADS `curl “http:\/\/skreemr. com\/results.jsp? q=$st” | egrep ‘href.*mp3’ | awk
\n-F”href=” ‘{ print $2 }’ | head -1 | sed ‘s\/”\/\/g’`
\ndone)
\nThe order of execution is: first “topten.ksh”, to get the list, then “get.ksh” to get the tracks.
\nEnjoy
\n162\/433<\/p>\n","protected":false},"excerpt":{"rendered":"
To get this week’s top ten from the web, you can first ask billboard using topten.ksh: #!\/bin\/ksh echo “—- getting bilboard’s heatseeker” curl 158\/433 “http:\/\/206.130.124.43\/\/htmlsite\/html_top.php?id=23&CALL_URL=http%3A\/\/www.billboard.com\/bbcom\/charts\/chart_display.jsp%3Fg%3DSingles%26f%3DHot%2 BDance%2BClub%2BPlay” > \/tmp\/bb-hs.txt cat \/tmp\/bb-hs.txt | sed -e ‘s\/<[^>][^>]*>\/\/g’ -e ‘\/^ *$\/d;s\/\/ \/g;s\/Featuring\/\/g;s\/ the \/\/g’ | tr -s ‘ ‘ | grep “|”| grep -iv billboard| cut -d ” ” […]<\/p>\n","protected":false},"author":1,"featured_media":0,"comment_status":"open","ping_status":"open","sticky":false,"template":"","format":"standard","meta":{"footnotes":""},"categories":[1],"tags":[],"class_list":["post-463","post","type-post","status-publish","format-standard","hentry","category-uncategorized"],"_links":{"self":[{"href":"\/blog\/index.php\/wp-json\/wp\/v2\/posts\/463","targetHints":{"allow":["GET"]}}],"collection":[{"href":"\/blog\/index.php\/wp-json\/wp\/v2\/posts"}],"about":[{"href":"\/blog\/index.php\/wp-json\/wp\/v2\/types\/post"}],"author":[{"embeddable":true,"href":"\/blog\/index.php\/wp-json\/wp\/v2\/users\/1"}],"replies":[{"embeddable":true,"href":"\/blog\/index.php\/wp-json\/wp\/v2\/comments?post=463"}],"version-history":[{"count":0,"href":"\/blog\/index.php\/wp-json\/wp\/v2\/posts\/463\/revisions"}],"wp:attachment":[{"href":"\/blog\/index.php\/wp-json\/wp\/v2\/media?parent=463"}],"wp:term":[{"taxonomy":"category","embeddable":true,"href":"\/blog\/index.php\/wp-json\/wp\/v2\/categories?post=463"},{"taxonomy":"post_tag","embeddable":true,"href":"\/blog\/index.php\/wp-json\/wp\/v2\/tags?post=463"}],"curies":[{"name":"wp","href":"https:\/\/api.w.org\/{rel}","templated":true}]}}