diff options
author | Jay Berkenbilt <ejb@ql.org> | 2009-10-24 15:23:20 +0200 |
---|---|---|
committer | Jay Berkenbilt <ejb@ql.org> | 2009-10-24 15:23:20 +0200 |
commit | a80d9d176d069a5b70427fa0154b7c333550a047 (patch) | |
tree | 59662db9af7fe6854c041f2dd0f22f2f01014238 /qpdf | |
parent | 9cc43c6e44fa899acc84341899cb41b359d245b4 (diff) | |
download | qpdf-a80d9d176d069a5b70427fa0154b7c333550a047.tar.zst |
add C interface for getting software version
git-svn-id: svn+q:///qpdf/trunk@903 71b93d88-0707-0410-a8cf-f5a4172ac649
Diffstat (limited to 'qpdf')
-rw-r--r-- | qpdf/qpdf-ctest.c | 6 | ||||
-rw-r--r-- | qpdf/qpdf.testcov | 1 | ||||
-rw-r--r-- | qpdf/qtest/qpdf.test | 7 |
3 files changed, 13 insertions, 1 deletions
diff --git a/qpdf/qpdf-ctest.c b/qpdf/qpdf-ctest.c index ef839c31..30e7af2f 100644 --- a/qpdf/qpdf-ctest.c +++ b/qpdf/qpdf-ctest.c @@ -292,6 +292,12 @@ int main(int argc, char* argv[]) { whoami = argv[0]; } + if ((argc == 2) && (strcmp(argv[1], "--version") == 0)) + { + printf("qpdf-ctest version %s\n", qpdf_get_qpdf_version()); + return 0; + } + if (argc < 5) { fprintf(stderr, "usage: %s n infile password outfile\n", whoami); diff --git a/qpdf/qpdf.testcov b/qpdf/qpdf.testcov index 4d4c537a..54f22f1a 100644 --- a/qpdf/qpdf.testcov +++ b/qpdf/qpdf.testcov @@ -173,3 +173,4 @@ QPDF_encryption stream crypt filter 0 QPDF ERR object stream with wrong type 0 QPDF object gone after xref reconstruction 0 qpdf-c called qpdf_has_error 0 +qpdf-c called qpdf_get_qpdf_version 0 diff --git a/qpdf/qtest/qpdf.test b/qpdf/qtest/qpdf.test index 6a2fa5de..05e6c7ed 100644 --- a/qpdf/qtest/qpdf.test +++ b/qpdf/qtest/qpdf.test @@ -81,12 +81,17 @@ flush_tiff_cache(); show_ntests(); # ---------- $td->notify("--- Miscellaneous Tests ---"); -$n_tests += 15; +$n_tests += 16; $td->runtest("qpdf version", {$td->COMMAND => "qpdf --version"}, {$td->REGEXP => "qpdf version \\S+\n.*", $td->EXIT_STATUS => 0}, $td->NORMALIZE_NEWLINES); +$td->runtest("C API: qpdf version", + {$td->COMMAND => "qpdf-ctest --version"}, + {$td->REGEXP => "qpdf-ctest version \\S+\n", + $td->EXIT_STATUS => 0}, + $td->NORMALIZE_NEWLINES); foreach (my $i = 1; $i <= 3; ++$i) { |