Fossil

    Blob content;
    if( zName[0]==0 ){
      zError = "be an empty string";
    }else if( contains_whitespace(zName) ){
      zError = "contain spaces";
    }
    if( zError ){
      fossil_fatal("Unversioned filenames may not %s: %Q",
                   zError, zName);
    }
    unversioned_schema();
    db_begin_transaction();
    content_rcvid_init("#!fossil /uvlist upload");
    blob_init(&content, aContent, nContent);
    unversioned_write(zName, &content, time(0));
    blob_reset(&content);
    db_end_transaction(0);
    CX("<div>Added: %s</div>", zName);
  }
  form_begin("enctype='multipart/form-data'", "%R/uvlist");
  CX("<label for='uvupload'>Upload unversioned file:</label>");
  CX("<input type='file' id='uvupload' name='f'/>");
  CX("<input type='submit' value='Upload'/>");
  CX("</form>");
}