| Revision 3 (by ahitrov@rambler.ru, 2010/03/24 15:19:32) |
The CORE
|
<%args>
$SETS => undef
$field => undef
$default => undef
$object => undef
$prop => undef
$filen => undef
</%args>
<%init>
use IO::File;
use Contenido::Type::Audio;
return undef unless defined $SETS and defined $field;
# --------------------------------------------------------------------------------------
# ����� ���� �� ����
my $BINARY = $default;
if ($SETS->{$field}) {
my $filename = "/binary/".($object->get_file_name() || $filen) || return;
if (ref $BINARY) {$BINARY->remove}
my $upload = $r->upload($field);
my $audio_file = new Contenido::Type::Audio;
$audio_file->put_local($upload->filename(), $upload);
$audio_file->store($filename.'.'.$audio_file->{'ext'});
$audio_file->clean;
$BINARY = $audio_file;
}
return $BINARY;
</%init>
Небольшая справка по веткам
cnddist – контейнер, в котором хранятся все дистрибутивы всех библиотек и программных пакетов, которые использовались при построении различных версий Contenido. Если какой-то библиотеки в данном хранилище нет, инсталлятор сделает попытку "подтянуть" ее с веба (например, с CPAN). Если библиотека слишком старая, есть очень большая вероятность, что ее там уже нет. Поэтому мы храним весь хлам от всех сборок. Если какой-то дистрибутив вдруг отсутствует в cnddist - напишите нам, мы положим его туда.
koi8 – отмирающая ветка, чей код, выдача и все внутренние библиотеки заточены на кодировку KOI8-R. Вносятся только те дополнения, которые касаются внешнего вида и функционала админки, баги ядра, обязательные обновления портов и мелочи, которые легко скопипастить. В дальнейшем планируется полная остановка поддержки по данной ветке.
utf8 – актуальная ветка, заточенная под UTF-8.
Внутри каждой ветки: core – исходники ядра; install – скрипт установки инсталляции; plugins – плагины; samples – "готовые к употреблению" проекты, которые можно поставить, запустить и посмотреть, как они работают.
