#
# usage: gawk -f doge.awk -v id=183667 -v sid=3 -v nid=5


BEGIN{
  tmp_id=0;
  do {
    ret = proc(id, sid, nid);
    #print "ret: " ret;
    if (match(ret, /ep\/[0-9]+-[0-9]+-([0-9]+).html/, m)) {
      nid = m[1];
    }
  } while (match(ret, /ep/));
}

function proc(id, sid, nid) {
  tmpf = "tmp" nid;
  tmp_id=1-tmp_id;
  cmd="wget https://dogevod.com/ep/" id "-" sid "-" nid ".html -O " tmpf;
  #print "system " cmd;
  system(cmd);
  #print "system end"
  #print cmd;
  link_next=""
  while ( (getline r < tmpf) > 0 ) {
    #print r;
    if (match(r, /meta property="og:title" content="(.*)" /, m)) {
      fn = m[1];
      #print "title: " fn;
    }
    if (match(r, /"link_next":"([^"]*)"/, m)) {
      link_next=m[1];
      gsub(/\\\//, "/", link_next);
      if (match(link_next, /ep/)) link_next="https://dogevod.com" link_next
      #print "link_next: " link_next;
    }
    if (match(r, /script type.*,"url":"([^"]*)",/, m)) {
      url=m[1];
      gsub(/\\\//, "/", url);
      #print "youtube-dl " url " -o \"" fn ".mp4\"";
      cmd="youtube-dl " url " -o \"" fn ".mp4\"";
      #system(cmd);
      print cmd
      return link_next;
    }
  }
  #system("del tmp");
  return link_next;
}