pdf-read: Read and render PDF files
pdf-read: Read and render PDF files
1Examples
2PDF files
pdf-document?
open-pdf-uri
pdf-page?
pdf-page
3Rendering
page->pict
page->bitmap
page-render-to-dc!
page-render-to-cairo!
4Layout
page-size
page-crop-box
page-text-in-rect
page-text
page-text-layout
page-text-with-layout
5Searching
page-find-text
6Metadata
pdf-count-pages
pdf-title
pdf-author
pdf-subject
pdf-keywords
pdf-creator
pdf-producer
page-label
7Bugs and Issues
9.0
top ← prev up next →

pdf-read: Read and render PDF filesπŸ”— i

gcr, based on code by Jens Axel Søgaard

(require pdf-read ) package: pdf-read
This library lets Racket render PDF files. You can also gather information about the text or layout.
This requires libpoppler, and thus likely only works on Linux or Mac OSX. Windows might work if you insctall Poppler, but I can’t make promises.

1ExamplesπŸ”— i

Showing a PDF as a pict is as easy as you’d expect:
#lang racket
(require slideshow/pict
pdf-read)
 
(show-pict (page->pict "oopsla04-gff.pdf"))

By default, page->pict shows the first page of the given PDF filename. You can also say something like (show-pict (page->pict (pdf-page "oopsla04-gff.pdf"5))) to show the 6th page (pages are zero-indexed).

You can also search for text. This snippet searches for every occurance of the word "the" and overlays a yellow rectangle on each:
;;ThefirstpageofaPDFfile.(Pagesarezero-indexed)
(define page(pdf-page "oopsla04-gff.pdf"0))
 
;;OverlayeachboxoverthePDF.
(for/fold ([pageview(page->pict page)])
([bounding-box(in-list (page-find-text page"the"))])
(match-define (list x1y1x2y2)bounding-box)
;;Eachmatch'sboundingbox^
(pin-over pageviewx1y1
(cellophane
(colorize (filled-rectangle (- x2x1)(- y2y1))"yellow")
0.5)))

Finally, for low-level layout control, you can gather the bounding box geometry for each letter on the page. This snippet outlines each letter’s bounding box.
(define page(pdf-page "oopsla04-gff.pdf"0))
(for/fold ([pageview(apply blank (page-size page))])
([box (in-list (page-text-layout page))])
(match-define (list x1y1x2y2)box )
(pin-over pageviewx1y1
(colorize (rectangle (- x2x1)(- y2y1))
"gray")))

Note that page->pict does not convert the file to a bitmap. You can rotate, scale, or transform the resulting pict however you like without losing quality.
(rotate
(frame (scale (inset/clip (page->pict page)-400-300-100-400)5))
(* 0.125pi ))

If you want to coerce the result to a bitmap for speed, you can do that as well:
(rotate
(frame (scale (inset/clip (bitmap (page->bitmap page))
-400-300-100-400)
5))
(* 0.125pi ))

2PDF filesπŸ”— i

All functions that accept pages or documents also accept filenames. This is more convenient for you, but it is also less efficient because the document must be re-opened every time. You can make this faster by keeping the result of pdf-page or open-pdf-uri to ensure that this library only opens the document once.

procedure

( pdf-document? maybe-doc)→boolean?

maybe-doc:any/c
Returns #t if maybe-doc is a PDF document. This can be a string (filename) or the result of open-pdf-uri .

procedure

( open-pdf-uri uripassword)→(or/c pdf-document? false? )

uri:string?
password:(or/c string? false? )
Opens the given PDF file with the given uri and the given password. The password may be #f if the document does not have a password. The uri is usually something like "file:/tmp/test.pdf"; anything libpoppler accepts. Don’t forget the file: at the beginning for local documents!

This function will throw an error if the PDF file does not exist.

For example, if you wish to show the tenth page from an encrypted document, use:
(define document(open-pdf-uri "file:/tmp/secret.pdf""some_password"))
(define page(pdf-page document9))
(show-pict (page->pict page))
As a shortcut, (page->pict "/tmp/filename.pdf") is a shortcut for
(page->pict (pdf-page (open-pdf-uri "file:/tmp/filename.pdf"#f)0))
Most of these functinos honor shortcuts like this.

procedure

( pdf-page? maybe-page)→boolean?

maybe-page:any/c
Returns true if maybe-page is a page. Pages can be filenames (in which case the first page of the document will be used), pdf-document? s, or the result of pdf-page .

procedure

( pdf-page maybe-docpage-index)→pdf-page?

maybe-doc:pdf-document?
page-index:exact-nonnegative-integer?
Opens the page-indexth page in maybe-doc. Pages are zero-indexed, so if you want the third page of "/tmp/oopsla04-gff.pdf", for example, use:

(pdf-page "/tmp/oopsla04-gff.pdf"2)

3RenderingπŸ”— i

procedure

( page->pict page)→pict?

page:pdf-page?
Renders the given page to a pict from Racket’s slideshow/pict library. This pict can be transformed any way you like without rasterization.

procedure

( page->bitmap page)→(is-a?/c bitmap% )

page:pdf-page?
Renders the page at 72 DPI to a bitmap% .

procedure

( page-render-to-dc! pagedc)→any/c

page:pdf-page?
dc:(is-a?/c dc<%> )
Renders the given page to the given dc<%> context. This only works if dc is backed by Cairo and the moons are aligned properly.

procedure

( page-render-to-cairo! page_cairo_t)→any/c

page:pdf-page?
_cairo_t:any/c
Render the given page to the given _cairo_t Cairo context with the current transformation.

4LayoutπŸ”— i

procedure

( page-size page) →
(list/c (and/c real? (not/c negative? ))
(and/c real? (not/c negative? )))
page:pdf-page?
Returns the width and height of page, in points (1/72 of an inch).

Returns the rectangle of page’s crop box.

Each rectangle is a (list x1y1x2y2), where x1,y1 is the top left corner and x2,y2 is the bottom right. Coordinates are in points (1/72 of an inch).

procedure

( page-text-in-rect pagemodex1y1x2y2)→string?

page:pdf-page?
mode:(one-of/c 'glyph'word'line)
x1:(and/c inexact? (not/c negative? ))
y1:(and/c inexact? (not/c negative? ))
x2:(and/c inexact? (not/c negative? ))
y2:(and/c inexact? (not/c negative? ))
Returns the string inside the given selection bounding box. If mode is 'glyph, the closest-matching characters are returned; if mode is 'word, the returned string will be the words lying in the rectangle; if mode is 'line, an entire line of text will be returned.

When specifying the rectangle, x1,y1 should be the point of the beginning of the selection and x2,y2 should be the end. Coordinates are in points (1/72 of an inch).

procedure

( page-text page)→string?

page:pdf-page?
Returns all the text in page as a string.

Returns bounding boxes for each of the letters in page. The poppler documentation says that the Nth character in (page-text page) should correspond with the Nth bounding box, but this may or may not be accurate.

Each bounding box is a (list x1y1x2y2), where x1,y1 is the top left corner and x2,y2 is the bottom right. Coordinates are in points (1/72 of an inch).

Returns each letter in the document along with its bounding box for each of the letters in page. Note that each letter’s string may be longer than one letter, and it often includes newlines.

Each bounding box is a (list x1y1x2y2), where x1,y1 is the top left corner and x2,y2 is the bottom right. Coordinates are in points (1/72 of an inch).

For example,
(take (page-text-with-layout "oopsla04-gff.pdf")5)
will return the bounding boxes of the first five letters on the first page of "oopsla04-gff.pdf", namely:
' (("S\n"(150.73871.302162.69987.890))
("u\n"(162.69971.302173.65687.890))
("p\n"(173.65671.302184.61387.890))
("e\n"(184.61371.302194.58487.890))
("r\n"(194.58471.302201.56087.890)))

5SearchingπŸ”— i

Searches for the given text on page. This is a case-insensitive search. Returns a list of rectangles. Each rectangle is a (list x1y1x2y2), where x1,y1 is the top left corner and x2,y2 is the bottom right. Coordinates are in points (1/72 of an inch).

6MetadataπŸ”— i

Returns the number of pages in doc.

Returns metadata about doc.

procedure

( page-label page)→(or/c false? string? )

page:pdf-page?
Returns the page’s "label", which is often a numeral like "1" or "2", but it may be a Roman numeral like "xii" for certain sections of the PDF. It may even be some other exotic name like "Table of Contents".

7Bugs and IssuesπŸ”— i

Note that page->pict draws directly to the underlying surface’s cairo context. This may have problems if the dc<%> is not backed by cairo or if you perform different transformations (like cropping or blurring).

top ← prev up next →

AltStyle γ«γ‚ˆγ£γ¦ε€‰ζ›γ•γ‚ŒγŸγƒšγƒΌγ‚Έ (->γ‚ͺγƒͺγ‚ΈγƒŠγƒ«) /