Re: [SP-pm] script perl no windows 10

2016-01-11 Por tôpico kleber caetano
Mais uma informação que talvez seja importante aos amigos :

Apesar de não estar apresentando as mensagens aos participantes da sala ,
as mensagens enviadas pelos usuários são gravadas nos arquivos de trabalho.
( é possível constatar isto ).

From: kleber caetano 
Sent: Monday, January 11, 2016 7:16 PM
To: saopaulo...@mail.pm.org 
Subject: Re: [SP-pm] script perl no windows 10

Agradeço a gentiliza em responder.
O Daniel me esculhambou ( rsrsrsrsrss ).
Apesar do script não ser bem elaborado ou estruturado , ele é simples e útil ( 
gostaria de tentar acertar o erro ).

Implementei as sugestão do Daniel e do Lucas [ setInterval(function(){ 
window.location.href = '?todas' }, 5000); ]
e o problema passou a ocorrer também no internet explorer 11( não enviou as 
mensagens para os participantes ).

Pelo que eu entendo deste script , a ação reload envia as mensagens para

e com setInterval não chegou ( porque não chegou lá ).

Talvez isto ajude a analisar o problema.


From: Daniel de Oliveira Mantovani 
Sent: Monday, January 11, 2016 6:12 PM
To: saopaulo...@mail.pm.org 
Subject: Re: [SP-pm] script perl no windows 10

Só reforçando o que eu disse, eu já achei uma falha de segurança, onde você 
abre um descritor de arquivos com dois argumentos. Possivelmente em algum 
desses "opens" um dos argumentos vem do usuário.

https://www.securecoding.cert.org/confluence/pages/viewpage.action?pageId=76775519


On Mon, Jan 11, 2016 at 5:36 PM, Daniel de Oliveira Mantovani 
<daniel.oliveira.mantov...@gmail.com> wrote:

  Eu fortemente te aconselho a jogar isso fora, e usar o Google Hangout ou 
qualquer uma das milhões de soluções grátis que resolvem isso.

  2016-01-11 17:33 GMT-02:00 Lucas Moraes <lucastiagodemor...@gmail.com>:

Aconselho você atualizar a pagina com javascript. 

setInterval(function(){ window.location.href = '?todas' }, 5000);


Falou.


Em 11 de janeiro de 2016 17:26, kleber caetano <payb...@hotmail.com.br> 
escreveu:

  Olá Sr(s),

  Migrei para o windows 10 e estou tendo um problema com um aplicativo em 
perl quando utilizo o edge ,
  entretanto , quando utilizo o explorer 11 o aplicativo é executado 
normalmente.

  Nota[1] - Este aplicativo refere-se a um chat ( sala de reunião online ).

  O problema ( no edge ) ocorre quando :

  - Ele reenvia as mensagens ( através do comando  )  para 
os participantes da sala de reunião ou seja não está enviando nada.
  - Quando é encerrada a reunião , o aplicativo elimina os arquivos de 
trabalho , porém , no edge isto 
não está acontecendo.   

  Nota[2] - No explorer 11 estes problemas não ocorrem.

  Nota[3] - O script em perl  foi desenvolvido por um amigo que conhecia 
bastante perl 
 entretanto meu conhecimento é limitado. 

  Nota[4] – Estou trabalhando com ActivePerl-5.16.3.1603-MSWin32-x86-296746 

  Nota[5] – Caso considerem necessário , tenho como disponibilizar um link 
de acesso a este site sala.cgi

  Nota[6] - Quando instalei o windows 10 , o reload automático  funcionava 
, entretanto ,  
  ao realizar uma manutenção grande ( nova versão acho ) o 
problema apareceu.
  O problema de não eliminar os arquivos temporário de 
trabalho existem
  desde a instalação inicial do windows 10

  Nota[7] – coloquei duas marcas no script onde eu acho que as funções são 
executadas:

  # aqui elimina os arquivos de trabalho 
###

  # aqui reenvia mensagens para os participantes 
#

  Alguém sabe como resolver isto ?

  Agradeço a atenção ,

  kleber

  
=
   script em perl  
( sala.cgi )
  
=
  #!perl
  print "Content-type:text/html\n\n";
  use CGI::Carp(fatalsToBrowser);

  
###
  # CONFIGURAÇÕES GERAIS

#
  # 

 #
  $titulo = "Sala de Reunião Online";# Título do script 

   #
  $master = "master.log"; # Arquivo temporário a 
guardar primeiro usuário   

Re: [SP-pm] script perl no windows 10

2016-01-11 Por tôpico kleber caetano
Me perdoem em insistir neste assunto.
Mais uma informação que talvez seja importante :

Parece que o script envia informações vazias ou seja as mensagens que estavam 
na tema desaparecem.
( a parte da tela que apresenta as mensagens ficam em branco inclusive o tema 
da reunião > acho que é  
 ). 

From: kleber caetano 
Sent: Monday, January 11, 2016 8:09 PM
To: saopaulo...@mail.pm.org 
Subject: Re: [SP-pm] script perl no windows 10

Mais uma informação que talvez seja importante aos amigos :

Apesar de não estar apresentando as mensagens aos participantes da sala ,
as mensagens enviadas pelos usuários são gravadas nos arquivos de trabalho.
( é possível constatar isto ).

From: kleber caetano 
Sent: Monday, January 11, 2016 7:16 PM
To: saopaulo...@mail.pm.org 
Subject: Re: [SP-pm] script perl no windows 10

Agradeço a gentiliza em responder.
O Daniel me esculhambou ( rsrsrsrsrss ).
Apesar do script não ser bem elaborado ou estruturado , ele é simples e útil ( 
gostaria de tentar acertar o erro ).

Implementei as sugestão do Daniel e do Lucas [ setInterval(function(){ 
window.location.href = '?todas' }, 5000); ]
e o problema passou a ocorrer também no internet explorer 11( não enviou as 
mensagens para os participantes ).

Pelo que eu entendo deste script , a ação reload envia as mensagens para

e com setInterval não chegou ( porque não chegou lá ).

Talvez isto ajude a analisar o problema.


From: Daniel de Oliveira Mantovani 
Sent: Monday, January 11, 2016 6:12 PM
To: saopaulo...@mail.pm.org 
Subject: Re: [SP-pm] script perl no windows 10

Só reforçando o que eu disse, eu já achei uma falha de segurança, onde você 
abre um descritor de arquivos com dois argumentos. Possivelmente em algum 
desses "opens" um dos argumentos vem do usuário.

https://www.securecoding.cert.org/confluence/pages/viewpage.action?pageId=76775519


On Mon, Jan 11, 2016 at 5:36 PM, Daniel de Oliveira Mantovani 
<daniel.oliveira.mantov...@gmail.com> wrote:

  Eu fortemente te aconselho a jogar isso fora, e usar o Google Hangout ou 
qualquer uma das milhões de soluções grátis que resolvem isso.

  2016-01-11 17:33 GMT-02:00 Lucas Moraes <lucastiagodemor...@gmail.com>:

Aconselho você atualizar a pagina com javascript. 

setInterval(function(){ window.location.href = '?todas' }, 5000);


Falou.


Em 11 de janeiro de 2016 17:26, kleber caetano <payb...@hotmail.com.br> 
escreveu:

  Olá Sr(s),

  Migrei para o windows 10 e estou tendo um problema com um aplicativo em 
perl quando utilizo o edge ,
  entretanto , quando utilizo o explorer 11 o aplicativo é executado 
normalmente.

  Nota[1] - Este aplicativo refere-se a um chat ( sala de reunião online ).

  O problema ( no edge ) ocorre quando :

  - Ele reenvia as mensagens ( através do comando  )  para 
os participantes da sala de reunião ou seja não está enviando nada.
  - Quando é encerrada a reunião , o aplicativo elimina os arquivos de 
trabalho , porém , no edge isto 
não está acontecendo.   

  Nota[2] - No explorer 11 estes problemas não ocorrem.

  Nota[3] - O script em perl  foi desenvolvido por um amigo que conhecia 
bastante perl 
 entretanto meu conhecimento é limitado. 

  Nota[4] – Estou trabalhando com ActivePerl-5.16.3.1603-MSWin32-x86-296746 

  Nota[5] – Caso considerem necessário , tenho como disponibilizar um link 
de acesso a este site sala.cgi

  Nota[6] - Quando instalei o windows 10 , o reload automático  funcionava 
, entretanto ,  
  ao realizar uma manutenção grande ( nova versão acho ) o 
problema apareceu.
  O problema de não eliminar os arquivos temporário de 
trabalho existem
  desde a instalação inicial do windows 10

  Nota[7] – coloquei duas marcas no script onde eu acho que as funções são 
executadas:

  # aqui elimina os arquivos de trabalho 
###

  # aqui reenvia mensagens para os participantes 
#

  Alguém sabe como resolver isto ?

  Agradeço a atenção ,

  kleber

  
=
   script em perl  
( sala.cgi )
  
=
  #!perl
  print "Content-type:text/html\n\n";
  use CGI::Carp(fatalsToBrowser);

  
###
  #

Re: [SP-pm] script perl no windows 10

2016-01-11 Por tôpico kleber caetano
Agradeço a gentiliza em responder.
O Daniel me esculhambou ( rsrsrsrsrss ).
Apesar do script não ser bem elaborado ou estruturado , ele é simples e útil ( 
gostaria de tentar acertar o erro ).

Implementei as sugestão do Daniel e do Lucas [ setInterval(function(){ 
window.location.href = '?todas' }, 5000); ]
e o problema passou a ocorrer também no internet explorer 11( não enviou as 
mensagens para os participantes ).

Pelo que eu entendo deste script , a ação reload envia as mensagens para

e com setInterval não chegou ( porque não chegou lá ).

Talvez isto ajude a analisar o problema.


From: Daniel de Oliveira Mantovani 
Sent: Monday, January 11, 2016 6:12 PM
To: saopaulo...@mail.pm.org 
Subject: Re: [SP-pm] script perl no windows 10

Só reforçando o que eu disse, eu já achei uma falha de segurança, onde você 
abre um descritor de arquivos com dois argumentos. Possivelmente em algum 
desses "opens" um dos argumentos vem do usuário.

https://www.securecoding.cert.org/confluence/pages/viewpage.action?pageId=76775519


On Mon, Jan 11, 2016 at 5:36 PM, Daniel de Oliveira Mantovani 
<daniel.oliveira.mantov...@gmail.com> wrote:

  Eu fortemente te aconselho a jogar isso fora, e usar o Google Hangout ou 
qualquer uma das milhões de soluções grátis que resolvem isso.

  2016-01-11 17:33 GMT-02:00 Lucas Moraes <lucastiagodemor...@gmail.com>:

Aconselho você atualizar a pagina com javascript. 

setInterval(function(){ window.location.href = '?todas' }, 5000);


Falou.


Em 11 de janeiro de 2016 17:26, kleber caetano <payb...@hotmail.com.br> 
escreveu:

  Olá Sr(s),

  Migrei para o windows 10 e estou tendo um problema com um aplicativo em 
perl quando utilizo o edge ,
  entretanto , quando utilizo o explorer 11 o aplicativo é executado 
normalmente.

  Nota[1] - Este aplicativo refere-se a um chat ( sala de reunião online ).

  O problema ( no edge ) ocorre quando :

  - Ele reenvia as mensagens ( através do comando  )  para 
os participantes da sala de reunião ou seja não está enviando nada.
  - Quando é encerrada a reunião , o aplicativo elimina os arquivos de 
trabalho , porém , no edge isto 
não está acontecendo.   

  Nota[2] - No explorer 11 estes problemas não ocorrem.

  Nota[3] - O script em perl  foi desenvolvido por um amigo que conhecia 
bastante perl 
 entretanto meu conhecimento é limitado. 

  Nota[4] – Estou trabalhando com ActivePerl-5.16.3.1603-MSWin32-x86-296746 

  Nota[5] – Caso considerem necessário , tenho como disponibilizar um link 
de acesso a este site sala.cgi

  Nota[6] - Quando instalei o windows 10 , o reload automático  funcionava 
, entretanto ,  
  ao realizar uma manutenção grande ( nova versão acho ) o 
problema apareceu.
  O problema de não eliminar os arquivos temporário de 
trabalho existem
  desde a instalação inicial do windows 10

  Nota[7] – coloquei duas marcas no script onde eu acho que as funções são 
executadas:

  # aqui elimina os arquivos de trabalho 
###

  # aqui reenvia mensagens para os participantes 
#

  Alguém sabe como resolver isto ?

  Agradeço a atenção ,

  kleber

  
=
   script em perl  
( sala.cgi )
  
=
  #!perl
  print "Content-type:text/html\n\n";
  use CGI::Carp(fatalsToBrowser);

  
###
  # CONFIGURAÇÕES GERAIS

#
  # 

 #
  $titulo = "Sala de Reunião Online";# Título do script 

   #
  $master = "master.log"; # Arquivo temporário a 
guardar primeiro usuário  #
  $log= "logs.log";# Arquivo temporário 
de logs totais  
  #
  $log2   = "logs2.log";# Arquivo temporário de 
logs da sessão  #
  $online = "onlin

[SP-pm] script perl no windows 10

2016-01-11 Por tôpico kleber caetano
Olá Sr(s),

Migrei para o windows 10 e estou tendo um problema com um aplicativo em perl 
quando utilizo o edge ,
entretanto , quando utilizo o explorer 11 o aplicativo é executado normalmente.

Nota[1] - Este aplicativo refere-se a um chat ( sala de reunião online ).

O problema ( no edge ) ocorre quando :

- Ele reenvia as mensagens ( através do comando  )  para 
  os participantes da sala de reunião ou seja não está enviando nada.
- Quando é encerrada a reunião , o aplicativo elimina os arquivos de trabalho , 
porém , no edge isto 
  não está acontecendo.   

Nota[2] - No explorer 11 estes problemas não ocorrem.

Nota[3] - O script em perl  foi desenvolvido por um amigo que conhecia bastante 
perl 
   entretanto meu conhecimento é limitado. 

Nota[4] – Estou trabalhando com ActivePerl-5.16.3.1603-MSWin32-x86-296746 

Nota[5] – Caso considerem necessário , tenho como disponibilizar um link de 
acesso a este site sala.cgi

Nota[6] - Quando instalei o windows 10 , o reload automático  funcionava , 
entretanto ,  
ao realizar uma manutenção grande ( nova versão acho ) o 
problema apareceu.
O problema de não eliminar os arquivos temporário de trabalho 
existem
desde a instalação inicial do windows 10

Nota[7] – coloquei duas marcas no script onde eu acho que as funções são 
executadas:

# aqui elimina os arquivos de trabalho 
###

# aqui reenvia mensagens para os participantes 
#

Alguém sabe como resolver isto ?

Agradeço a atenção ,

kleber

=
 script em perl  ( 
sala.cgi )
=
#!perl
print "Content-type:text/html\n\n";
use CGI::Carp(fatalsToBrowser);

###
# CONFIGURAÇÕES GERAIS  

  #
#   

   #
$titulo = "Sala de Reunião Online";# Título do script   
 #
$master = "master.log"; # Arquivo temporário a guardar 
primeiro usuário  #
$log= "logs.log";# Arquivo temporário de 
logs totais#
$log2   = "logs2.log";# Arquivo temporário de logs 
da sessão  #
$online = "online.log"; # Arquivo temporário com nomes 
dos usuários Online#
$estilos= "estilos.css";# Arquivo com os estilos dentro 
da pasta modelos  #
$topo   = "topo.html"; # Template do Topo   

 #
$fim= "fim.html";   # Template do Fim   

#
#   

  #
#   

  #
# FIM DAS CONFIGURAÇÕES 

#
###

read(STDIN, $buffer, $ENV{'CONTENT_LENGTH'});
@conteudo = split(/&/, $buffer);
foreach $par (@conteudo) {
($campo, $valor) = split(/=/, $par);
$valor =~ tr/+/ /;
$valor =~ s/%([a-fA-F0-9][a-fA-F0-9])/pack("C", hex($1))/eg;
$CAMPO{$campo} = $valor;
}

$qs = "$ENV{QUERY_STRING}";


if ($qs eq ""){
print qq|

|;

print qq§