!7

html {
  new Matches m;
  
  L<S> artists = mechList("Randall | Artist names");
  final SS artistLinks = 
    litcimap("1st Crevolution" := "https://www.reverbnation.com/crevolution");
    //mechMapCI("Randall | Artist Links");
  
  if (eqic(uri, "/artists")) {
    ret hhtml(
      hhead(hmobilefix() + htitle("Future Rootz Records | Artists"))
      + hbody(hcenter(
      topStuff())
    + h2("Artists", style := "margin-top: 30px")
    + htableRaw(map(func(S artist) -> L {
        S link = or(artistLinks.get(artist), myLink("/artist/" + urlencode(artist)));
        ret ll(targetBlank(link, himg("http://eyeocr.sourceforge.net/filestore/filestore.php?cmd=serve&file=blob_1014262&contentType=image/jpeg", width := 200)), targetBlank(link, htmlencode(artist)));
      }, artists))
    , style := "background-color: #66cc00"));
  }
  
  if (swic(uri, "/artist/", m)) {
    fS artist = urldecode(m.rest());
    if (!contains(artists, artist)) ret subBot_serve404();
    ret h1_title(htmlencode(artist))
      + h3("Songs")
      + ul_noEncode(map(func(S song) -> S {
        ahref(myLink("/song/" + urlencode(artist) + "/" + urlencode(song)), htmlencode(song))
      }, mechList("Randall | " + artist + " | Songs")));
  }
  
  if (swic(uri, "/song/", m))
    ret "Song page for " + htmlencode(urldecode(m.rest()))
    + soundcloudEmbed("194090074", eq("1", params.get("autoplay")));
    
  if (eqic(uri, "/contact")) ret "Contact page";
  
  // home page
  if (eq(uri, "/"))
    ret hhtml(
      hhead(hmobilefix() + htitle("Future Rootz Records"))
      + hbody(hcenter(
      topStuff()
    + p(treeImg())
    ), style := "background-color: #66cc00"));
    
  ret subBot_serve404();
}

sS recordImg() {
  ret himg("http://eyeocr.sourceforge.net/filestore/filestore.php?cmd=serve&file=blob_1014261&contentType=image/png", width := 60, align := "absmiddle");
}

sS treeImg() {
  ret himg("http://eyeocr.sourceforge.net/filestore/filestore.php?cmd=serve&file=blob_1014260&contentType=image/jpeg");
}

sS topStuff() {
  ret h1(
    recordImg() + " " + ahref(myLink("/"), "Future Rootz Records", style := "color: black; text-decoration: none") + " " + recordImg(), style := "color: #e60000; font-size: 40px")
      + p(ahref(myLink("/artists"), "Artists") + " | " + ahref("/", "Booking") + " | "
      + ahref("/", "About us") + " | " + ahref("/", "Shop")
      + " | " + ahref("/", "Impressum"));
}