The Perl Toolchain Summit needs more sponsors. If your company depends on Perl, please support this very important event.

NAME

Catalyst::Controller::SimpleCAS - General-purpose content-addressed storage (CAS) for Catalyst

SYNOPSIS

 use Catalyst::Controller::SimpleCAS;
 ...

DESCRIPTION

This controller provides a simple content-addressed storage backend for Catalyst applications.

This module was originally developed within RapidApp before being extracted into its own module. This is a preliminary version which matches what was in RapidApp (and is still rough around the edges, poor test coverage, incomplete docs, etc). Subsequent versions will be polished better, as well as have API changes and improvements...

Other than for RapidApp itself, it is not suggested that this module be used yet in production...

ATTRIBUTES

store_class

Object class to use for the Store backend. Defaults to Catalyst::Controller::SimpleCAS::Store::File

store_path

Directory/path to be used by the Store. Defaults to cas_store within the Catalyst home directory.

Store

Actual object instance of the Store. By default this object is built using the store_class (by calling new()) with the store_path supplied to the constructor.

PUBLIC ACTIONS

upload_content

Upload new content to the CAS and return the sha1 checksum in the body to be able to access it later. Because of the CAS design, the system automatically deduplicates, and will only ever store a single copy of a given unique piece of content in the Store.

fetch_content

Fetch existing content from the CAS according its sha1 checksum.

Example:

  GET /simplecas/fetch_content/fdb379f7e9c8d0a1fcd3b5ee4233d88c5a4a023e

The system attempts to identify the content type and sets the MIME type accordingly. Additionally, an optional filename argument can be also be supplied in the URL

  GET /simplecas/fetch_content/fdb379f7e9c8d0a1fcd3b5ee4233d88c5a4a023e/somefile.txt

The main reason this is supported is simply for more human-friendly URLs. The name is not stored or validated in any way. If supplied, this does nothing other than being used to set the content-disposition:

  Content-Disposition: attachment; filename="somefile.txt"

When there is no filename second arg supplied, the content-disposition is set like this:

  Content-Disposition: inline;filename="fdb379f7e9c8d0a1fcd3b5ee4233d88c5a4a023e"

upload_file

Works like upload_content, but returns a JSON packet with additional metadata/information in the body.

upload_image

Works like upload_file, but with some image-specific functionality, including client-supplied max width and height values supplied as the first and second args, respectively. For example, a POST upload with Filedata containing an image, and declared max size of 800x600 uses a URL like:

  POST /simplecas/upload_image/800/600

When the image is larger than the max width or height, if the optional dependency Image::Resize is available (which requires GD) it is used to resize the image, preserving height/width proportions accordingly, and the new, resized image is what is stored in the CAS. Otherwise, the image is not resized, but resized dimensions are returned in the JSON packet so the client can generate an img tag for display.

Originally, Image::Resize was a standard dependency, but this can be a PITA to get installed with all of the dependencies of GD.

upload_echo_base64

This does nothing but accept a standard POST/Filedata upload and return it as base64 in a JSON packet within the JSON/object key echo_content.

METHODS

Content

Not usually called directly

add_resize_image

Not usually called directly

add_size_info_image

Not usually called directly

safe_filename

Not usually called directly

uri_find_Content

Not usually called directly

SEE ALSO

AUTHOR

Henry Van Styn <vanstyn@cpan.org>

COPYRIGHT AND LICENSE

This software is copyright (c) 2014 by IntelliTree Solutions llc.

This is free software; you can redistribute it and/or modify it under the same terms as the Perl 5 programming language system itself.