From 1914552c207bd98c7edad6acb77cbd27610419d4 Mon Sep 17 00:00:00 2001 From: mynah Date: Sun, 3 Mar 2019 20:22:21 -0600 Subject: [PATCH] moving --- .gitignore | 0 dojo.conf | 0 lib/Dojo.pm | 2 +- lib/Dojo/Conf.pm.example | 47 +++++++++-------------- lib/Dojo/Controller/Data.pm | 0 lib/Dojo/Controller/Example.pm | 0 lib/Dojo/Controller/Home.pm | 0 lib/Dojo/Controller/Users.pm | 0 lib/Dojo/Model/Users.pm | 0 lib/Dojo/Model/Vuelo.pm | 5 ++- lib/Dojo/Support.pm | 0 public/home/bcast/jsFlowpl.js | 0 public/home/bcast/noise.jpg | Bin public/home/cal/img/Tepoztlan.jpg | Bin public/home/tst/tst.css | 0 readme | 2 + t/basic.t | 0 templates/home/contact2.html.ep | 0 templates/home/htmlNav.html.ep | 0 templates/home/htmlSide.html.ep | 0 templates/home/pang.html.ep | 0 templates/home/tst.html.ep | 0 templates/layouts/admin.html.ep | 0 templates/layouts/clean.html.ep | 0 templates/layouts/default.html.ep | 0 templates/layouts/defaultContact.html.ep | 0 26 files changed, 26 insertions(+), 30 deletions(-) mode change 100644 => 100755 .gitignore mode change 100644 => 100755 dojo.conf mode change 100644 => 100755 lib/Dojo.pm mode change 100644 => 100755 lib/Dojo/Conf.pm.example mode change 100644 => 100755 lib/Dojo/Controller/Data.pm mode change 100644 => 100755 lib/Dojo/Controller/Example.pm mode change 100644 => 100755 lib/Dojo/Controller/Home.pm mode change 100644 => 100755 lib/Dojo/Controller/Users.pm mode change 100644 => 100755 lib/Dojo/Model/Users.pm mode change 100644 => 100755 lib/Dojo/Model/Vuelo.pm mode change 100644 => 100755 lib/Dojo/Support.pm mode change 100644 => 100755 public/home/bcast/jsFlowpl.js mode change 100644 => 100755 public/home/bcast/noise.jpg mode change 100644 => 100755 public/home/cal/img/Tepoztlan.jpg mode change 100644 => 100755 public/home/tst/tst.css mode change 100644 => 100755 readme mode change 100644 => 100755 t/basic.t mode change 100644 => 100755 templates/home/contact2.html.ep mode change 100644 => 100755 templates/home/htmlNav.html.ep mode change 100644 => 100755 templates/home/htmlSide.html.ep mode change 100644 => 100755 templates/home/pang.html.ep mode change 100644 => 100755 templates/home/tst.html.ep mode change 100644 => 100755 templates/layouts/admin.html.ep mode change 100644 => 100755 templates/layouts/clean.html.ep mode change 100644 => 100755 templates/layouts/default.html.ep mode change 100644 => 100755 templates/layouts/defaultContact.html.ep diff --git a/.gitignore b/.gitignore old mode 100644 new mode 100755 diff --git a/dojo.conf b/dojo.conf old mode 100644 new mode 100755 diff --git a/lib/Dojo.pm b/lib/Dojo.pm old mode 100644 new mode 100755 index 2bb3bd0..64a38d5 --- a/lib/Dojo.pm +++ b/lib/Dojo.pm @@ -8,7 +8,7 @@ use Dojo::Model::Users; sub startup { my $self = shift; my $config = $self->plugin('Config'); #Config hash dojo.conf - $self->plugin('PODRenderer') if $config->{perldoc}; #doc + # $self->plugin('PODRenderer') if $config->{perldoc}; #doc $self->secrets(['Mojojojo jojo']); #cookies $self->helper(dbv => sub { state $dbv = Dojo::Model::Vuelo->new }); diff --git a/lib/Dojo/Conf.pm.example b/lib/Dojo/Conf.pm.example old mode 100644 new mode 100755 index 702f330..066c6d2 --- a/lib/Dojo/Conf.pm.example +++ b/lib/Dojo/Conf.pm.example @@ -3,42 +3,33 @@ use strict; use warnings; #Paths use constant { - MOD => "public", #location of modules - SERVER_NAME => "localhost:3000", - CHAT_SRV => "chat.vuelodegrulla.com", + MOD => "public", }; + # database access use constant { - VUELODB => "dbname", + VUELODB => "vuelo", VUELODB_H => "localhost", - VUELODB_UW => "writtername", - VUELODB_UWP => "writterpass", - VUELODB_UR => "readername", - VUELODB_URP => "readerpass", + VUELODB_UW => "root", + VUELODB_UWP => "passwd", + VUELODB_UR => "root", + VUELODB_URP => "passwd", + GRULLADB_H => "localhost", + GRULLADB => "grulla", + GRULLADB_UR => "root", + GRULLADB_URP=> "passwd", + GRULLADB_UW => "root", + GRULLADB_UWP=> "passwd", + MSGDB => "mensaje", + MSGDB_H => "localhost", + MSGDB_UW => "root", + MSGDB_UWP => "passwd", + MSGDB_UR => "root", + MSGDB_URP => "passwd", }; -our $radio ={ #hash to configure icecast radio - server_name => SERVER_NAME, - radio_server =>"https://myradio.com", - channel => "/test", - listen_url =>"http://radio:8000/test", -}; -our $chat={ #hash to configure chat (candy prodody) server - chat_addr => "https://".CHAT_SRV, - chat_srv => CHAT_SRV, - chat_channel => 'Users@radio.'.CHAT_SRV, -}; -our %rtmp={ #hash ro configure rtpm video server - rtmp_server =>"rtmp://myserver.com/steam", - rtmp_channel =>"channel", -}; - -our %def=( #some other global configuration - modules => MOD, - # layout => "default" -); 1; diff --git a/lib/Dojo/Controller/Data.pm b/lib/Dojo/Controller/Data.pm old mode 100644 new mode 100755 diff --git a/lib/Dojo/Controller/Example.pm b/lib/Dojo/Controller/Example.pm old mode 100644 new mode 100755 diff --git a/lib/Dojo/Controller/Home.pm b/lib/Dojo/Controller/Home.pm old mode 100644 new mode 100755 diff --git a/lib/Dojo/Controller/Users.pm b/lib/Dojo/Controller/Users.pm old mode 100644 new mode 100755 diff --git a/lib/Dojo/Model/Users.pm b/lib/Dojo/Model/Users.pm old mode 100644 new mode 100755 diff --git a/lib/Dojo/Model/Vuelo.pm b/lib/Dojo/Model/Vuelo.pm old mode 100644 new mode 100755 index ac32a19..2879756 --- a/lib/Dojo/Model/Vuelo.pm +++ b/lib/Dojo/Model/Vuelo.pm @@ -93,7 +93,10 @@ sub new { bless {}, shift }; sub contact{ my $c=shift; my $q="insert into entrada (nombre,correo,pagina,texto,fecha) values(?,?,?,?,now() )" ; - return _writemsg($q,@_); + my @a=@_; + #simple method to ignore spam + return _writemsg($q,@a) unless $a[3]=~m/html|website|\