egghelp.org community Forum Index
[ egghelp.org home | forum home ]
egghelp.org community
Discussion of eggdrop bots, shell accounts and tcl scripts.
 
 FAQFAQ   SearchSearch   MemberlistMemberlist   UsergroupsUsergroups   RegisterRegister 
 ProfileProfile   Log in to check your private messagesLog in to check your private messages   Log inLog in 

perlscript.mod in eggdrop 1.9

 
Post new topic   Reply to topic    egghelp.org community Forum Index -> Modules & Programming
View previous topic :: View next topic  
Author Message
shape
Voice


Joined: 31 Oct 2007
Posts: 4

PostPosted: Wed Oct 31, 2007 7:50 am    Post subject: perlscript.mod in eggdrop 1.9 Reply with quote

Well i know that is in freezed developing
but it compiled working & run tcl scripts with limitations...
Question is about primitive perl script...
some information get from google cache (source unaccesible)
http://64.233.183.104/search?q=cache:AN7RcXDNdcwJ:www.eggdrop-fr.org/egg17perl.php+eggdrop+perl&hl=ru&ct=clnk&cd=1&client=opera

on this words trying this sample
Code:

&bind("pub","-","!hello","firstsub");

sub firstsub {
   my ($nick, $uhost, $handle, $chan, $args) = @_;
   putserv "PRIVMSG $chan :Hello!";
}




run it from partyline .perl loadscript "path/to/script"
and after calling !hello on channel bot crashes.
help me to find this problem solution plz.
ps: sorry 4 my english/


Last edited by shape on Thu Nov 01, 2007 3:34 am; edited 2 times in total
Back to top
View user's profile Send private message
Alchera
Revered One


Joined: 11 Aug 2003
Posts: 3344
Location: Ballarat Victoria, Australia

PostPosted: Wed Oct 31, 2007 7:10 pm    Post subject: Reply with quote

As this is a Tcl forum ....

At first glance it appears you actually have Perl & Tcl combined which I gather is incorrect.

I'd suggest getting onto freenode and check out one of the Perl scripting channels?
_________________
Add [SOLVED] to the thread title if your issue has been.
Search | FAQ | RTM
Back to top
View user's profile Send private message Visit poster's website
rosc2112
Revered One


Joined: 19 Feb 2006
Posts: 1454
Location: Northeast Pennsylvania

PostPosted: Wed Oct 31, 2007 9:34 pm    Post subject: Reply with quote

I would hazard a guess if the original source is gone, the module is no longer supported.

If you want to run perl scripts, there are perl irc bots out there. Seems kinda silly to me to want to run perl scripts inside a tcl program like eggdrop.

You could also run perl or other scripts/executables from eggdrop by means of exec. That would probably be a better option than expecting to be able to translate perl into tcl on the fly by way of this module.
Back to top
View user's profile Send private message
shape
Voice


Joined: 31 Oct 2007
Posts: 4

PostPosted: Thu Nov 01, 2007 2:55 am    Post subject: Reply with quote

2 Alchera "As this is a Tcl forum ....", Isnt this eggdrop forum ?
2 rosc2112 "run perl scripts inside a tcl program like eggdrop.",
eggdrop 1.9 have script independent engine. scripting support realised as module at this moment eggdrop 1.9 have tclscript.mod perlscript.mod javascript.mod.
Back to top
View user's profile Send private message
nml375
Revered One


Joined: 04 Aug 2006
Posts: 2853

PostPosted: Thu Nov 01, 2007 8:44 am    Post subject: Reply with quote

I would actually go even further, and saying eggdrops up until (and including) 1.6.18 is NOT a tcl program (tcl:et), but rather a tcl-enhanced software. Considdering this was posted under "Modules & Programming", I'd say the post is just in the right place.

Now, as for the actual query, did you get any coredumps?
_________________
NML_375, idling at #eggdrop@IrcNET
Back to top
View user's profile Send private message
shape
Voice


Joined: 31 Oct 2007
Posts: 4

PostPosted: Thu Nov 01, 2007 10:13 am    Post subject: Reply with quote

http://rapidshare.com/files/66718759/core.10252.bz2.html
here is coredump but... how i can get something from it.
Back to top
View user's profile Send private message
nml375
Revered One


Joined: 04 Aug 2006
Posts: 2853

PostPosted: Thu Nov 01, 2007 10:46 am    Post subject: Reply with quote

You'll have to use the tool "gdb". Usually you'd start it like this:
Code:
gdb eggdrop -c core.10252


Once started, issue the command "bt", and hit enter.
This will list a trace of function-calls up until the point where your bot crashed, usually pointing a finger at which function being bugged.
_________________
NML_375, idling at #eggdrop@IrcNET
Back to top
View user's profile Send private message
shape
Voice


Joined: 31 Oct 2007
Posts: 4

PostPosted: Thu Nov 01, 2007 10:57 am    Post subject: Reply with quote

Code:

Program terminated with signal 11, Segmentation fault.
#0  0xb7e083b7 in c_to_perl_var (v=0xbfea5ad8) at perlscript.c:371
371                             handle = u->handle;
(gdb) bt
#0  0xb7e083b7 in c_to_perl_var (v=0xbfea5ad8) at perlscript.c:371
#1  0xb7e089e8 in my_perl_callbacker (me=0x80f30d8) at perlscript.c:229
#2  0xb7f77d35 in bind_entry_exec (table=0x80ae158, entry=0xbfea5ad8,
    al=0xb7e16be4) at binds.c:335
#3  0xb7f78059 in bind_vcheck_hits (table=0x80ae158, user_flags=0x0,
    match=0xbfea5f0a "!hello", hits=0x0, ap=0xbfea5bdc "▒^▒▒^▒")
    at binds.c:447
#4  0xb7f78205 in bind_check (table=0x80ae158, user_flags=0x0,
    match=0xbfea5f0a "!hello") at binds.c:373
#5  0xb70bcb04 in gotmsg (from_nick=0xbfea5ee4 "shape",
    from_uhost=0xbfea5eea "F@mail.ien.ru", u=0x0, cmd=0xbfea5ef8 "PRIVMSG",
    nargs=2, args=0xbfea5dc0) at input.c:306
#6  0xb7f77d35 in bind_entry_exec (table=0x80adfc8, entry=0xbfea5ad8,
    al=0xb7e16be4) at binds.c:335
#7  0xb7f78059 in bind_vcheck_hits (table=0x80adfc8, user_flags=0x0,
    match=0xbfea5ef8 "PRIVMSG", hits=0x0, ap=0xbfea5cfc "▒^▒▒^▒")
    at binds.c:447
#8  0xb7f78205 in bind_check (table=0x80adfc8, user_flags=0x0,
    match=0xbfea5ef8 "PRIVMSG") at binds.c:373
#9  0xb70bce4f in server_LTX_server_parse_input (text=<value optimized out>)
    at input.c:70
#10 0xb70bf054 in server_on_read (client_data=0x0, idx=4,
    text=0xbfea5ee3 ":shape", len=45) at servsock.c:156
#11 0xb7f873a7 in sockbuf_on_read (idx=4, level=6000,
    data=0xbfea5ee3 ":shape", len=45) at sockbuf.c:283
#12 0xb7f818ac in linemode_on_read (client_data=0x80c03a8, idx=4,
    data=0xbfea5ee3 ":shape", len=47) at linemode.c:77
#13 0xb7f873d7 in sockbuf_on_read (idx=4, level=-1, data=0xbfea5ee3 ":shape",
    len=47) at sockbuf.c:277
#14 0xb7f88c3c in sockbuf_update_all (timeout=998) at sockbuf.c:425
#15 0x08050595 in main (argc=1, argv=0xbfea7064) at main.c:493


here it is...
one thing left for undestand what is exactly goes wrong
Back to top
View user's profile Send private message
nml375
Revered One


Joined: 04 Aug 2006
Posts: 2853

PostPosted: Thu Nov 01, 2007 11:11 am    Post subject: Reply with quote

At a first glance, it would seem it chokes when trying to create the $handle perl variable from the internal data structures.
I'm not sure if/how the 1.9 tree is progressing, but it might be worth sending a bugreport to eggheads.org, including this "bt"
_________________
NML_375, idling at #eggdrop@IrcNET
Back to top
View user's profile Send private message
Display posts from previous:   
Post new topic   Reply to topic    egghelp.org community Forum Index -> Modules & Programming All times are GMT - 4 Hours
Page 1 of 1

 
Jump to:  
You cannot post new topics in this forum
You cannot reply to topics in this forum
You cannot edit your posts in this forum
You cannot delete your posts in this forum
You cannot vote in polls in this forum


Forum hosting provided by Reverse.net

Powered by phpBB © 2001, 2005 phpBB Group
subGreen style by ktauber