| |
| |
| |
|
Page: 1 2 3
Comments:
<0> r u allowed to ask not to ask a question?
<1> it depends if you ask not to ask a question before you not ask the question
<2> r ur ltrz brkn?
<0> o0o
<0> btw anyone uses mysqltcl ?
<3> hy
<3> can someone reccommend some authentication methods for scripts to keep them safe
<4> what platform are the scripts running on?
<3> how can i check current shell version?
<3> ?
<5> ;set text_with_proxy "sometext\n<proxy>\n\n<id>56092</id>\n<ip>192.38.109.143</ip>\n<port>3124</port>\n<country>IANA Reserved</country>\n<type>Anonymous</type>\n<latency>626</latency>\n<reliability>9919</reliability>\n<check>2006-01-11 21:47:31</check>\n</proxy>\nsome other text."
<6> Gotisch: #1893 (313 clicks) Tcl: sometext
<6> Gotisch: #1893 (313 clicks) Tcl: <proxy>
<6> Gotisch: #1893 (313 clicks) Tcl:
<6> Gotisch: There's 13 lines, but I'm not gonna show you the rest of them! =P
<5> arg!
<5> ;proc asdf {} { set text_with_proxy "sometext\n<proxy>\n<id>56092</id>\n<ip>192.38.109.143</ip>\n<port>3124</port>\n<country>IANA Reserved</country>\n<type>Anonymous</type>\n<latency>626</latency>\n<reliability>9919</reliability>\n<check>2006-01-11 21:47:31</check>\n</proxy>\nsome other text."}
<6> Gotisch: #1895 (707 clicks) Tcl:
<5> ;asdf
<6> Gotisch: #1896 (610 clicks) Tcl: sometext
<6> Gotisch: #1896 (610 clicks) Tcl: <proxy>
<5> arg!
<6> Gotisch: #1896 (610 clicks) Tcl: <id>56092</id>
<6> Gotisch: There's 12 lines, but I'm not gonna show you the rest of them! =P
<5> i dont want to see them either
<3> how do i check the platform im running?
<5> ;proc asdf {} { set ::text_with_proxy "sometext\n<proxy>\n<id>56092</id>\n<ip>192.38.109.143</ip>\n<port>3124</port>\n<country>IANA Reserved</country>\n<type>Anonymous</type>\n<latency>626</latency>\n<reliability>9919</reliability>\n<check>2006-01-11 21:47:31</check>\n</proxy>\nsome other text." ;return 1}
<6> Gotisch: #1900 (668 clicks) Tcl:
<5> ;regexp -inline -nocase {<proxy>.*?<id>(.*?)</id>.*?<ip>(.*?)</ip>.*?<port>(.*?)</port>.*?<country>(.*?)</country>.*?<type>(.*?)</type>.*?<latency>(.*?)</latency>.*?<reliability>(.*?)</reliability>.*?<check>(.*?)</check>.*?} $text_with_proxy
<6> Gotisch: #1901 (97460 clicks) Tcl: {<proxy>
<6> Gotisch: #1901 (97460 clicks) Tcl:
<6> Gotisch: #1901 (97460 clicks) Tcl: <id>56092</id>
<6> Gotisch: There's 10 lines, but I'm not gonna show you the rest of them! =P
<5> ;regexp -nocase {<proxy>.*?<id>(.*?)</id>.*?<ip>(.*?)</ip>.*?<port>(.*?)</port>.*?<country>(.*?)</country>.*?<type>(.*?)</type>.*?<latency>(.*?)</latency>.*?<reliability>(.*?)</reliability>.*?<check>(.*?)</check>.*?} $text_with_proxy -> id ip port ; puts "$id - $ip - $port"
<6> Gotisch: #1902 (stdout) 56092 - 192.38.109.143 - 3124
<5> mh
<5> how would i do to retrieve them all if there are more
<5> with -all and foreach?
<5> im sure there was a trick :/
<5> ah got it i think
<5> -foreach { -> var1 var2 var3 } [myregexp] { do something }
<5> no
<3> anyone good with protection?
<3> i want a script to authenticate itself on a server perhaps before functioning
<3> easy?
<7> what do you mean ?
<7> what is "server" ?
<8> whats the best way to protect your script?
<5> this rocks
<5> % load /home/bots/eggdrop/scripts/tclsqlite-3.3.0.so
<5> Segmentation fault
<5> i was about to declare tclsqlite the best script ever!
<5> script lib
<5> { } = =
<5> :]
<8> ?
<5> im getting there
<5> couldn't load file "/usr/lib/sqlite3/libtclsqlite3.so.0": /usr/lib/sqlite3/libtclsqlite3.so.0: undefined symbol: Tcl_NewWideIntObj
<5> its only a matter of hours
<5> while i need to get up in 6
<5> uh
<5> tcl version 8.3 :]
<5> % package require sqlite3
<5> 3.0
<5> muhaha \o/
<8> what's the best way to secure a script?
<9> define secure
<5> n8
<8> turning axx on and off for people
<8> suppose there's a server
<8> and the script logs in
<8> and then the server allows or denys axx ot the script from working each time the person uses it
<10> wait
<10> what the **** is "axx"?
<8> access
<10> Disambiguate it for future reference
<8> oke
<8> err, ok
<8> ;)
<10> There's none I know of off the top of my head, but you could take FireEgl's SafeTcl script and add ACLs to it
<8> mmm
<10> this is if you want arbitrary commands, right?
<8> well what i'd like to do
<10> If you want to permit/prohibit access to a script and its functions in general, then you'd need to devise an ACL
<8> is have an ip the remote shell is on, and a user name based on shell account
<8> ok
<10> What interface would this be going through?
<10> Are they typing commands in IRC, from a shell (what I'm gathering)?
<8> well no, the script will function on their own shell
<8> but it'll only function if authorized from my server
<10> ok so pretty much you have a common library installed on a server
<10> each user has a shell account and potential access to source the script, right?
<8> to get source code? no...i dont want that
<8> i just would like to allow them to run the script only
<10> they have shell accounts, right?
<8> yes
<10> so they'd be doing it from the command-line, right?
<8> remote shell accounts
<8> well i'd like the script to try and authorize automatically
<8> without them doing anything
<10> hm
<10> I believe I know what you're talking about
<8> :)
<10> you're going to give them access to a wrapper script
<10> the wrapper is nothing more than a TCP/IP connection to your master server
<8> a wrapper script?
<8> ah
<8> so if they connect to this wrapper
<10> they send a command, via the wrapper script, goes over the transport, and your server executes it if they're in the permitted userlist, right?
<8> yah
<10> wrappers are nothing more than simple scripts that invoke something else
<8> but they must do this every time they execute the script :)
<10> here's what I suggest
<10> you're going to have two scripts, the wrapper, and your listening service, which fulfills the commands
<10> in the wrapper, upon execution, check for a file named .applicationnamerc
<10> e.g. if your application is named foo
<10> look for a file in $HOME/.foorc
<10> this will contain the user's login and p***word
<10> each on a newline or such
<10> username
<10> p***word
<10> open that file, annnnnd when you're sending a command request in the wrapper script, make it send a preamble that contains the authentication information
<10> e.g., going through the socket...
<10> USER username
<10> P*** p***word
<10> CMD somefunctionname
<10> the listener service dissects this information, authenticates the user, if he's allowed to access the server, authorize the user and see if he can execute the procedure
<10> again this is probably best carried out by keeping that information in a SQL database
<10> user -- char, p***word -- char, role -- set
<10> role references another table with again
<10> excuse me, make role a enum, more than one value, or better yet a bitfield
<10> well hell that's probably getting a little too complex
<8> ;p
<10> but pretty much I'd have two tables, one for user credentials, the other for role types and the functions they can execute
<10> if the user is in the permitted role, execute the function, otherwise just send back ERROR in plaintext to the socket
<8> sweet
<8> sounds good
<10> wrapper picks it up, exits with a non-zero value
<8> any wrapper in particular?
<10> That's how I'd approach it personally
<10> a wrapper is something you write
<10> here, client script
<10> we'll just call it that to demystify the entire process
<10> client scripts are what you're going to distribute to the servers
<8> s how I'd approach it personally
<8> [17:50] * glumdoom (same@69.90.159.111) has joined #tcl
<8> [17:50] <10> a wrapper is something
<10> and the server script is what you'll keep on your own box that carries out the commands
<8> ok
<10> that's probably an easier way of explaining it
<8> if i run this wrapper on a friends box, is there a way i can p***word the wrapper so only i can start it?
Return to
#tcl
or
Go to some related
logs:
#freebsd
gprime.org
#beginner
#nhl
vbscript.dll return code 0x80004005
flash _global register_globals
#politics
#freebsd
#politics
#qmail
|
|