public static void vizServerHandler(edu.isi.webtools.http.HttpExchange xchg) {
    if (!(OntosaurusUtil.vizServerAvailableP())) {
      edu.isi.webtools.http.HttpExchange.generateErrorResponse(xchg, OntosaurusUtil.KWD_NOT_IMPLEMENTED, "Graphing not supported, program `" + OntosaurusUtil.$VIZ_DOT_PROGRAM$ + "' not found");
      return;
    }
    { Cons keys = edu.isi.webtools.http.Http.parseAndDecodeUrlArguments(edu.isi.webtools.http.HttpExchange.getRequestUriQuery(xchg), '+');

      if (keys.length() < 4) {
        OntosaurusUtil.doActionHandler(xchg);
      }
      { StringWrapper action = ((StringWrapper)(keys.value));
        StringWrapper objecttype = ((StringWrapper)(keys.rest.value));
        StringWrapper modulename = ((StringWrapper)(keys.rest.rest.value));
        StringWrapper objectname = ((StringWrapper)(keys.fourth()));
        org.powerloom.PrintableStringWriter stream = edu.isi.webtools.http.HttpExchange.getReplyStream(xchg);
        Module module = edu.isi.powerloom.PLI.getModule(modulename.wrapperValue, null);
        Stella_Object visualizedobject = null;
        boolean generatemapP = OntosaurusUtil.$VIZ_SERVER_IMAGE_MAPS_ENABLEDp$ &&
            Stella_Object.eqlToStringP(action, "graph");

        if (module == null) {
          OntosaurusUtil.htmlUnknownObjectResponse(OntosaurusUtil.KWD_CONTEXT, modulename.wrapperValue, stream);
          return;
        }
        { String testValue000 = objecttype.wrapperValue;

          if (Stella.stringEqlP(testValue000, "context")) {
            visualizedobject = module;
          }
          else if (Stella.stringEqlP(testValue000, "relation") ||
              Stella.stringEqlP(testValue000, "concept")) {
            visualizedobject = edu.isi.powerloom.PLI.getRelation(objectname.wrapperValue, module, null);
          }
          else {
            edu.isi.webtools.http.HttpExchange.generateErrorResponse(xchg, OntosaurusUtil.KWD_BAD_REQUEST, "Malformed URL, graph of type `" + objecttype.wrapperValue + "' is not supported.");
            return;
          }
        }
        if (visualizedobject == null) {
          OntosaurusUtil.htmlUnknownObjectResponse(((module == null) ? OntosaurusUtil.KWD_CONTEXT : OntosaurusUtil.KWD_RELATION), ((module == null) ? modulename.wrapperValue : objectname.wrapperValue), stream);
          return;
        }
        if (generatemapP) {
          OntosaurusUtil.vizServerServeImagePlusMap(xchg, visualizedobject, module);
        }
        else {
          OntosaurusUtil.vizServerServeImage(xchg, visualizedobject, module);
        }
      }
    }
  }