#!/s2/ici3/bin/ici

/*


07AC0B62-47FD-4B2C-8AA9-3988BE902A27

wget -O r.htm
"http://radio.media.hinet.net/player/cat.asp?radio_id=
{C15DAB70-93FE-46D8-9706-463F1E26FC85}"
 07AC0B62-47FD-4B2C-8AA9-3988BE902A27

bcc
http://radio.media.hinet.net/player/cat.asp?radio_id={047F8314-1412-4D74-AEDD-FA4EBBF0108F}

wave
      Player.URL = "http://grm.cdn.hinet.net/media/radio/play.asp?mmsurl=mms:/
      /live.media.hinet.net/
      Radio_BCC-MUSIC?RADIOWEB07AC0B62-47FD-4B2C-8AA9-3988BE902A27";

      wget "http://radio.hinet.net/radio/player/player.jsp?radio_id=206"
news98 = 187



k
grep mms wavetmp1.htm
Player.URL = "http://grm.cdn.hinet.net/media/radio/play.asp?mmsurl=
mms://live.media.hinet.net/Radio_BCC-MUSIC?RADIOWEB1F63EC2A-49F4-4944-AA13-ACB518A6E0D9";

2006/06/11 need IE <= pig
more depth
wget "http://grm.cdn.hinet.net/media/radio/play.asp?mmsurl=mms://live.media.hinet.net/Radio_UFO?RADIOWEBA704952D-CE07-4734
-91CE-5664660B20CB"

mplayer -dumpfile ufonew01_060611.mp3 -dumpstream \
"mms://203.69.144.210/203.69.144.202/live.media.hinet.net/Radio_UFO%3FRADIOWEBA704952D-CE07-4734-91CE-5664660B20CB"


exit 1

<asx version = "3.0">
<entry>
<Ref href="mms://203.69.144.210/203.69.144.202/live.media.hinet.net/Radio_UFO%3FRADIOWEBA704952D-CE07-4734-91CE-5664660B20
CB" />
<!-- NeTcAcHe inserted previous line -->
<Ref href="mms://live.media.hinet.net/Radio_UFO%3FRADIOWEBA704952D-CE07-4734-91CE-5664660B20CB" />
</entry>
</asx>

*/
extern run = 1;

tmp1 = "98tmp1.htm";
tmp2 = "98tmp2.htm";
tmp3 = "98tmp3.htm";
// url  = "http://radio.hinet.net/radio/player/player.jsp?radio_id=187";
// url  = "http://radio.hinet.net/radio/player/player_ie.jsp?radio_id=187";
url = "http://hichannel.hinet.net/radio/radio.jsp?chid=187";
id = "187";
anti_fix = 0;

while(run) {
// // sss = sprintf("wget -O %s \"%s\"", tmp1, url);
// "wget -O b.htm \"http://radio.media.hinet.net/player/cat.asp?radio_id={07AC0B62-47FD-4B2C-8AA9-3988BE902A27}\"";
// system("sh r.sh");
// // system(sss);

// sss = sprintf("wget -O %s --user-agent='Windows Media Player' --referer=http://hichannel.hinet.net 'http://hichannel.hi
net.net/api/streamradio.jsp?id=%s'", tmp1, id);
// sss = sprintf("wget -O %s --user-agent='Windows Media Player' --referer=http://hichannel.hinet.net 'http://hichannel.hi
net.net/api/streamRadio.jsp?id=%s'", tmp1, id);
// sss = sprintf("wget -O %s --user-agent='Windows Media Player' --referer=http://hichannel.hinet.net 'http://hichannel.hi
net.net/api/StreamRadio.jsp?id=%s'", tmp1, id);
sss = sprintf("wget -O %s --user-agent='Windows Media Player' --referer=http://hichannel.hinet.net 'http://hichannel.hinet
.net/api/streamFreeRadio.jsp?id=%s'", tmp1, id);

if(sss) {
  system(sss);
}


/*
"cat_player.asp?radio_id={C15DAB70-93FE-46D8-9706-463F1E26FC85}"

  3. 中華電信 - 飛碟電台
     http://radio.media.hinet.net/player/cat_player.asp?radio_id={C15DAB70-93FE
-46D8-9706-463F1E26FC85}

*/
// exit (1);

// f=fopen(tmp1, "r");
/*
ss = "";
while(s=getline(f))
{

  if (s ~ #(mms://.*)";#) {
  }

  if (s ~ #cat_player.asp#) {
    t = s ~~ #"(cat_player.asp[^"]+})"#;
    printf("wget -O %s http://radio.media.hinet.net/player/%s\n", tmp2, t);
    ss = sprintf("wget -O http://radio.media.hinet.net/player/%s\n", tmp2, t);
  }
}
if(ss) {
  system(ss);
}
*/

/*
grep mms r2.htm
<input type=hidden name="media_url" value="http://grm.cdn.hinet.net/media/radio/
play.asp?mmsurl=mms://live.media.hinet.net/Radio/UFO?RADIOWEB81B11FCA-18BC-4CB2-
A6E4-63B11E778AF6">
        Player.URL = "http://grm.cdn.hinet.net/media/radio/play.asp?mmsurl=mms:/
/live.media.hinet.net/Radio/UFO?RADIOWEB81B11FCA-18BC-4CB2-A6E4-63B11E778AF6";
*/
/*
       -dumpfile <filename> (MPLAYER only)
              Specify  which file MPlayer should dump to.  Should
              be used together with  -dumpaudio  /  -dumpvideo  /
              -dumpstream.

       -dumpstream (MPLAYER only)
              Dumps the raw stream to ./stream.dump.  Useful when
              ripping from DVD or network.
*/

f=fopen(tmp1, "r");
ss = "";
while(s=getline(f))
{
  if (s ~ #http://grm#) {
    t = s ~~ #("http://grm[^"]+")#;
    printf("wget --user-agent='Windows Media Player' -O %s %s\n", tmp2, t);
    ss = sprintf("wget --user-agent='Windows Media Player' -O %s %s\n", tmp2, t);
  }
}
if(ss) {
  system(ss);
}

// f2=fopen("b2.htm", "r");
f2=fopen(tmp2, "r");
ss = "";
// anti_fix=0;
while(s=getline(f2))
{
// before 2006/06/10
//  if (s ~ #mmsurl=mms#) {
//    t = s ~~ #mmsurl=(mms[^"]+)"#;
  if (s ~ #mms#) {
    if (anti_fix == 0) {
      t = s ~~ #(mms[^"]+)"#;
      printf("mplayer -user-agent 'Windows Media Player' -dumpfile %s -dumpstream %s\n", argv[1], t);
      ss = sprintf("mplayer -user-agent 'Windows Media Player' -dumpfile %s -dumpstream %s\n", argv[1], t);
      if(ss) {
       system(ss);
      }
    } else {
      t = s ~~ #(mms[^"]+)"#;
      printf("mplayer -user-agent 'Windows Media Player'  -dumpfile %s__%d -dumpstream %s\n", argv[1], anti_fix, t);
      ss = sprintf("mplayer -user-agent 'Windows Media Player'  -dumpfile %s__%d -dumpstream %s\n", argv[1], anti_fix, t);
      if(ss) {
       system(ss);
      }
    }
    anti_fix++;
  }
}
// if(ss) {
//  system(ss);
// }
extern info = NULL;
try {
  info = stat(argv[1]);
} onerror {
  printf("error is %s\n info is %s\n", error, string(info));
}
if(info) {
  run = 0;
} else
  printf("retrying\n");
}