| Revision 260 (by ahitrov, 2012/12/05 20:52:56) |
Regions: sql and fieldtype
|
<%once>
use JSON::XS;
my $json = JSON::XS->new;
</%once>
<%args>
$name => undef
$SETS => undef
</%args>
<%init>
return undef if (! ref($SETS));
return undef if (! $name);
my $FIELDS = {};
while (my ($element,$value) = each %{$SETS}) {
if ( $element =~ /^${name}_area_(\d+)$/ ) {
my $index = $1;
$value =~ s/^\s+//s;
$value =~ s/\s+$//s;
if ( defined $value && $value =~ /^\d+$/ ) {
$FIELDS->{$index}{area} = $value;
$FIELDS->{$index}{index} = $index;
}
} elsif ( $element =~ /^${name}_cost_(\d+)$/ ) {
my $index = $1;
$value =~ s/^\s+//s;
$value =~ s/\s+$//s;
if ( defined $value && ($value =~ /^\d+$/ || $value =~ /^\d+[\.\,]\d+$/) ) {
$value =~ s/\,/\./;
$FIELDS->{$index}{cost} = $value;
$FIELDS->{$index}{index} = $index;
}
}
}
my %FIELDS = map { $_->{area} => $_->{cost} } sort { int($a->{index}) <=> int($b->{index}) } grep { $_->{area} && defined $_->{cost} } values %$FIELDS;
return $json->encode(\%FIELDS);
</%init>
Небольшая справка по веткам
cnddist – контейнер, в котором хранятся все дистрибутивы всех библиотек и программных пакетов, которые использовались при построении различных версий Contenido. Если какой-то библиотеки в данном хранилище нет, инсталлятор сделает попытку "подтянуть" ее с веба (например, с CPAN). Если библиотека слишком старая, есть очень большая вероятность, что ее там уже нет. Поэтому мы храним весь хлам от всех сборок. Если какой-то дистрибутив вдруг отсутствует в cnddist - напишите нам, мы положим его туда.
koi8 – отмирающая ветка, чей код, выдача и все внутренние библиотеки заточены на кодировку KOI8-R. Вносятся только те дополнения, которые касаются внешнего вида и функционала админки, баги ядра, обязательные обновления портов и мелочи, которые легко скопипастить. В дальнейшем планируется полная остановка поддержки по данной ветке.
utf8 – актуальная ветка, заточенная под UTF-8.
Внутри каждой ветки: core – исходники ядра; install – скрипт установки инсталляции; plugins – плагины; samples – "готовые к употреблению" проекты, которые можно поставить, запустить и посмотреть, как они работают.