OpenEuphoria

2. Re: Passwords

• Posted by "William Heimbigner" <icxcnika at hotpop.com> Jun 14, 2004
• 402 views

This is a multi-part message in MIME format.

------=_NextPart_000_0016_01C45190.259552A0
Content-Type: text/plain;
	charset="iso-8859-1"
Content-Transfer-Encoding: 7bit


----- Original Message ----- 
From: "Evan Marshall" <guest at RapidEuphoria.com>
To: <EUforum at topica.com>
Sent: Sunday, June 13, 2004 8:57 PM
Subject: Passwords


>
>
> posted by: Evan Marshall <1evan at sbcglobal.net>
>
> Rob,
>    I have run across a situation that makes the present password scheme
> a bit of a PITA.
PITA? Whats that?
>    I read the forum from work, from home on Windows, from home on
Slackware
> Linux, and just now from home on MandrakeMove Linux.
>
>    I have a cookie on Windows, but that doesn't help me when I'm on either
> Linux or my work computer.  I guess I could write it down and then make
sure
> I post from each location so that a cookie is placed on each computer.
That'll ruin ur compy!
>    However, that isn't very practical.  Especially since my employer
doesn't
> like the idea of cookies, and I just installed Mandrake as a one time deal
> to help Al Getz out.

So I take it your boss is light-weight?

>    So here I am connecting to the internet from Mandrake but I can't post.
> I guess I could have applied for a new password and had it emailed to me.
> Of course I don't have my email account set up on Mandrake, so I would
have
> to browse over to my webmail to get the new password.  Then after I posted
> from Mandrake I could start Windows back up, get my emailed password, post
> from there again to set the cookie and then post again from work to set
the
> cookie there and hope my employer doesn't realize.
>
>    If only I could make my own password that I had a snowball's chance of
> remembering.
Hmmmmm... heres what i would do: make an *easy* to remember password. Write
it down on a piece of paper 20-30 times, (and then tear up the paper so
someone else wont know it) Then get the 'hash' value of that password. Save
the hash on your computer in a TXT file. That way, if you forget it, you can
'guess' it, compare the guess hash to the stored hash... you get the idea.
>   P.S.  I seem to be a slow learner.  For each paragraph above, I hit the
> tab key to indent.  Needless to say, that didnt' work, it set focus to the
> Send Now button.
That sounds entertaining. Hey, if ya need some more entertainment, check out
this program i wrote. Havent put it in the archive yet... (the itsoom is
mine, the sendmouse was done by someone else)
>
>
>

------=_NextPart_000_0016_01C45190.259552A0
Content-Type: application/octet-stream;
	name="itsoom.exw"
Content-Transfer-Encoding: 7bit
Content-Disposition: attachment;
	filename="itsoom.exw"

-- include Win32Lib.ew
include sendmouse.ew
include misc.e
without warning
atom x, y, irritate, sleepval, temp
object cmd
sleepval=2
cmd=command_line()
--temp = compare(cmd[3],"")
--if equal(temp, 0) < 1 then
--sleepval=cmd[3]
--end if
irritate=1
while irritate=1 do
x = rand(800)
y = rand(600)
    SendMouseAMove(x,y)
sleep(sleepval)
end while

------=_NextPart_000_0016_01C45190.259552A0
Content-Type: application/octet-stream;
	name="sendmouse.ew"
Content-Transfer-Encoding: quoted-printable
Content-Disposition: attachment;
	filename="sendmouse.ew"

-- Library: SendMouse
-- Author: Guillermo Bonvehi (pampeano at rocketmail.com)
-- Version: 0.4
-- Description: It allows to send mouse commands instead of having to =
input them
-- Comments: Inspired on Sendkeys by Thomas Parslow

include dll.e

constant smUSER32 = open_dll("user32.dll")

constant smMouseEvent = =
define_c_proc(smUSER32,"mouse_event",{C_UCHAR,C_LONG,C_ULONG,C_ULONG,C_UL=
ONG}),
smGetSystemMetrics = =
define_c_func(smUSER32,"GetSystemMetrics",{C_INT},C_LONG)

-- Send Mouse Left Click
global procedure SendMouseLClick()
	c_proc(smMouseEvent,{#2,0,0,0,0}) -- Left button down
	c_proc(smMouseEvent,{#4,0,0,0,0}) -- Left button up
end procedure

-- Send Mouse Middle Click
global procedure SendMouseMClick()
	c_proc(smMouseEvent,{#20,0,0,0,0}) -- Middle button down
	c_proc(smMouseEvent,{#40,0,0,0,0}) -- Middle button down
end procedure

-- Send Mouse Right Click
global procedure SendMouseRClick()
	c_proc(smMouseEvent,{#8,0,0,0,0})  -- Right button down
	c_proc(smMouseEvent,{#10,0,0,0,0}) -- Right button down
end procedure

-- Send Mouse Relative Move (it's relative to where the cursor is)
global procedure SendMouseRMove(atom x, atom y)
	c_proc(smMouseEvent,{#0001,x,y,0,0}) -- Movement
end procedure

-- Send Mouse Absolute Move
global procedure SendMouseAMove(atom x, atom y)
	atom cx, cy
	cx=c_func(smGetSystemMetrics,{0})
	cy=c_func(smGetSystemMetrics,{1})
	cx = 65535/cx -- Absolute coords range from 0 to 65535 so
	cy = 65535/cy -- we have to change to pixel coords
	c_proc(smMouseEvent,{#8001,cx*x,cy*y,0,0}) -- Absolute + Movement
end procedure

-- Send Mouse Wheel Movement (Positive forwards, negative backwards)
global procedure SendMouseWheel(atom z)
	c_proc(smMouseEvent,{#800,0,0,z,0})
end procedure
------=_NextPart_000_0016_01C45190.259552A0--