Scaffolding for extended JSON outputs

Changes

@@ -4,6 +4,9 @@ New features:
 
 o Split files to max size with -split-max
 o Spray splits a file to multiple outputs by alternating pages
+o List document and page info in JSON format
+o List page labels in JSON format
+o List fonts in JSON format
 
 Extended features:
 

cpdfcommand.ml

@@ -1154,6 +1154,22 @@ let setaddbookmarksjson s =
   setop (AddBookmarks s) ();
   args.format_json <- true
 
+let setlistfontsjson () =
+  setop Fonts ();
+  args.format_json <- true
+
+let setinfojson () =
+  setop Info ();
+  args.format_json <- true
+
+let setpageinfojson () =
+  setop PageInfo ();
+  args.format_json <- true
+
+let setprintpagelabelsjson () =
+  setop PrintPageLabels ();
+  args.format_json <- true
+
 let setlistbookmarksjson () =
   setop ListBookmarks ();
   args.format_json <- true
@@ -2328,12 +2344,21 @@ and specs =
    ("-list-fonts",
        Arg.Unit (setop Fonts),
        " Output font list");
+   ("-list-fonts-json",
+       Arg.Unit setlistfontsjson,
+       " Output font list in JSON format");
    ("-info",
        Arg.Unit (setop Info),
        " Output file information");
+   ("-info-json",
+       Arg.Unit setinfojson,
+       " Output file information in JSON format");
    ("-page-info",
        Arg.Unit (setop PageInfo),
        " Output page information");
+   ("-page-info-json",
+       Arg.Unit setpageinfojson,
+       " Output page information in JSON format");
    ("-set-author",
        Arg.String setauthor,
        " Set Author");
@@ -2499,6 +2524,9 @@ and specs =
    ("-print-page-labels",
       Arg.Unit (setop PrintPageLabels),
       " Print page labels");
+   ("-print-page-labels-json",
+      Arg.Unit setprintpagelabelsjson,
+      " Print page labels in JSON format");
    ("-remove-page-labels",
       Arg.Unit (setop RemovePageLabels),
       " Remove page labels");

cpdfmanual.tex

@@ -1,5 +1,6 @@
 %Document -split-max
 %Document -spray
+%Document -info-json, -page-info-json, -page-labels-json, -list-fonts-json
 \documentclass{book}
 % Edit here to produce cpdfmanual.pdf, cpdflibmanual.pdf, pycpdfmanual.pdf,
 % dotnetcpdflibmanual.pdf, jcpdflibmanual.pdf jscpdflibmanual.pdf etc.