Contenido Project
version 7
SVN-репозиторий
Line # Revision Author
1 239 ahitrov <script type="text/javascript">
2 <!--
3 opener.AuthOnEnd();
4 close();
5 //-->
6 </script>
7
8 <pre><% Dumper($fb_connect) %></pre>
9 %#<a href="<% $auth_url->as_string %>"><% $auth_url->as_string %></a>
10 <pre><% Dumper($session) %></pre>
11
12 <%doc>
13
14 Manual redirect:
15
16 use session::AUTH::FaceBook;
17 my $site = $state->development ? 'www22.zvuki.ru' : 'www.zvuki.ru';
18 my $fb_connect = session::AUTH::FaceBook->new(
19 facebook_redirect_uri => 'http://'.$site.'/oauth/facebook.html',
20 );
21
22 </%doc>
23 <%args>
24
25 $code => undef
26 $state => undef
27
28 </%args>
29 <%init>
30
31 my $fb_connect = session::AUTH::FaceBook->new();
32 my $auth_url = $fb_connect->fb_authorize_url( state => $state );
33 if ( $code ) {
34 my $local_session = $fb_connect->authenticate( code => $code, state => $state );
35 if ( ref $local_session && exists $local_session->{id} ) {
36 my $profile = $keeper->{users}->get_profile( id => $local_session->{id} );
37 if ( ref $profile ) {
38 unless ( exists $local_session->{avatar} ) {
39 my $avatar = $profile->get_image('avatar');
40 $session->{avatar} = ref $avatar && exists $avatar->{filename} ? $avatar->{mini}{'54x54'}{filename} : undef;
41 $keeper->{session}->store_value (
42 name => $profile->name_full,
43 last_name => $profile->name_family,
44 first_name => $profile->name_part,
45 avatar => $session->{avatar},
46 );
47 } else {
48 $keeper->{session}->store_value (
49 name => $profile->name_full,
50 last_name => $profile->name_family,
51 first_name => $profile->name_part,
52 );
53 }
54 }
55 }
56 } elsif ( $auth_url ) {
57 $m->redirect($auth_url->as_string);
58 } else {
59 &abort404 unless $DEBUG;
60 }
61
62 </%init>

Небольшая справка по веткам

cnddist – контейнер, в котором хранятся все дистрибутивы всех библиотек и программных пакетов, которые использовались при построении различных версий Contenido. Если какой-то библиотеки в данном хранилище нет, инсталлятор сделает попытку "подтянуть" ее с веба (например, с CPAN). Если библиотека слишком старая, есть очень большая вероятность, что ее там уже нет. Поэтому мы храним весь хлам от всех сборок. Если какой-то дистрибутив вдруг отсутствует в cnddist - напишите нам, мы положим его туда.

koi8 – отмирающая ветка, чей код, выдача и все внутренние библиотеки заточены на кодировку KOI8-R. Вносятся только те дополнения, которые касаются внешнего вида и функционала админки, баги ядра, обязательные обновления портов и мелочи, которые легко скопипастить. В дальнейшем планируется полная остановка поддержки по данной ветке.

utf8 – актуальная ветка, заточенная под UTF-8.

Внутри каждой ветки: core – исходники ядра; install – скрипт установки инсталляции; plugins – плагины; samples – "готовые к употреблению" проекты, которые можно поставить, запустить и посмотреть, как они работают.
© 2003 – 2009 «Рамблер»
© 2010 – 2024 «Андрей (Handy) Хитров»