Bibtex-bib-file-shortener is a project mainly written in ..., it's free.

This script takes as input a .tex file and finds all bibitems referenced. It then searches a referenced .bib file for those bibitems, pulls them out and makes a new .bib file with only those items. It also changes the .tex file to reference the new .