YUI::Loader - Load (and cache) the Yahoo JavaScript YUI framework

YUI-Loader documentation Contained in the YUI-Loader distribution.

Index

Code Index:

NAME

Top

YUI::Loader - Load (and cache) the Yahoo JavaScript YUI framework

VERSION

Top

version 0.071

SYNOPSIS

Top

    use YUI::Loader;

    my $loader = YUI::Loader->new_from_yui_host;
    $loader->include->yuitest->reset->fonts->base;
    print $loader->html;

    # The above will yield:
    # <link rel="stylesheet" href="http://yui.yahooapis.com/2.5.1/build/reset/reset.css" type="text/css"/>
    # <link rel="stylesheet" href="http://yui.yahooapis.com/2.5.1/build/fonts/fonts.css" type="text/css"/>
    # <link rel="stylesheet" href="http://yui.yahooapis.com/2.5.1/build/base/base.css" type="text/css"/>
    # <script src="http://yui.yahooapis.com/2.5.1/build/yahoo/yahoo.js" type="text/javascript"></script>
    # <script src="http://yui.yahooapis.com/2.5.1/build/dom/dom.js" type="text/javascript"></script>
    # <script src="http://yui.yahooapis.com/2.5.1/build/event/event.js" type="text/javascript"></script>
    # <script src="http://yui.yahooapis.com/2.5.1/build/logger/logger.js" type="text/javascript"></script>
    # <script src="http://yui.yahooapis.com/2.5.1/build/yuitest/yuitest.js" type="text/javascript"></script>

You can also cache YUI locally:

    my $loader = YUI::Loader->new_from_yui_host(cache => { dir => "htdocs/assets", uri => "http://example.com/assets" });
    $loader->include->yuitest->reset->fonts->base;
    print $loader->html;

    # The above will yield:
    # <link rel="stylesheet" href="http://example.com/assets/reset.css" type="text/css"/>
    # <link rel="stylesheet" href="http://example.com/assets/fonts.css" type="text/css"/>
    # <link rel="stylesheet" href="http://example.com/assets/base.css" type="text/css"/>
    # <script src="http://example.com/assets/yahoo.js" type="text/javascript"></script>
    # <script src="http://example.com/assets/dom.js" type="text/javascript"></script>
    # <script src="http://example.com/assets/event.js" type="text/javascript"></script>
    # <script src="http://example.com/assets/logger.js" type="text/javascript"></script>
    # <script src="http://example.com/assets/yuitest.js" type="text/javascript"></script>

DESCRIPTION

Top

YUI::Loader is a tool for loading YUI assets within your application. Loader will either provide the URI/HTML to access http://yui.yahooapis.com directly, or you can cache assets locally or serve them from an exploded yui_x.x.x.zip dir.

METHODS

Top

YUI::Loader->new_from_yui_host([ base => <base>, version => <version> ])

YUI::Loader->new_from_internet([ base => <base>, version => <version> ])

Return a new YUI::Loader object configured to fetch and/or serve assets from http://yui.yahooapis.com/<version>

YUI::Loader->new_from_yui_dir([ dir => <dir>, version => <version> ])

Return a new YUI::Loader object configured to fetch/serve assets from a local, exploded yui_x.x.x.zip dir

As an example, for a dir of ./assets, the reset.css asset should be available as:

    ./assets/reset/reset.css

YUI::Loader->new_from_uri([ base => <base> ])

Return a new YUI::Loader object configured to serve assets from an arbitrary uri

As an example, for a base of http://example.com/assets, the reset.css asset should be available as:

    http://example.com/assets/reset.css

YUI::Loader->new_from_dir([ dir => <dir> ])

Return a new YUI::Loader object configured to serve assets from an arbitrary dir

As an example, for a dir of ./assets, the reset.css asset should be available as:

    ./assets/reset.css

select( <component>, <component>, ..., <component> )

Include each <component> in the "manifest" for the loader.

A <component> should correspond to an entry in the YUI component catalog (see below)

include

Returns a chainable component selector that will include what is called

You can use the methods of the selector to choose components to include. See YUI component catalog below

You can return to the loader by using the special ->then method:

    $loader->include->reset->yuilogger->grids->fonts->then->html;

exclude

Returns a chainable component selector that will exclude what is called

You can use the methods of the selector to choose components to include. See YUI component catalog below

You can return to the loader by using the special ->then method:

    $loader->exclude->yuilogger->then->html;

filter_min

Turn on the -min filter for all included components

For example:

    connection-min.js
    yuilogger-min.js
    base-min.css
    fonts-min.css

filter_debug

Turn on the -debug filter for all included components

For example:

    connection-debug.js
    yuilogger-debug.js
    base-debug.css
    fonts-debug.css

no_filter

Disable filtering of included components

For example:

    connection.js
    yuilogger.js
    base.css
    fonts.css

uri( <component> )

Attempt to fetch a URI for <component> using the current filter setting of the loader (-min, -debug, etc.)

If the loader has a cache, then this method will try to fetch from the cache. Otherwise it will use the source.

file( <component> )

Attempt to fetch a Path::Class::File for <component> using the current filter setting of the loader (-min, -debug, etc.)

If the loader has a cache, then this method will try to fetch from the cache. Otherwise it will use the source.

cache_uri( <component> )

Attempt to fetch a URI for <component> using the current filter setting of the loader (-min, -debug, etc.) from the cache

cache_file( <component> )

Attempt to fetch a Path::Class::File for <component> using the current filter setting of the loader (-min, -debug, etc.) from the cache

source_uri( <component> )

Attempt to fetch a URI for <component> using the current filter setting of the loader (-min, -debug, etc.) from the source

source_file( <component> )

Attempt to fetch a Path::Class::File for <component> using the current filter setting of the loader (-min, -debug, etc.) from the source

item( <component> )

Return a YUI::Loader::Item for <component> using the current filter setting of the loader (-min, -debug, etc.)

item_path( <component> )

Return the item path for <component> using the current filter setting of the loader (-min, -debug, etc.)

item_file( <component> )

Return the item file for <component> using the current filter setting of the loader (-min, -debug, etc.)

html

Generate and return a string containing HTML describing how to include components. For example, you can use this in the <head> section of a web page.

If the loader has a cache, then it will attempt to generate URIs from the cache, otherwise it will use the source.

Here is an example:

    <link rel="stylesheet" href="http://example.com/assets/reset.css" type="text/css"/>
    <link rel="stylesheet" href="http://example.com/assets/fonts.css" type="text/css"/>
    <link rel="stylesheet" href="http://example.com/assets/base.css" type="text/css"/>
    <script src="http://example.com/assets/yahoo.js" type="text/javascript"></script>
    <script src="http://example.com/assets/dom.js" type="text/javascript"></script>
    <script src="http://example.com/assets/event.js" type="text/javascript"></script>
    <script src="http://example.com/assets/logger.js" type="text/javascript"></script>
    <script src="http://example.com/assets/yuitest.js" type="text/javascript"></script>

source_html

Generate and return a string containing HTML describing how to include components. For example, you can use this in the <head> section of a web page.

Here is an example:

    <link rel="stylesheet" href="http://example.com/assets/reset.css" type="text/css"/>
    <link rel="stylesheet" href="http://example.com/assets/fonts.css" type="text/css"/>
    <link rel="stylesheet" href="http://example.com/assets/base.css" type="text/css"/>
    <script src="http://example.com/assets/yahoo.js" type="text/javascript"></script>
    <script src="http://example.com/assets/dom.js" type="text/javascript"></script>
    <script src="http://example.com/assets/event.js" type="text/javascript"></script>
    <script src="http://example.com/assets/logger.js" type="text/javascript"></script>
    <script src="http://example.com/assets/yuitest.js" type="text/javascript"></script>

YUI component catalog

Top

animation

Animation Utility (utility)

autocomplete

AutoComplete Control (widget)

base

Base CSS Package (css)

button

Button Control (widget)

calendar

Calendar Control (widget)

charts

Charts Control (widget)

colorpicker

Color Picker Control (widget)

connection

Connection Manager (utility)

container

Container Family (widget)

containercore

Container Core (Module, Overlay) (widget)

Cookie Utility (utility)

datasource

DataSource Utility (utility)

datatable

DataTable Control (widget)

dom

Dom Collection (core)

dragdrop

Drag &amp; Drop Utility (utility)

editor

Rich Text Editor (widget)

element

Element Utility (utility)

event

Event Utility (core)

fonts

Fonts CSS Package (css)

get

Get Utility (utility)

grids

Grids CSS Package (css)

history

Browser History Manager (utility)

imagecropper

ImageCropper Control (widget)

imageloader

ImageLoader Utility (utility)

json

JSON Utility (utility)

layout

Layout Manager (widget)

logger

Logger Control (tool)

Menu Control (widget)

profiler

Profiler (tool)

profilerviewer

ProfilerViewer Control (tool)

reset

Reset CSS Package (css)

reset_fonts

reset_fonts_grids

resize

Resize Utility (utility)

selector

Selector Utility (utility)

simpleeditor

Simple Editor (widget)

slider

Slider Control (widget)

tabview

TabView Control (widget)

treeview

TreeView Control (widget)

uploader

Uploader (widget)

utilities

yahoo

Yahoo Global Object (core)

yahoo_dom_event

yuiloader

Loader Utility (utility)

yuiloader_dom_event

yuitest

YUI Test Utility (tool)

SEE ALSO

Top

http://developer.yahoo.com/yui/

http://developer.yahoo.com/yui/yuiloader/

JS::jQuery::Loader

AUTHOR

Top

  Robert Krimen <robertkrimen@gmail.com>

COPYRIGHT AND LICENSE

Top

This software is copyright (c) 2010 by Robert Krimen.

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

YUI-Loader documentation Contained in the YUI-Loader distribution. 
package YUI::Loader;
BEGIN {
  $YUI::Loader::VERSION = '0.071';
}
# ABSTRACT: Load (and cache) the Yahoo JavaScript YUI framework

use warnings;
use strict;


use constant LATEST_YUI_VERSION => "2.8.1";

use Moose;

use YUI::Loader::Carp;
use YUI::Loader::Catalog;
use HTML::Declare qw/LINK SCRIPT/;

has catalog => qw/is ro required 1 isa YUI::Loader::Catalog lazy 1/, default => sub { shift->source->catalog };
has manifest => qw/is ro required 1 isa YUI::Loader::Manifest lazy 1/, handles => [qw/include exclude clear select parse schedule/], default => sub {
    my $self = shift;
    require YUI::Loader::Manifest;
    return YUI::Loader::Manifest->new(catalog => $self->catalog, loader => $self);
};
has list => qw/is ro required 1 isa YUI::Loader::List lazy 1/, default => sub {
    my $self = shift;
    require YUI::Loader::List;
    return YUI::Loader::List->new(loader => $self);
};
has source => qw/is ro required 1 isa YUI::Loader::Source/;
has cache => qw/is ro isa YUI::Loader::Cache/;
has filter => qw/is rw isa Str/, default => "";



sub new_from_yui_host {
    return shift->new_from_internet(@_);
}

sub new_from_internet {
    my $class = shift;

    my ($given, $catalog) = $class->_new_given_catalog(@_);

    my %source;
    $source{version} = delete $given->{version} if exists $given->{version};
    $source{base} = delete $given->{base} if exists $given->{base};
    require YUI::Loader::Source::Internet;
    my $source = YUI::Loader::Source::Internet->new(catalog => $catalog, %source);

    return $class->_new_finish($given, $source);
}


sub new_from_yui_dir {
    my $class = shift;

    my ($given, $catalog) = $class->_new_given_catalog(@_);

    my %source;
    $source{version} = delete $given->{version} if exists $given->{version};
    $source{base} = delete $given->{base} if exists $given->{base};
    $source{dir} = delete $given->{dir} if exists $given->{dir};
    require YUI::Loader::Source::YUIDir;
    my $source = YUI::Loader::Source::YUIDir->new(catalog => $catalog, %source);

    return $class->_new_finish($given, $source);
}


sub new_from_uri {
    my $class = shift;

    my ($given, $catalog) = $class->_new_given_catalog(@_);

    my %source;
    $source{base} = delete $given->{base} if exists $given->{base};
    require YUI::Loader::Source::URI;
    my $source = YUI::Loader::Source::URI->new(catalog => $catalog, %source);

    return $class->_new_finish($given, $source);
}


sub new_from_dir {
    my $class = shift;

    my ($given, $catalog) = $class->_new_given_catalog(@_);

    my %source;
    $source{base} = delete $given->{base} if exists $given->{base};
    $source{dir} = delete $given->{dir} if exists $given->{dir};
    require YUI::Loader::Source::Dir;
    my $source = YUI::Loader::Source::Dir->new(catalog => $catalog, %source);

    return $class->_new_finish($given, $source);
}



sub filter_min {
    my $self = shift;
    return $self->filter("min");
    return $self;
}


sub filter_debug {
    my $self = shift;
    $self->filter("debug");
    return $self;
}


sub no_filter {
    my $self = shift;
    $self->filter("");
    return $self;
}


sub uri {
    my $self = shift;
    return $self->cache_uri(@_) if $self->cache;
    return $self->source_uri(@_);
}


sub file {
    my $self = shift;
    return $self->cache_file(@_) if $self->cache;
    return $self->source_file(@_);
}


sub cache_uri {
    my $self = shift;
    my $name = shift;
    return $self->cache->uri([ $name => $self->filter ]) || croak "Unable to get uri for $name from cache ", $self->cache;
}


sub cache_file {
    my $self = shift;
    my $name = shift;
    return $self->cache->file([ $name => $self->filter ]) || croak "Unable to get file for $name from cache ", $self->cache;
}


sub source_uri {
    my $self = shift;
    my $name = shift;
    return $self->source->uri([ $name => $self->filter ]) || croak "Unable to get uri for $name from source ", $self->source;
}


sub source_file {
    my $self = shift;
    my $name = shift;
    return $self->source->file([ $name => $self->filter ]) || croak "Unable to get file for $name from source ", $self->source;
}


sub item {
    my $self = shift;
    my $name = shift;
    return $self->catalog->item([ $name => $self->filter ]);
}


sub item_path {
    my $self = shift;
    my $name = shift;
    return $self->item($name)->path;
}


sub item_file {
    my $self = shift;
    my $name = shift;
    return $self->item($name)->file;
}

sub name_list {
    my $self = shift;
    return $self->manifest->schedule;
}

sub _html {
    my $self = shift;
    my $uri_list = shift;
    my $separator = shift || "\n";
    my @uri_list = $self->list->uri;
    my @html;
    for my $uri (@uri_list) {
        if ($uri =~ m/\.css/) {
            push @html, LINK({ rel => "stylesheet", type => "text/css", href => $uri });
        }
        else {
            push @html, SCRIPT({ type => "text/javascript", src => $uri, _ => "" });
        }
    }
    return join $separator, @html;
}


sub html {
    my $self = shift;
    return $self->_html([ $self->list->uri ], @_);
}


sub source_html {
    my $self = shift;
    return $self->_html([ $self->list->source_uri ], @_);
}

sub _new_given {
    my $class = shift;
    return @_ == 1 && ref $_[0] eq "HASH" ? shift : { @_ };
}

sub _new_catalog {
    my $class = shift;
    my $given = shift;
    my $catalog = delete $given->{catalog} || {};
    return $given->{catalog} = $catalog if blessed $catalog;
    return $given->{catalog} = YUI::Loader::Catalog->new(%$catalog);
}

sub _build_cache {
    my $class = shift;
    my $given = shift;
    my $source = shift;

    my (%cache, $cache_class);

    if (ref $given eq "ARRAY") {
        $cache_class = "YUI::Loader::Cache::URI";
        my ($uri, $dir) = @$given;
        %cache = (uri => $uri, dir => $dir);
    }
    elsif (ref $given eq "HASH") {
        $cache_class = "YUI::Loader::Cache::URI";
        my ($uri, $dir) = @$given{qw/uri dir/};
        %cache = (uri => $uri, dir => $dir);
    }
    elsif (ref $given eq "Path::Resource") {
        $cache_class = "YUI::Loader::Cache::URI";
        %cache = (uri => $given->uri, dir => $given->dir);
    }
    else {
        $cache_class = "YUI::Loader::Cache::Dir";
        %cache = (dir => $given);
    }

    eval "require $cache_class;" or die $@;

    return $cache_class->new(source => $source, %cache);
}

sub _new_cache {
    my $class = shift;
    my $given = shift;
    my $source = shift;
    if (my $cache = delete $given->{cache}) {
        $given->{cache} = $class->_build_cache($cache, $source);
    }
}

sub _new_given_catalog {
    my $class = shift;
    my $given = $class->_new_given(@_);

    my $catalog = $class->_new_catalog($given);

    return ($given, $catalog);
}

sub _new_finish {
    my $class = shift;
    my $given = shift;
    my $source = shift;

    $class->_new_cache($given, $source);

    return $class->new(%$given, source => $source);
}



1;

__END__