[Bug] shoutcast
#1
Music 
Bonsoir j'aurais besoin de vos lumière je me casse la tête en se moment en installant un bot shoutcast.tcl mais je me heurte a un message d'erreur 

ci dessous 


Quote:Eggdrop v1.6.21 © 1997 Robey Pointer © 2011 Eggheads
[21:45:15] --- Loading eggdrop v1.6.21 (Mon Sep 13 2021)
[21:45:15] Module loaded: dns
[21:45:15] Module loaded: channels
[21:45:15] Module loaded: server
[21:45:15] Module loaded: ctcp
[21:45:15] Module loaded: irc
[21:45:15] Module loaded: console          (with lang support)
[21:45:15] Module loaded: blowfish
[21:45:15] Listening at telnet port 3337 (all).
[21:45:15] Tcl error in file 'eggdrop.conf':
[21:45:15] invalid command name "stream.mp3"
    while executing
"stream.mp3  annonce 1  kpl 1  "
    (in namespace eval "::sc" script line 12)
    invoked from within
"namespace eval ::sc {
        package require http
        package require msgcat
        variable sc

        # Configuration mot de passe/ip/port du serveur
        # annonce:
        # 1- ..."
    (file "scripts/shoutcast.tcl" line 23)
    invoked from within
"source scripts/shoutcast.tcl"
    (file "eggdrop.conf" line 97)
[21:45:15] * FICHIER DE CONFIGURATION NON CHARGE (INTROUVABLE OU ERREUR)
(Amigo)(~/shell/eggdrop)->
(Amigo)(~/shell/eggdrop)->
(Amigo)(~/shell/eggdrop)-> ./eggdrop -m

Eggdrop v1.6.21 © 1997 Robey Pointer © 2011 Eggheads
[21:49:13] --- Loading eggdrop v1.6.21 (Mon Sep 13 2021)
[21:49:13] Module loaded: dns
[21:49:13] Module loaded: channels
[21:49:13] Module loaded: server
[21:49:13] Module loaded: ctcp
[21:49:13] Module loaded: irc
[21:49:13] Module loaded: console          (with lang support)
[21:49:13] Module loaded: blowfish
[21:49:13] Listening at telnet port 3337 (all).
[21:49:13] Creating channel file
 
je vous remercie par avance de l'aide que vous pouvez m'apporter
  Reply
#2
Il faudrait que tu montres ce que tu as mis dans la configuration (en changeant le pass admin, et l'ip), particulièrement cette partie:
tcl
array set sc [list\
		adminpass ****** \
		ip ****** \
		port ****** \
		lien http://maradio.com/listen \
		annonce 1 \
		kpl 1 \
	]


irc.zeolia.net - Offrez-moi un café
Merci de ne pas demander d'aide en MP
  Reply
#3
Thumbsdown 
(14/09/2021, 00:45)CrazyCat Wrote: Il faudrait que tu montres ce que tu as mis dans la configuration (en changeant le pass admin, et l'ip), particulièrement cette partie:
tcl
array set sc [list\
 adminpass ****** \
 ip ****** \
 port ****** \
 lien http://maradio.com/listen \
 annonce 1 \
 kpl 1 \
 ]


Quote:# Configuration mot de passe/ip/port du serveur
# annonce:
# 1- le bot annonce les morceaux sur le salon.
# 0- le bot n'annonce pas les morceaux.
# il est important de laisser le "\" � la fin de chaque lignes!!
# kpl: faut-il kicker la pl 1-oui / 0-non
array set sc [list\
adminpass ft34vp5* \
ip ecmanager2.pro-fhi.net \
port 1960 \
lien http://ecmanager2.pro-fhi.net:1960/;stream.mp3 \
annonce 1 \
kpl 1 \
]



Voila 
j'ai cacher un caractère de adminpass
  Reply
#4
Bonjour Amigo,

je pense que tu devrais mettre le lien entre guillemets, depuis http jusqu'à mp3.

Et au fait, bonjour à CrazyCat (je ne viens plus très souvent sur ce forum!)

Bonne soirée,

PC
  Reply
#5
(14/09/2021, 20:42)pchevee Wrote: Bonjour Amigo,

je pense que tu devrais mettre le lien entre guillemets, depuis http jusqu'à mp3.

Et au fait, bonjour à CrazyCat (je ne viens plus très souvent sur ce forum!)

Bonne soirée,

PC

Cela ne change rien 

Quote:<Radio> [21:07:28] Rehashing ...
<Radio> [21:07:28] Listening at telnet port 3337 (all).
<Radio> [21:07:28] Userfile loaded, unpacking...
  Reply
#6
Ca change un peu, l'eggdrop ne se plante pas. Par contre, le script ne semble pas chargé du tout. As-tu laissé l'appel dans le .conf ? Ou as-tu essayé de le charger depuis la party-line ?

H.S.: eggdrop 1.6.21 commence à dater un peu, la dernière stable est 1.9.1
irc.zeolia.net - Offrez-moi un café
Merci de ne pas demander d'aide en MP
  Reply
#7
Quote:lien http://ecmanager2.pro-fhi.net:1960/;stream.mp3 \

Tu es sur pour le ";" ?
ça ne serais pas plutôt :
Quote:lien http://ecmanager2.pro-fhi.net:1960/stream.mp3 \

De même ya un espace entre le stream.mp3 et le \

Tiens je te transmet un tcl pour évitez le crash :
Vous interdisez les erreurs, vous empêchez ainsi la victoire.

Ma super kikoo-page loll
  Reply
#8
(15/09/2021, 13:14)aliasangelius Wrote: Tiens je te transmet un tcl pour évitez le crash :

Je crois que ton message est incomplet

Le lien de Amigo est bon
tcl
array set sc [list \
                      adminpass "***PASS***" \
                      ip              ecmanager2.pro-fhi.net \
                      port           1960 \
                      lien            "http://ecmanager2.pro-fhi.net:1960/;stream.mp3" \
                      annonce     1 \
                      kpl             1 \
]



Amigo: Je te conseille de protéger les valeurs adminpass et lien en les entourant d'un " pour les protéger car TCL peu interpréter le ; comme la fin d'une ligne, et d'autres caractères également qui pourrais avoir d'ans un mot de passe ou dans un lien URL.

Nous pouvons que vivement te conseiller une mise à jour de ton Eggdrop v1.6.21 vers une version récente (V1.9...)

Apres les changements effectuer, relance complément le eggdrop. As-tu d'autres erreurs?
  Reply
#9
merci de votre aide le bot fontionne sauf les cmd !onair et !offair
  Reply
#10
@ZarTek en effet !

tcl
namespace eval sourcing {
	variable last
	if ![info exists last] {set last ""}
 
	bind pub n|n .source [namespace current]::LoadTcl
	bind dcc n|n source [namespace current]::LoadTcl_DCC
 
	proc LoadTcl {nick host hand chan arg} {
		set err [catch_source [lindex $arg 0]]
		if {$err==0} {
			putquick "PRIVMSG $chan :Pas d'erreur"
			return
		}
		foreach line [split $::errorInfo \n] {
			if {$line!=""} {putquick "PRIVMSG $chan :\00314$line\003"}
		}
	}
 
	proc LoadTcl_DCC {hand idx arg} {
		set err [catch_source [lindex $arg 0]]
		if {$err==0} {
			putdcc "Pas d'erreur"
			return
		}
		foreach line [split $::errorInfo \n] {
			if {$line!=""} {putdcc "\00314$line\003"}
		}
 
	}
 
	proc catch_source arg {
		variable last
		if {$arg=="" && $last!=""} {
			set arg $last
		} elseif {$arg=="" && $last==""} {
			return "Please specify a file"
		}
		if [catch {uplevel #0 source scripts/$arg} err] {
			return 1
		}
		return 0
	}
}



Voilà ce que je voulais mettre, un .source sur un canal ou en PL pour voir si ya erreur dans un tcl
Vous interdisez les erreurs, vous empêchez ainsi la victoire.

Ma super kikoo-page loll
  Reply
#11
Quand on met un code comme ça, on précise comment il s'utilise: la commande .source se retrouve modifiée et il faut l'utiliser en ne mettant que le nom du script, à condition qu'il soit dans scripts/.

tcl
if [catch {uplevel #0 source scripts/$arg} err] {


irc.zeolia.net - Offrez-moi un café
Merci de ne pas demander d'aide en MP
  Reply
#12
bonsoir, 
j'ai un autre petit problème au sujet de la police comment modifier les caractère ?


Attached Files Thumbnail(s)
   
  Reply
#13
Pour ton information, ce n'est pas un souci de police mais d'encodage.

Il doit falloir ajouter un encodage ou décodage (plus probablement) utf8 dans la procédure sc::clean car le script, qui commence à dater, n'est pas en utf-8
irc.zeolia.net - Offrez-moi un café
Merci de ne pas demander d'aide en MP
  Reply
#14
(27/09/2021, 00:11)CrazyCat Wrote: Pour ton information, ce n'est pas un souci de police mais d'encodage.

Il doit falloir ajouter un encodage ou décodage (plus probablement) utf8 dans la procédure sc::clean car le script, qui commence à dater, n'est pas en utf-8

donc il faut trouvé un autre script
  Reply
#15
Conclusion un peu rapide alors qu'il y a une procédure à modifier pour lui ajouter quelques caractères à décoder et une ligne pour faire la conversion depuis l'utf-8 (ou vers, il faut tester).

Voici une petite modification de la procédure sc;;clean :

.tcl   scclean.tcl (Size: 3.16 KB / Downloads: 5)
irc.zeolia.net - Offrez-moi un café
Merci de ne pas demander d'aide en MP
  Reply


Forum Jump:


Users browsing this thread: 1 Guest(s)