module doc_reform.output.source_pod;
template DocReformPod() {
  import doc_reform.output;
  import
    std.digest.sha,
    std.file,
    std.outbuffer,
    std.zip,
    std.conv : to;
  import
    doc_reform.output.create_zip_file,
    doc_reform.output.xmls;
  void DocReformPod(T)(T doc_matters) {
    debug(asserts) {
      // static assert(is(typeof(doc_matters) == tuple));
    }
    mixin DocReformOutputRgxInit;
    string pwd = doc_matters.env.pwd;
    auto src_path_info = doc_matters.src_path_info;
    auto pth_dr_doc_src = doc_matters.src_path_info;
    auto pths_pod = DocReformPathsPods!()(doc_matters);
    mixin DocReformLanguageCodes;
    auto lang = Lang();
    static auto rgx = Rgx();
    assert (doc_matters.src.filename.match(rgx.src_fn));
    try {
      /+ create directory structure +/
      if (!exists(pths_pod.pod_dir_())) {
        // used both by pod zipped (& pod filesystem (unzipped) which makes its own recursive dirs)
        pths_pod.pod_dir_().mkdirRecurse;
      }
      if (doc_matters.opt.action.source) {
        if (!(doc_matters.opt.action.quiet)) {
          writeln(" ", pths_pod.fn_pod_filelist(doc_matters.src.filename).filesystem_open_zpod);
        }
        if (!exists(pths_pod.text_root(doc_matters.src.filename).filesystem_open_zpod)) {
          pths_pod.text_root(doc_matters.src.filename).filesystem_open_zpod.mkdirRecurse;
        }
        if (!exists(pths_pod.conf_root(doc_matters.src.filename).filesystem_open_zpod)) {
          pths_pod.conf_root(doc_matters.src.filename).filesystem_open_zpod.mkdirRecurse;
        }
        if (!exists(pths_pod.media_root(doc_matters.src.filename).filesystem_open_zpod)) {
          pths_pod.media_root(doc_matters.src.filename).filesystem_open_zpod.mkdirRecurse;
        }
        if (!exists(pths_pod.css(doc_matters.src.filename).filesystem_open_zpod)) {
          pths_pod.css(doc_matters.src.filename).filesystem_open_zpod.mkdirRecurse;
        }
        if (!exists(pths_pod.image_root(doc_matters.src.filename).filesystem_open_zpod)) {
          pths_pod.image_root(doc_matters.src.filename).filesystem_open_zpod.mkdirRecurse;
        }
        if (!exists(pths_pod.doc_lng(doc_matters.src.filename, doc_matters.src.language).filesystem_open_zpod)) {
          pths_pod.doc_lng(doc_matters.src.filename, doc_matters.src.language).filesystem_open_zpod.mkdirRecurse;
        }
      }
      debug(pod) {
        writeln(__LINE__, ": ",
          doc_matters.src.filename, " -> ",
          pths_pod.fn_doc(doc_matters.src.filename, doc_matters.src.language).filesystem_open_zpod
        );
      }
      auto zip = new ZipArchive();
      auto fn_pod = pths_pod.pod_filename(doc_matters.src.filename).zpod;
      { /+ bundle images +/
        foreach (image; doc_matters.srcs.image_list) {
          debug(podimages) {
            writeln(
              pth_dr_doc_src.image_root.to!string, "/", image, " -> ",
              pths_pod.image_root(doc_matters.src.filename).zpod, "/", image
            );
          }
          auto fn_src_in = doc_matters.src.image_dir_path ~ "/" ~ image;
          auto fn_src_out_pod_zip_base
            = pths_pod.image_root(doc_matters.src.filename).zpod.to!string
            ~ "/" ~ image;
          auto fn_src_out_filesystem
            = pths_pod.image_root(doc_matters.src.filename).filesystem_open_zpod.to!string
            ~ "/" ~ image;
          if (exists(fn_src_in)) {
            debug(io) {
              writeln("(io debug) src out found: ", fn_src_in);
            }
            if (doc_matters.opt.action.source) {
              fn_src_in.copy(fn_src_out_filesystem);
            }
            if (doc_matters.opt.action.pod) {
              auto zip_arc_member_file = new ArchiveMember();
              zip_arc_member_file.name = fn_src_out_pod_zip_base;
              auto zip_data = new OutBuffer();
              zip_data.write(cast(char[]) ((fn_src_in).read));
              zip_arc_member_file.expandedData = zip_data.toBytes();
              zip.addMember(zip_arc_member_file);
            }
          } else {
            if (doc_matters.opt.action.debug_do
            && doc_matters.opt.action.verbose) {
              writeln("WARNING (io) src out NOT found (image): ", fn_src_in);
            }
          }
        }
      } { /+ bundle dr_document_make +/
        auto fn_src_in = ((doc_matters.src.is_pod)
          ? doc_matters.src.conf_dir_path
          : pth_dr_doc_src.conf_root).to!string
          ~ "/" ~ "dr_document_make";
        auto fn_src_out_pod_zip_base
          = pths_pod.conf_root(doc_matters.src.filename).zpod.to!string ~ "/" ~ "dr_document_make";
        auto fn_src_out_filesystem
          = pths_pod.conf_root(doc_matters.src.filename).filesystem_open_zpod.to!string
          ~ "/" ~ "dr_document_make";
        if (exists(fn_src_in)) {
          debug(io) {
            writeln("(io debug) src out found: ", fn_src_in);
          }
          if (doc_matters.opt.action.source) {
            fn_src_in.copy(fn_src_out_filesystem);
          }
          if (doc_matters.opt.action.pod) {
            auto zip_arc_member_file = new ArchiveMember();
            zip_arc_member_file.name = fn_src_out_pod_zip_base;
            auto zip_data = new OutBuffer();
            zip_data.write((fn_src_in).readText);
            zip_arc_member_file.expandedData = zip_data.toBytes();
            zip.addMember(zip_arc_member_file);
          }
        } else {
          if (doc_matters.opt.action.debug_do
          && doc_matters.opt.action.verbose) {
            writeln("WARNING (io) src out NOT found (document make): ", fn_src_in);
          }
        }
      } { /+ pod manifest +/
        auto fn_src_in = doc_matters.src.file_with_absolute_path.to!string;
        auto fn_src_out_pod_zip_base
          = pths_pod.pod_manifest(doc_matters.src.filename).zpod.to!string;
        auto fn_src_out_filesystem
          = pths_pod.pod_manifest(doc_matters.src.filename).filesystem_open_zpod.to!string; // needed without root path
        auto fn_src_out_inside_pod
          = pths_pod.pod_manifest(doc_matters.src.filename).zpod.to!string; // needed without root path
        string[] filelist_src_out_pod_arr;
        string[] filelist_src_zpod_arr;
        if (exists(fn_src_in)) {
          debug(io) {
            writeln("(io debug) src in found: ", fn_src_in);
          }
          filelist_src_out_pod_arr ~= fn_src_out_pod_zip_base;
          filelist_src_zpod_arr ~= fn_src_out_inside_pod;
          {
            import dyaml;
            auto pod_filelist_yaml_string
              = File(pths_pod.fn_pod_filelist(doc_matters.src.filename).filesystem_open_zpod, "w");
            Node _pmy;
            string _pm = "doc:\n  filename: " ~ doc_matters.src.filename ~ "\n  language: " ~ doc_matters.pod.manifest_list_of_languages.to!string ~ "\n";
            if (doc_matters.opt.action.debug_do
            && doc_matters.opt.action.verbose) {
              _pmy = Loader.fromString(_pm).load();
              writeln("pod filename:  ", _pmy["doc"]["filename"].get!string);
              writeln("pod languages: ", doc_matters.pod.manifest_list_of_languages.to!string);
              writeln("pod languages: ", doc_matters.src.language);
              // foreach(string _l; _pmy["doc"]["language"]) {
              //   writeln("language:      ", _l);
              // }
            }
            if (doc_matters.opt.action.source) {
              pod_filelist_yaml_string.writeln(_pm);
            }
            if (doc_matters.opt.action.pod) {
              auto zip_arc_member_file = new ArchiveMember();
              zip_arc_member_file.name = fn_src_out_pod_zip_base;
              auto zip_data = new OutBuffer();
              zip_data.write(_pm);
              zip_arc_member_file.expandedData = zip_data.toBytes();
              zip.addMember(zip_arc_member_file);
            }
          }
        }
      } { /+ bundle primary file (.ssm/.sst) +/
        auto fn_src_in = doc_matters.src.file_with_absolute_path.to!string;
        auto fn_src_out_pod_zip_base
          = pths_pod.fn_doc(doc_matters.src.filename, doc_matters.src.language).zpod.to!string;
        auto fn_src_out_filesystem
          = pths_pod.fn_doc(doc_matters.src.filename, doc_matters.src.language).filesystem_open_zpod.to!string; // needed without root path:
        auto fn_src_out_inside_pod
          = pths_pod.fn_doc(doc_matters.src.filename, doc_matters.src.language).zpod.to!string; // needed without root path:
        string[] filelist_src_out_pod_arr;
        string[] filelist_src_zpod_arr;
        if (exists(fn_src_in)) {
          debug(io) {
            writeln("(io debug) src in found: ", fn_src_in);
          }
          filelist_src_out_pod_arr ~= fn_src_out_pod_zip_base;
          filelist_src_zpod_arr ~= fn_src_out_inside_pod;
          if (doc_matters.opt.action.pod) {
            auto zip_arc_member_file = new ArchiveMember();
            zip_arc_member_file.name = fn_src_out_pod_zip_base;
            auto zip_data = new OutBuffer();
            zip_data.write((fn_src_in).readText);
            zip_arc_member_file.expandedData = zip_data.toBytes();
            zip.addMember(zip_arc_member_file);
          }
        } else {
          if (doc_matters.opt.action.debug_do
          && doc_matters.opt.action.verbose) {
            writeln("WARNING (io) src in NOT found (markup source): ", fn_src_in);
          }
        }
      } { /+ bundle insert files (.ssi) +/
        if (doc_matters.srcs.file_insert_list.length > 0) {
          foreach (insert_file; doc_matters.srcs.file_insert_list) {
            debug(pod) {
              writeln(
                insert_file, " -> ",
                pths_pod.fn_doc_insert(
                  doc_matters.src.filename,
                  insert_file,
                  doc_matters.src.language,
                ).zpod
              );
            }
            auto fn_src_in = insert_file;
            auto fn_src_out_pod_zip_base
              = pths_pod.fn_doc_insert(
                doc_matters.src.filename,
                insert_file,
                doc_matters.src.language,
              ).zpod.to!string;
            auto fn_src_out_filesystem
              = pths_pod.fn_doc_insert(
                doc_matters.src.filename,
                insert_file,
                doc_matters.src.language,
              ).filesystem_open_zpod.to!string;
            if (exists(fn_src_in)) {
              debug(io) {
                writeln("(io debug) src out found: ", fn_src_in);
              }
              if (doc_matters.opt.action.source) {
                fn_src_in.copy(fn_src_out_filesystem);
              }
              if (doc_matters.opt.action.pod) {
                auto zip_arc_member_file = new ArchiveMember();
                zip_arc_member_file.name = fn_src_out_pod_zip_base;
                auto zip_data = new OutBuffer();
                zip_data.write((fn_src_in).readText);
                zip_arc_member_file.expandedData = zip_data.toBytes();
                zip.addMember(zip_arc_member_file);
                createZipFile!()(fn_pod, zip.build());
              }
            } else {
              if (doc_matters.opt.action.debug_do
              && doc_matters.opt.action.verbose) {
                writeln("WARNING (io) src out NOT found (insert file): ", fn_src_in);
              }
            }
          }
        }
      } {
        auto fn_src_in = doc_matters.src.filename;
        if (doc_matters.opt.action.pod) {
          if (exists(doc_matters.src.file_with_absolute_path)) {
            createZipFile!()(fn_pod, zip.build());
          } else {
            writeln("WARNING check missing source file(s): ", doc_matters.opt.action.pod);
          }
          if (!(exists(fn_pod))) {
            writeln("WARNING failed to create pod zip archive: ", fn_pod);
          }
        }
      }
      if (exists(fn_pod)) {
        try {
          if (!(doc_matters.opt.action.quiet)
          && doc_matters.opt.action.pod) {
            auto data = (cast(byte[]) (fn_pod).read);
            if (doc_matters.opt.action.verbose) {
              writeln(" ", doc_matters.src.filename, " > ");
            }
            writefln(" %s\n  %-(%02x%)", fn_pod, data.sha256Of);
          }
          debug(pod) {
            try {
              auto zipped = new ZipArchive((fn_pod).read);
              foreach (filename, member; zipped.directory) {
                auto data = zipped.expand(member);
                writeln("> ", filename, " length ", data.length);
              }
            } catch (ZipException ex) {
              // Handle errors
            }
            if (doc_matters.src.filename == "dr_doc/media/text/en/the_wealth_of_networks.yochai_benkler.sst") {
              assert(
                ((data).sha256Of).toHexString
                == "626F83A31ED82F42CF528E922C1643498A137ABA3F2E5AFF8A379EA79EA22A1E",
                "\npod: sha256 value for "
                ~ doc_matters.src.filename
                ~ " has changed, is now: "
                ~ ((data).sha256Of).toHexString
              );
            }
            if (doc_matters.src.filename == "dr_doc/media/text/en/sisu_markup_stress_test.sst") {
              assert(
                ((data).sha256Of).toHexString
                == "AAE0C87AB3F6D5F7385AEEA6EE661F56D40475CFE87AD930C78C9FE07FFB0D91",
                "\npod: sha256 value for "
                ~ doc_matters.src.filename
                ~ " has changed, is now: "
                ~ ((data).sha256Of).toHexString
              );
            }
          }
        } catch (ErrnoException ex) {
          // Handle errors
        }
      }
      
    } catch (ErrnoException ex) {
      // Handle error
    }
  }
}