egghelp/eggheads community

Ofloo

So what are you stuck with, ..

find /usr/lib -iname "tclConfig.sh" or find /usr/local/lib -iname "tclConfig.sh" if no results are found then you should probably install tcl8.6 or something.

Ofloo

[18:39] Tcl error [*raw:318318]: invalid command name "*raw:318318" [18:39] Tcl error [*raw:001001]: invalid command name "*raw:001001" one of the eggdrops i've got gives this error message, .. it's probably supposed to be *raw:001 and *raw:318 it's version 1.6.19 with ipv6 patch...

Ofloo

an other thing i noticed is that the thread crashes when used after the timeout time, .. the second time first time i noticed it sometimes goes beyond.

Which made me wonder do i need additional things to keep the thread alive?

Ofloo

for some reason, with current 1.8.x eggdrop and tcl8.6 it that tpool_test sample only works in when i run the eggdrop with -nt for some reason, can anyone make up why? Also there seems to be a bug in the tpool create, cause when i set -minworkers 1 it seems to block and not create new threads, .. fo...

Ofloo

hi, for some reason tpool doesn't output anything it did while ago, however for some reason when I read out errorInfo it says 11:47 xxr: Currently: can't find package tcllibc 11:47 xxr: Currently: while executing 11:47 xxr: Currently: "package require tcllibc" Now I've been looking but I c...

Ofloo

look for a way to do it with images cause images like jpeg is basically just compressed data, .. read about "blob" type unless you're inserting text then you might better find something like drive compression never really looked into it but i know it used to be on ntfs, years ago when i st...

Ofloo

Fixed error no such var $lookup # # TCL scripts by Ofloo all rights reserved. # # HomePage: http://ofloo.net/ # CVS: http://cvs.ofloo.net/ # Email: support[at]ofloo.net # # This program is free software; you can redistribute it and/or # modify it under the terms of the GNU General Public License # a...

Ofloo

is there a script in the tcl archieve that allows you to !op on !aop .. !voice !avoice and so forth..?

Ofloo

Well i noticed ip-to-coutry that was used with the old script was outdated, .. and ip-to-country site where i used to get my data hasn't updated it's csv since 2010 so i figured it was time to start doing something about it it anyone who wants to use these server feel free, i've set them up to updat...

Ofloo

!ip2c returns own location !ip2c <nick> returns nick location !ip2c <ip4> returns ipv4 location !ip2c <ip6> returns ipv6 location sample Ofloo: !ip2c user Alocer: Mapped IP (2001:0470:1f11:0373:0000:0000:0000:00xx) to (United States) Alocer: Mapped IP (2001:0470:1f11:0373:0000:0000:0000:00xx) to (Re...

Ofloo

$ ./zlib_test.tcl An error occured while fetching http://: corrupted input data $ gunzip /tmp/file.gz $ ls /tmp/file /tmp/file $ #!/usr/local/bin/tclsh8.6 package require http package require zlib set url {http://} set tok [http::geturl $url -binary 1] set dat [http::data $tok] http::cleanup $tok i...

Ofloo

how do i decompress gzip file from url

Code: Select all


package require http
package require zlib

set url "http://"

set tok [http::geturl $url -binary 1]
set dat [http::data $tok]
http::cleanup $tok

catch {[set dcd [zlib decompress $dat]]}

this errors

Ofloo

I am trying to write a challenge respond script what i have figured out so far is that it is using rsa pkcs1 however, .. does anyone know how i would use this in pure tcl, don't want to use binary cause i already know how to do that, .. however i'm wondering how to use pure tcl in tcl challenge resp...

Ofloo

use server socket untested sample code i think it requires tclsh8.5 because of the clock micro proc server_app {s cli_addr cli_port} { while {![eof $s]} { flush $s gets $s buf append new_buf $buf\n } if {[info exists new_buf]} { if {![string equal {} $new_buf]} { set micro [clock micro] if {![catch ...

Ofloo

what a horrible way to store and search that data, .. why not just use array names for the country code and attach country name as data.

Code: Select all

array set list {
  BE Belgium FR France ..
}

foreach {x} [array names list] {
  if {[string equal -nocase $x "be"]} {
    puts $list($x)
  }
}

egghelp/eggheads community

Search found 939 matches

wrong bind

tcllibc ?

ip-to-country.tcl lastest: v0.9

op control

zlib tclsh8.6

rsa pkcs1