CSS-Prepare

 view release on metacpan or  search on metacpan

lib/CSS/Prepare/Property/Values.pm  view on Meta::CPAN

package CSS::Prepare::Property::Values;

use Modern::Perl;
use Exporter;

our @ISA    = qw( Exporter );
our @EXPORT = qw(
        is_length_value
        is_percentage_value
        is_string_value
        is_url_value
        
        is_background_attachment_value
        is_background_colour_value
        is_background_image_value
        is_background_position_value
        is_background_repeat_value
        is_border_collapse_value
        is_border_colour_value
        is_border_radius_corner_value
        is_border_radius_value
        is_border_spacing_value
        is_border_style_value
        is_border_width_value
        is_caption_side_value
        is_clear_value
        is_clip_value
        is_colour_value
        is_content_value
        is_counter_increment_value
        is_counter_reset_value
        is_cursor_value
        is_direction_value
        is_display_value
        is_empty_cells_value
        is_float_value
        is_font_family_value
        is_font_size_line_height_value
        is_font_size_value
        is_font_style_value
        is_font_variant_value
        is_font_weight_value
        is_height_value
        is_letter_spacing_value
        is_line_height_value
        is_list_style_image_value
        is_list_style_position_value
        is_list_style_type_value
        is_margin_width_value
        is_max_height_value
        is_max_width_value
        is_min_height_value
        is_min_width_value
        is_offset_value
        is_opacity_value
        is_outline_colour_value
        is_outline_style_value
        is_outline_width_value
        is_overflow_value
        is_padding_width_value
        is_position_value
        is_quotes_value
        is_table_layout_value
        is_text_align_value
        is_text_decoration_value
        is_text_indent_value
        is_text_transform_value
        is_unicode_bidi_value
        is_vertical_align_value
        is_visibility_value
        is_white_space_value
        is_width_value
        is_word_spacing_value
        is_z_index_value
        
        @standard_directions
        @standard_corners
        
        $background_attachment_value
        $background_colour_value
        $background_image_value
        $background_repeat_value
        $background_position_value
        $border_colour_value
        $individual_border_radius_value
        $border_radius_corner_value
        $border_radius_value
        $border_style_value
        $border_width_value
        $colour_value
        $font_family
        $font_family_value

lib/CSS/Prepare/Property/Values.pm  view on Meta::CPAN

            | $length_value \s+ $length_value
            | inherit
        )
    }x;
our $border_style_value = qr{
        (?:
              dashed | dotted | double | groove | hidden
            | inset  | outset | ridge  | solid

            | none | inherit
        )
    }x;
our $border_width_value
    = qr{ (?: thin | medium | thick | $positive_length_value | inherit ) }x;

my $caption_side_value = qr{ (?: top | bottom | inherit ) }x;
my $clear_value = qr{ (?: left | right | both | none | inherit ) }x;
my $shape_value = qr{
        (?:
            rect \( \s*
                (?: $length_value | auto )
                (?: \s* \, \s* (?: $length_value | auto ) ){3}
            \s* \)
        )
    }x;
my $clip_value = qr{ (?: $shape_value | auto | inherit ) }x;
my $content_repeatable = qr{
        (?:
              open-quote | close-quote | no-open-quote | no-close-quote
            | attr \( $identifier_value \)
            | $string_value | $url_value | $identifier_value
        )
    }x;
my $content_value = qr{
        (?:
              normal | none | inherit
            | $content_repeatable
            | (?:
                  $content_repeatable
                  (?: \s+ $content_repeatable )+
              )
        )
    }x;
my $counter_value = qr{
        (?:
              $identifier_value
            | $identifier_value \s+ $integer_value
        )
    }x;
my $counter_value_content = qr{
        (?:
              $counter_value
            | $counter_value
              (?: \s+ $counter_value )+
            | none
            | inherit
        )
    }x;
my $counter_reset_value = qr{ $counter_value_content }x;
my $counter_increment_value = qr{ $counter_value_content }x;
my $cursor_value = qr{
        (?:
              (?: $url_value \s+ )*
              (?:
                    auto     | crosshair | default   | e-resize  | help
                  | move     | n-resize  | ne-resize | nw-resize | pointer
                  | progress | s-resize  | se-resize | sw-resize | text
                  | w-resize | wait
              )
            | inherit
        )
    }x;

my $direction_value = qr{ (?: ltr | rtl | inherit ) }x;
my $display_value = qr{
        (?:
              block              | inline             | inline-block
            | inline-table       | list-item          | none
            | run-in             | table              | table-caption
            | table-cell         | table-column       | table-column-group
            | table-footer-group | table-header-group | table-row
            | table-row-group
            
            | none | inherit
        )
    }x;
my $empty_cells_value = qr{ (?: show | hide | inherit ) }x;

my $float_value = qr{ (?: left | right | none | inherit ) }x;
our $font_family = qr{
        (?:
              serif | sans-serif | cursive | fantasy | monospace
            | $identifier_value
            | $string_value
            | inherit
        )
    }x;
our $font_family_value = qr{
        (?:
            $font_family
            |
            (?: $font_family (?: \s* \, \s* $font_family )+ )
        )
    }x;
our $line_height_value = qr{
        (?:   normal
            | $number_value | $length_value | $percentage_value
            | inherit
        )
    }x;
our $font_size_value = qr{
        (?:
              xx-small | x-small | small  | medium | large | x-large
            | xx-large | smaller | larger | inherit
            | $length_value | $percentage_value
        )
    }x;
my $font_size_line_height_value
    = qr{ $font_size_value / $line_height_value }x;
our $font_style_value = qr{ (?: italic | oblique | normal | inherit ) }x;
our $font_variant_value = qr{ (?: normal | small-caps | inherit ) }x;

lib/CSS/Prepare/Property/Values.pm  view on Meta::CPAN

sub is_background_repeat_value {
    my $value = shift;
    return $value =~ m{^ $background_repeat_value $}x;
}
sub is_border_collapse_value {
    my $value = shift;
    return $value =~ m{^ $border_collapse_value $}x;
}
sub is_border_colour_value {
    my $value = shift;
    return $value =~ m{^ $border_colour_value $}x;
}
sub is_border_radius_corner_value {
    my $value = shift;
    return $value =~ m{^ $border_radius_corner_value $}x;
}
sub is_border_radius_value {
    my $value = shift;
    return $value =~ m{^ $border_radius_value $}x;
}
sub is_border_spacing_value {
    my $value = shift;
    return $value =~ m{^ $border_spacing_value $}x;
}
sub is_border_style_value {
    my $value  = shift;
    return $value =~ m{^ $border_style_value $}x;
}
sub is_border_width_value {
    my $value = shift;
    return $value =~ m{^ $border_width_value $}x;
}
sub is_caption_side_value {
    my $value = shift;
    return $value =~ m{^ $caption_side_value $}x;
}
sub is_clear_value {
    my $value = shift;
    return $value =~ m{^ $clear_value $}x;
}
sub is_clip_value {
    my $value = shift;
    return $value =~ m{^ $clip_value $}x;
}
sub is_colour_value {
    my $value = shift;
    return $value =~ m{^ $colour_value $}x;
}
sub is_content_value {
    my $value = shift;
    return $value =~ m{^ $content_value $}x;
}
sub is_counter_increment_value {
    my $value = shift;
    return $value =~ m{^ $counter_increment_value $}x;
}
sub is_counter_reset_value {
    my $value = shift;
    return $value =~ m{^ $counter_reset_value $}x;
}
sub is_cursor_value {
    my $value = shift;
    return $value =~ m{^ $cursor_value $}x;
}
sub is_direction_value {
    my $value = shift;
    return $value =~ m{^ $direction_value $}x;
}
sub is_display_value {
    my $value = shift;
    return $value =~ m{^ $display_value $}x;
}
sub is_empty_cells_value {
    my $value = shift;
    return $value =~ m{^ $empty_cells_value $}x;
}
sub is_float_value {
    my $value = shift;
    return $value =~ m{^ $float_value $}x;
}
sub is_font_family_value {
    my $value = shift;
    return $value =~ m{^ $font_family_value $}x;
}
sub is_font_size_line_height_value {
    my $value = shift;
    return $value =~ m{^ $font_size_line_height_value $}x;
}
sub is_font_size_value {
    my $value = shift;
    return $value =~ m{^ $font_size_value $}x;
}
sub is_font_style_value {
    my $value = shift;
    return $value =~ m{^ $font_style_value $}x;
}
sub is_font_variant_value {
    my $value = shift;
    return $value =~ m{^ $font_variant_value $}x;
}
sub is_font_weight_value {
    my $value = shift;
    return $value =~ m{^ $font_weight_value $}x;
}
sub is_height_value {
    my $value = shift;
    return $value =~ m{^ $height_value $}x;
}
sub is_letter_spacing_value {
    my $value = shift;
    return $value =~ m{^ $letter_spacing_value $}x;
}
sub is_line_height_value {
    my $value = shift;
    return $value =~ m{^ $line_height_value $}x;
}
sub is_list_style_image_value {
    my $value = shift;
    return $value =~ m{$list_style_image_value}x;
}
sub is_list_style_position_value {
    my $value = shift;
    return $value =~ m{$list_style_position_value}x;