~includeonce('../config.tmpl') ~includeonce('../lib/articles.tmpl') ~set('model_dir', ~preg('/^([-a-z0-9_]+)/', ~get_filename())) ~set('model_page',~get('model_dir')) ~if( ~get('model_dir')=='topics' || ~get('model_dir')=='', ~set('model_dir',~get_dirname(1)) ) ~rem('@todo un peu brut...') ~if(~get_dirname(2),~http_error(404)) ~list(~get('database'), "SELECT topics.id, topics.topic_parent, topics.title, template,topics.main FROM topics,models WHERE topics.topic='~addslashes(~get('model_dir'))' AND topics.model_id=models.id AND topics.state=~get('state_ok') LIMIT 1", 'LF', { ~set('tab[template]',~fld('template'), 'tab[title]','~if(~get('parent_title'),'~get('parent_title') / ')~fld('title')', 'tab[id]',~fld('id'), 'tab[topic_title]',~fld('title'), 'tab[topic_parent]', ~fld('topic_parent') ), ~rem('@todo un peu brut'), ~if(~fld('main')==0, ~list(~get('database'), "SELECT topics.id, topics.topic, topics.title FROM topics WHERE topics.id=~integer(~fld('topic_parent'))", 'LF',~if(~fld('topic')!=~get_dirname(1), ~redirect('~get_site_url()~include('../site/topicid2addr.tmpl',~get('tab[id]'))') ,~set('parent_title',~fld('title'))), 'LD',~http_error(404) )), ~if(~get_filenamevar(1), ~include('../articles/page.tmpl'), ~if(~file_exists('template/models/~get('tab[template]')'), { ~list(~get('database'), "SELECT topics_lookup.label FROM topics_lookup WHERE topic_id=~integer(~get('tab[id]'))", 'LR',~set('keywords',~fld('label')), 'LM',~set('keywords','~get('keywords'),~fld('label')') ), ~if(~get('tab[topic_parent]') >0,{ ~list(~get('database'), "SELECT topics.id FROM topics WHERE topics.state=~get('state_ok') AND topics.id <~integer(~get('tab[id]')) AND topics.topic_parent=~integer(~get('tab[topic_parent]')) ORDER BY topics.id DESC LIMIT 1", 'LF',~set('prevlink', '~relative_templeet()~include('../site/topicid2addr.tmpl',~fld('id'))' ) ), ~list(~get('database'), "SELECT topics.id FROM topics WHERE topics.state=~get('state_ok') AND topics.id >~integer(~get('tab[id]')) AND topics.topic_parent=~integer(~get('tab[topic_parent]')) ORDER BY topics.id ASC LIMIT 1", 'LF',~set('nextlink', '~relative_templeet()~include('../site/topicid2addr.tmpl',~fld('id'))' ) ), ~set('uplink', '~relative_templeet()~include('../site/topicid2addr.tmpl',~get('tab[topic_parent]'))' ) } ), ~set('title','~get('tab[title]') : chroniques, biographie, infos, concerts.'), '~include('../site/header.tmpl')~include(~get('tab[template]'),~get('tab[id]'))~include('../site/footer.tmpl')' }, ~http_error(404) ) ) }, 'LD', ~list(~get('database'), "SELECT topics.id FROM topics WHERE ( topics.topic='~addslashes(~display_clean_url(~get('model_dir'),'topic'))' OR topics.topic='~addslashes(~str_replace('_','-',~get('model_dir')))' ) AND topics.state=~get('state_ok') LIMIT 1", 'LM',~redirect(~if(~get_filenamevar(1), '~getconf('site_url')~article_link_by_id(~integer(~get_filenamevar(1)))', '~get_site_url()~include('../site/topic_addr.tmpl', ~fld('id')).html' ),301) ,'LD', ~if( ~get_filenamevar(1), ~redirect('~getconf('site_url')~article_link_by_id(~integer(~get_filenamevar(1)))',301), ~http_error(404) ) ) )