diff --git a/db/wal/compacting_wal_scanner.go b/db/wal/compacting_wal_scanner.go
new file mode 100644
index 00000000..d5a34089
--- /dev/null
+++ b/db/wal/compacting_wal_scanner.go
@@ -0,0 +1,147 @@
+package wal
+
+import (
+	"errors"
+	"io"
+	"sort"
+)
+
+var (
+	// ErrOpenTransaction is returned when the final frame in the WAL file is not a committing frame.
+	ErrOpenTransaction = errors.New("open transaction at end of WAL file")
+)
+
+type cFrame struct {
+	Pgno   uint32
+	Commit uint32
+	Offset int64
+}
+
+type cFrames []*cFrame
+
+// make cFrames sortable by offset.
+func (c cFrames) Len() int           { return len(c) }
+func (c cFrames) Less(i, j int) bool { return c[uint32(i)].Offset < c[uint32(j)].Offset }
+func (c cFrames) Swap(i, j int)      { c[uint32(i)], c[uint32(j)] = c[uint32(j)], c[uint32(i)] }
+
+// CompactingWALScanner implements WALIterator to iterate over frames in a WAL file.
+// It also compacts the WAL file, with Next() returning the last frame for each page. This Scanner
+// requires that the final frame in the WAL file is a committing frame. It will return an
+// error at creation time if this is not the case.
+type CompactingWALScanner struct {
+	readSeeker io.ReadSeeker
+	walReader  *Reader
+	header     *WALHeader
+
+	cIdx   int
+	frames cFrames
+}
+
+// NewCompactingWALScanner creates a new CompactingWALScanner with the given io.ReadSeeker.
+func NewCompactingWALScanner(r io.ReadSeeker) (*CompactingWALScanner, error) {
+	walReader := NewReader(r)
+	err := walReader.ReadHeader()
+	if err != nil {
+		return nil, err
+	}
+
+	hdr := &WALHeader{
+		Magic:     walReader.magic,
+		Version:   WALSupportedVersion,
+		PageSize:  walReader.PageSize(),
+		Seq:       walReader.seq,
+		Salt1:     walReader.salt1,
+		Salt2:     walReader.salt2,
+		Checksum1: walReader.chksum1,
+		Checksum2: walReader.chksum2,
+	}
+
+	s := &CompactingWALScanner{
+		readSeeker: r,
+		walReader:  walReader,
+		header:     hdr,
+	}
+	if err := s.scan(); err != nil {
+		return nil, err
+	}
+
+	return s, nil
+}
+
+// Header returns the header of the WAL file.
+func (c *CompactingWALScanner) Header() (*WALHeader, error) {
+	return c.header, nil
+}
+
+// Next reads the next frame from the WAL file.
+func (c *CompactingWALScanner) Next() (*Frame, error) {
+	if c.cIdx >= len(c.frames) {
+		return nil, io.EOF
+	}
+
+	frame := &Frame{
+		Pgno:   c.frames[c.cIdx].Pgno,
+		Commit: c.frames[c.cIdx].Commit,
+		Data:   make([]byte, c.header.PageSize),
+	}
+
+	if _, err := c.readSeeker.Seek(c.frames[c.cIdx].Offset, io.SeekStart); err != nil {
+		return nil, err
+	}
+	if _, err := io.ReadFull(c.readSeeker, frame.Data); err != nil {
+		return nil, err
+	}
+	c.cIdx++
+
+	return frame, nil
+}
+
+func (c *CompactingWALScanner) scan() error {
+	waitingForCommit := false
+	txFrames := make(map[uint32]*cFrame)
+	frames := make(map[uint32]*cFrame)
+	buf := make([]byte, c.header.PageSize)
+	for {
+		pgno, commit, err := c.walReader.ReadFrame(buf)
+		if err == io.EOF {
+			break
+		} else if err != nil {
+			return err
+		}
+		frame := &cFrame{
+			Pgno:   pgno,
+			Commit: commit,
+			Offset: c.walReader.Offset(),
+		}
+
+		// Save latest frame information for each page.
+		txFrames[pgno] = frame
+
+		// If this is not a committing frame, continue to next frame.
+		if commit == 0 {
+			waitingForCommit = true
+			continue
+		}
+		waitingForCommit = false
+
+		// At the end of each transaction, copy frame information to main map.
+		for k, v := range txFrames {
+			frames[k] = v
+		}
+		txFrames = make(map[uint32]*cFrame)
+	}
+
+	if waitingForCommit {
+		return ErrOpenTransaction
+	}
+
+	// Now we have the latest version of each frame. Next we need to sort
+	// them by offset so we return them in the correct order.
+	c.frames = make(cFrames, 0, len(frames))
+	for _, frame := range frames {
+		c.frames = append(c.frames, frame)
+	}
+	sort.Sort(c.frames)
+
+	return nil
+}
diff --git a/db/wal/full_wal_scanner.go b/db/wal/full_wal_scanner.go
index 83879b75..c8a3b4ea 100644
--- a/db/wal/full_wal_scanner.go
+++ b/db/wal/full_wal_scanner.go
@@ -20,7 +20,7 @@ func NewFullWALScanner(r io.Reader) (*FullWALScanner, error) {
 
 	hdr := &WALHeader{
 		Magic:     wr.magic,
-		Version:   3007000,
+		Version:   WALSupportedVersion,
 		PageSize:  wr.PageSize(),
 		Seq:       wr.seq,
 		Salt1:     wr.salt1,
@@ -35,6 +35,7 @@ func NewFullWALScanner(r io.Reader) (*FullWALScanner, error) {
 	}, nil
 }
 
+// Header returns the header of the WAL file.
 func (f *FullWALScanner) Header() (*WALHeader, error) {
 	return f.header, nil
 }
diff --git a/db/wal/reader.go b/db/wal/reader.go
index 9467cd8b..7189ba69 100644
--- a/db/wal/reader.go
+++ b/db/wal/reader.go
@@ -10,6 +10,8 @@ import (
 const (
 	WALHeaderSize      = 32
 	WALFrameHeaderSize = 24
+
+	WALSupportedVersion = 3007000
 )
 
 // Reader wraps an io.Reader and parses SQLite WAL frames.
@@ -81,7 +83,7 @@ func (r *Reader) ReadHeader() error {
 	}
 
 	// Verify version is correct.
-	if version := binary.BigEndian.Uint32(hdr[4:]); version != 3007000 {
+	if version := binary.BigEndian.Uint32(hdr[4:]); version != WALSupportedVersion {
 		return fmt.Errorf("unsupported wal version: %d", version)
 	}