projects/mirror/retrospectiff.git
2 years agoexport tiff-image-color-map and tiff-image-min-is-white master
Cyrus Harmon [Mon, 14 Mar 2011 00:12:42 +0000] 
export tiff-image-color-map and tiff-image-min-is-white

2 years agoadd min-is-white slot to tiff-image and add initial support for 1-bit images
Cyrus Harmon [Sat, 12 Mar 2011 20:10:37 +0000] 
add min-is-white slot to tiff-image and add initial support for 1-bit images

2 years agoadd +color-map-tag+ and +photometric-interpretation-palette-color+
Cyrus Harmon [Sat, 12 Mar 2011 20:08:45 +0000] 
add +color-map-tag+ and +photometric-interpretation-palette-color+

2 years agoadd :initform nil to color-map and samples-per-pixel, reorganize read-grayscale-image
Cyrus Harmon [Sat, 12 Mar 2011 17:06:14 +0000] 
add :initform nil to color-map and samples-per-pixel, reorganize read-grayscale-image

2 years agoadd support for indexed TIFF images
Cyrus Harmon [Sat, 12 Mar 2011 16:29:52 +0000] 
add support for indexed TIFF images

2 years agoremove debugging prints and take &rest args in write-tiff-file (for :byte-order)
Cyrus Harmon [Thu, 10 Mar 2011 02:32:13 +0000] 
remove debugging prints and take &rest args in write-tiff-file (for :byte-order)

2 years agowrite 4-channel images as RGBA
Cyrus Harmon [Thu, 10 Mar 2011 02:15:15 +0000] 
write 4-channel images as RGBA

2 years agofirst (working) cut at TIFF writing
Cyrus Harmon [Thu, 10 Mar 2011 01:57:30 +0000] 
first (working) cut at TIFF writing

2 years agoprogress on TIFF writing:
Cyrus Harmon [Wed, 9 Mar 2011 21:41:42 +0000] 
progress on TIFF writing:

 * deal with the fact that ifd-entries are vectors

 * let bits-per-sample be a sequence or an integer

 * rework fixup-ifd-entries and ifd/ifd-entry stuff

 * fix argument ordering in some write-value calls

2 years agobegin work writing TIFF files
Cyrus Harmon [Wed, 9 Mar 2011 17:43:44 +0000] 
begin work writing TIFF files

 * *byte-order* defaults to :big-endian

 * added make-tiff-fields, comppute-rows-per-strip, write-tiff-stream, etc...

2 years agostarting to clean up the retrospectiff test images and code
Cyrus Harmon [Mon, 14 Feb 2011 01:12:45 +0000] 
starting to clean up the retrospectiff test images and code

2 years agopackbits now deals with the unsigned bytes coming from the TIFF parser
Cyrus Harmon [Fri, 4 Feb 2011 17:03:24 +0000] 
packbits now deals with the unsigned bytes coming from the TIFF parser

 * the TIFF spec says that the samples are BYTEs (or SHORTs or LONGs)
   which are all unsigned quantities, yet packbits works with signed
   integers. I'm guessing that Adobe wants us to treat these unsigned
   integers as signed integers, so that's what we'll do. There's a
   slight penalty to getting these values as unsigned integers, and
   then converting them to signed integers, but that's cleaner than
   getting the TIFF parser to change the type of the samples based on
   the encoding.

2 years agoadd +no-compression+ constant and cleanup code a little bit
Cyrus Harmon [Fri, 4 Feb 2011 16:13:29 +0000] 
add +no-compression+ constant and cleanup code a little bit

 * remove some gratuitous whitespace

 * add a declare ignore for some stuff that isn't implemented yet

2 years agoremove optimize debug declarations
Cyrus Harmon [Fri, 4 Feb 2011 08:02:43 +0000] 
remove optimize debug declarations

2 years agoNew retrospectiff that uses Peter Siebel's binary-data package
Cyrus Harmon [Fri, 4 Feb 2011 07:57:23 +0000] 
New retrospectiff that uses Peter Siebel's binary-data package

 * grayscale and RGB TIFF image reading works, but writing is not implemented yet.

2 years agoadd rgb image data loading -- last commit before turning retrospectiff2 back into...
Cyrus Harmon [Fri, 4 Feb 2011 07:44:14 +0000] 
add rgb image data loading -- last commit before turning retrospectiff2 back into retrospectiff

2 years agostart populating tiff-image from the TIFF IFD
Cyrus Harmon [Fri, 4 Feb 2011 07:27:59 +0000] 
start populating tiff-image from the TIFF IFD

 * return a tiff-image

 * tiff -> tiff-fields

 * temporary copies of the constants until the old things get replaced...

2 years agoremove no-longer-needed inline-array and non-inline-array types
Cyrus Harmon [Fri, 4 Feb 2011 06:48:52 +0000] 
remove no-longer-needed inline-array and non-inline-array types

2 years agosupport for the rest of the TIFF data types
Cyrus Harmon [Fri, 4 Feb 2011 06:37:05 +0000] 
support for the rest of the TIFF data types

 * shadow rational, numerator, denominator

 * add u8*, s1*, s2* and s4* types, along with the generally machinery for signed values

 * add f4* and f8* types

 * add array types for the various primitives, and *binary-type-sizes*

 * add ifd-array binary type and use it for all of the array types

2 years agouse element-type for inline-array to, and accept an (ignored) position argument
Cyrus Harmon [Fri, 4 Feb 2011 01:21:50 +0000] 
use element-type for inline-array to, and accept an (ignored) position argument

2 years agofix up non-inline-array binary type and use it for shorts, removing old cruft
Cyrus Harmon [Fri, 4 Feb 2011 01:17:11 +0000] 
fix up non-inline-array binary type and use it for shorts, removing old cruft

2 years agomore retrospectiff2 parsing WIP
Cyrus Harmon [Fri, 4 Feb 2011 00:55:18 +0000] 
more retrospectiff2 parsing WIP

2 years agoupdate asdf for retrospectiff2
Cyrus Harmon [Thu, 3 Feb 2011 21:59:06 +0000] 
update asdf for retrospectiff2

2 years agoMerge branch 'master' into retrospectiff2
Cyrus Harmon [Thu, 3 Feb 2011 21:58:18 +0000] 
Merge branch 'master' into retrospectiff2

2 years agoremove premature depends-on com.gigamonkeys.binary-data
Cyrus Harmon [Thu, 3 Feb 2011 21:57:35 +0000] 
remove premature depends-on com.gigamonkeys.binary-data

2 years agoinitial work on the new parser
Cyrus Harmon [Thu, 3 Feb 2011 21:51:35 +0000] 
initial work on the new parser

2 years agoMerge branch 'master' of git+ssh://git.cyrusharmon.org/pub/git/retrospectiff
Cyrus Harmon [Thu, 3 Feb 2011 21:49:46 +0000] 
Merge branch 'master' of git+ssh://git.cyrusharmon.org/pub/git/retrospectiff

Conflicts:
retrospectiff.asd

2 years agoadd constants.lisp
Cyrus Harmon [Thu, 3 Feb 2011 21:47:03 +0000] 
add constants.lisp

2 years agosupport for 16-bit RGB images, making retrospectiff play nicer with other libraries
Cyrus Harmon [Thu, 3 Feb 2011 21:46:26 +0000] 
support for 16-bit RGB images, making retrospectiff play nicer with other libraries

 * export write-tiff-* functions

 * export tiff-image-bits-per-sample and tiff-image-byte-order

 * remove version.lisp-expr

 * serialize asdf

 * move constants to constants.lisp

 * start working on byte order

 * fix bugs for 16-bit RGB images

3 years agoremove version.lisp-expr
Cyrus Harmon [Fri, 11 Jun 2010 21:24:26 +0000] 
remove version.lisp-expr

4 years agoadding scratch file
Cyrus Harmon [Sat, 13 Jun 2009 19:13:32 +0000] 
adding scratch file

4 years agowrite-tiff-file is now a function instead of a macro.
Cyrus Harmon [Thu, 30 Apr 2009 05:35:35 +0000] 
write-tiff-file is now a function instead of a macro.
 * with a hard-coded :if-exists :supersede

4 years agocleaned up read-image. don't need to check for vector anymore.
Cyrus Harmon [Wed, 29 Apr 2009 22:49:04 +0000] 
cleaned up read-image. don't need to check for vector anymore.

4 years agosupport for grayscale image I/O
Cyrus Harmon [Wed, 29 Apr 2009 22:46:06 +0000] 
support for grayscale image I/O

 * added ensure-list and ensure-vector

 * moved tiff-image class definition

 * gross cut-and-paste job for grayscale file I/O

 * fixed read-field-shorts when there was only one short to read (only
   return one short)

 * write-tiff-stream now calls write-tiff-grayscale-stream or
   write-tiff-rgb-stream as appropriate.

 * removed debug declarations

4 years agouse :element-type '(unsigned-byte 8) instead of :default to make ccl happy.
Cyrus Harmon [Mon, 1 Dec 2008 16:50:48 +0000] 
use :element-type '(unsigned-byte 8) instead of :default to make ccl happy.

4 years agorevert previous bogus package change.
Cyrus Harmon [Thu, 6 Nov 2008 15:02:45 +0000] 
revert previous bogus package change.

4 years agoexport image-width, image-length and image-data
Cyrus Harmon [Thu, 6 Nov 2008 14:59:39 +0000] 
export image-width, image-length and image-data

4 years agochange the order of the args to write-tiff-file to keep ch-image happy.
Cyrus Harmon [Thu, 6 Nov 2008 14:58:07 +0000] 
change the order of the args to write-tiff-file to keep ch-image happy.

4 years agoclean up write-tiff-stream a bit.
Cyrus Harmon [Thu, 6 Nov 2008 06:47:47 +0000] 
clean up write-tiff-stream a bit.

4 years agoupdate README. add copyright notices to source files.
Cyrus Harmon [Thu, 6 Nov 2008 06:12:49 +0000] 
update README. add copyright notices to source files.
delete unused (and empty) make-ifd-entry function.

4 years agobump version to 0.0.2 retrospectiff-0.0.2
Cyrus Harmon [Thu, 6 Nov 2008 05:24:43 +0000] 
bump version to 0.0.2

4 years agofirst pass at TIFF writing. only works with ARGB files for now.
Cyrus Harmon [Thu, 6 Nov 2008 05:24:25 +0000] 
first pass at TIFF writing. only works with ARGB files for now.

4 years agofix in-progress partial setf form that was keeping us from compiling.
Cyrus Harmon [Wed, 5 Nov 2008 19:03:05 +0000] 
fix in-progress partial setf form that was keeping us from compiling.

4 years agofix constant typos.
Cyrus Harmon [Wed, 5 Nov 2008 19:00:06 +0000] 
fix constant typos.
add field-length function.
add vectorize and listize utility functions.
added read-signed-bytes.
added write-int-{16,32}-sequence functions.
read-field-bytes and read-field-shorts now always return vectors.
ifd-entry-values -> get-ifd-entry-values
get-ifd-value now works on both lists and arrays.
added preliminary (untested) packbits reading support.
added bits-per-sample slot to tiff-image.
started working on tiff writing. much more to do here.

4 years agoadd packbits.lisp and add this to the asdf definition.
Cyrus Harmon [Wed, 5 Nov 2008 18:57:14 +0000] 
add packbits.lisp and add this to the asdf definition.

4 years agomove ensure-array-size-and-set-fill-pointer to util.lisp.
Cyrus Harmon [Wed, 5 Nov 2008 18:56:21 +0000] 
move ensure-array-size-and-set-fill-pointer to util.lisp.

4 years agoupdate COPYRIGHT and README.
Cyrus Harmon [Fri, 31 Oct 2008 15:52:23 +0000] 
update COPYRIGHT and README.

4 years agomove images to images directory
Cyrus Harmon [Fri, 31 Oct 2008 03:30:23 +0000] 
move images to images directory

4 years agobump version to 0.0.1
Cyrus Harmon [Thu, 30 Oct 2008 19:56:50 +0000] 
bump version to 0.0.1

4 years ago* eval-when constants so that we can use them in case constructs
Cyrus Harmon [Thu, 30 Oct 2008 19:56:25 +0000] 
* eval-when constants so that we can use them in case constructs
* remove cruft
* null checks in get-ifd-values and get-ifd-value
* fix bug where we weren't reading enough data in lzw images
* add horizontal-differencing support
* move {string,vector}-contents-of-{stream/file} to util.lisp
*

4 years agobug fixes to get the lzw corner cases right. works on >200k file now.
Cyrus Harmon [Thu, 30 Oct 2008 05:00:34 +0000] 
bug fixes to get the lzw corner cases right. works on >200k file now.

4 years agoadding first cut at lzw compression
Cyrus Harmon [Wed, 29 Oct 2008 04:41:37 +0000] 
adding first cut at lzw compression

4 years agoFix two off-by-one remainder errors where we were getting 0 instead 8
Cyrus Harmon [Tue, 28 Oct 2008 16:44:30 +0000] 
Fix two off-by-one remainder errors where we were getting 0 instead 8
and not writing/reading anything.
Remove declare optimize debug.

4 years agofirst working version of the bit-array for use with lzw.
Cyrus Harmon [Mon, 27 Oct 2008 18:31:54 +0000] 
first working version of the bit-array for use with lzw.

4 years agoadd tiff-image class
Cyrus Harmon [Fri, 24 Oct 2008 07:37:56 +0000] 
add tiff-image class
move somethings around
export some symbols

4 years agocl-tiff -> retrospectiff
Cyrus Harmon [Fri, 24 Oct 2008 05:18:30 +0000] 
cl-tiff -> retrospectiff

4 years agofirst working-ish version. works for uncompressed 8-bit RGB images anyway.
Cyrus Harmon [Fri, 24 Oct 2008 01:47:54 +0000] 
first working-ish version. works for uncompressed 8-bit RGB images anyway.

4 years agogenesis
Cyrus Harmon [Thu, 23 Oct 2008 18:41:28 +0000] 
genesis