Shireroth Banking Program v0.9beta now testing...

[Erik Mortis]

I can keep the give and take processes from colliding by combining them! make all the changes in variable.. kinda like doing math of scratch paper.. make sure I open the database.. than... in a single move add/subtract funds. This keeps things from over lapping... still not sure if they CAN overlap.. but whatever... Erik Mortis BrookshireCommoner of Alexandretta

[Erik Mortis]

#possible replacement for Give and TakeFunds and the Transfer wrapper.. (Finish!)sub MakeChange&nbsp &nbsp &nbsp &nbsp &nbsp &nbsp &nbsp &nbsp {&nbsp &nbsp &nbsp &nbsp &nbsp &nbsp &nbsp &nbsp my ($funds); #funds to move&nbsp &nbsp &nbsp &nbsp &nbsp &nbsp &nbsp &nbsp my ($from);&nbsp &nbsp &nbsp &nbsp &nbsp &nbsp &nbsp &nbsp my ($to);&nbsp &nbsp &nbsp &nbsp &nbsp &nbsp &nbsp &nbsp &nbsp &nbsp &nbsp &nbsp &nbsp &nbsp &nbsp &nbsp my ($fbfunds); #from start&nbsp &nbsp &nbsp &nbsp &nbsp &nbsp &nbsp &nbsp my ($fefunds); #from end&nbsp &nbsp &nbsp &nbsp &nbsp &nbsp &nbsp &nbsp &nbsp &nbsp &nbsp &nbsp &nbsp &nbsp &nbsp &nbsp my ($tbfunds); #To start&nbsp &nbsp &nbsp &nbsp &nbsp &nbsp &nbsp &nbsp my ($tefunds); #To end&nbsp &nbsp &nbsp &nbsp &nbsp &nbsp &nbsp &nbsp my (%userfunddata);&nbsp &nbsp &nbsp &nbsp &nbsp &nbsp &nbsp &nbsp $funds = $_[0];&nbsp &nbsp &nbsp &nbsp &nbsp &nbsp &nbsp &nbsp $from = $_[1];&nbsp &nbsp &nbsp &nbsp &nbsp &nbsp &nbsp &nbsp $to = $_[2];&nbsp &nbsp &nbsp &nbsp &nbsp &nbsp &nbsp &nbsp #Find how much the sender has and do the math.&nbsp &nbsp &nbsp &nbsp &nbsp &nbsp &nbsp &nbsp $fbfunds = getuserfunds($from]);&nbsp &nbsp &nbsp &nbsp &nbsp &nbsp &nbsp &nbsp $fefunds = ($fbfunds - $funds);&nbsp &nbsp &nbsp &nbsp &nbsp &nbsp &nbsp &nbsp #find how much the reciever has and do the math.&nbsp &nbsp &nbsp &nbsp &nbsp &nbsp &nbsp &nbsp $tbfunds = getuserfunds($to]);&nbsp &nbsp &nbsp &nbsp &nbsp &nbsp &nbsp &nbsp $tefunds = ($tbfunds + $funds);&nbsp &nbsp &nbsp &nbsp &nbsp &nbsp &nbsp &nbsp #open the database and make the changes.&nbsp &nbsp &nbsp &nbsp &nbsp &nbsp &nbsp &nbsp dbmopen(%userfunddata, "userfunddata", 0644);&nbsp &nbsp &nbsp &nbsp &nbsp &nbsp &nbsp &nbsp $userfunddata{$from} = $fefunds;&nbsp &nbsp &nbsp &nbsp &nbsp &nbsp &nbsp &nbsp &nbsp &nbsp &nbsp &nbsp &nbsp &nbsp &nbsp &nbsp $userfunddata{$to} = $tefunds;&nbsp &nbsp &nbsp &nbsp &nbsp &nbsp &nbsp &nbsp dbmclose(%userfunddata);&nbsp &nbsp &nbsp &nbsp &nbsp &nbsp &nbsp &nbsp #log the transaction!&nbsp &nbsp &nbsp &nbsp &nbsp &nbsp &nbsp &nbsp &nbsp &nbsp &nbsp &nbsp &nbsp &nbsp &nbsp &nbsp logtrans($from,$funds,$to,$_[3]);&nbsp &nbsp &nbsp &nbsp &nbsp &nbsp &nbsp &nbsp &nbsp &nbsp &nbsp &nbsp }This replaces 3 subrutines by putting 2 of them in the same sub as the 3rd one that was just a wrapper. Erik Mortis BrookshireCommoner of Alexandretta

[Erik Mortis]

Ok.. that created a fun glitch were you could transfer money to yourself and make a profit equal to how much you tried to send...That's fixed now... Erik Mortis BrookshireCommoner of Alexandretta

[Erik Mortis]

OK!.. Ari!.. I think I got it this time. I call this line right after I call use CGi and use fnctl or whatever the are.. and before I go to create and CGI open(STOPLIGHT, '>', 'stoplight.loc'); #open stoplight file.sublock(STOPLIGHT); #lock stoplight to prevent anyone else from doing anything while we work. No Collisions = good.Than after I finish the HTML page and doing anything.. I call.subunlock(STOPLIGHT); #unlock stoplight now that we have finished our work.close STOPLIGHT; #close stoplight just to be clean about it. If my theory is correct.. that'll prevent collision? As long as all programs that access the database use those? Erik Mortis BrookshireCommoner of AlexandrettaHeir to the Line of Metzler/Mortis/RaynorBig Cheese of Rrakanychan Inc.Shirerithian ElderGeneral in the YAC

[Erik Mortis]

hmmm....so... about creating accounts... with emails.. I could do that.. hmmmm... maybe... I'm not sure I like the idea of people making their own accounts for security reasons.but perhaps having a database of emails and corrisponding emails would be good. Erik Mortis BrookshireCommoner of AlexandrettaHeir to the Line of Metzler/Mortis/RaynorBig Cheese of Rrakanychan Inc.Shirerithian ElderGeneral in the YAC

[Austi Scot]

... but making an account does not mean they can put Erb into their own account. Someone would have to pay them - so if a person can create an account by email a message could then go to admin -- but doesn't have to cuz admin can check the list of accounts.So, just opening an account means nothing - then you have to get someone to pay you - and to do that the person has to have Erb.Yeah, that's what I mean.

[Erik Mortis]

Well yes.. hmmm... I could have a database of emails.. and have an account name to go with it. So if someone tries to use the same email twice it'll throw and error. I'll make it a seperate program from the bank and merge it later if I like it. I can make this... I'll have it log account creation. Erik Mortis BrookshireCommoner of AlexandrettaHeir to the Line of Metzler/Mortis/RaynorBig Cheese of Rrakanychan Inc.Shirerithian ElderGeneral in the YAC

[Erik Mortis]

I'm just worried about bogus emails... And I'm not sure how to deal with that... but with account creation being logged and reviewed by the admin.. that might not be a problem...Than agian.. what if someone just started making accounts..... hmmm.. need to look into IP logging... than...we can ban IPs maybe... Erik Mortis BrookshireCommoner of AlexandrettaHeir to the Line of Metzler/Mortis/RaynorBig Cheese of Rrakanychan Inc.Shirerithian ElderGeneral in the YAC

[Erik Mortis]

I can have it log IP, Username, Time and Email.When someone goes to make an account.... it checks the email against the email/Username list to make sure no one else is using that email.. than makes sure no one else is using that username.... than checks to make sure the IP of the user isn't banned. (I'm not sure how I'm going to handle the fact dial-up IPs change. need to deal with ranges... which I can do...) just some fun pattern matching... Erik Mortis BrookshireCommoner of AlexandrettaHeir to the Line of Metzler/Mortis/RaynorBig Cheese of Rrakanychan Inc.Shirerithian ElderGeneral in the YAC

[Ari Rahikkala]

Quote:I call this line right after I call use CGi and use fnctl or whatever the are.. and before I go to create and CGIopen(STOPLIGHT, '>', 'stoplight.loc'); #open stoplight file.sublock(STOPLIGHT); #lock stoplight to prevent anyone else from doing anything while we work. No Collisions = good.Than after I finish the HTML page and doing anything.. I call.subunlock(STOPLIGHT); #unlock stoplight now that we have finished our work.close STOPLIGHT; #close stoplight just to be clean about it.If my theory is correct.. that'll prevent collision? As long as all programs that access the database use those?That sounds about right. If it's really needed, you might make your lock granularity finer later, but it's not needed yet. Do note, however, that...- you can just use flock()/funlock() directly in this case, after all, you're never going to write anything in stoplight.loc so the seek() in sublock() is just fluff (the only thing it hurts is performance, though, and even there the hit is minimal, so it doesn't really matter which you use)- should you ever want to lock a file you do want to write in, and should you write subroutines for getting and releasing the lock, read http://www.netalive.org/codersgu...1832.shtml to find out the correct syntax for it Do you really believe Project Bluebook revealed EVERYTHING the Army Air Corps knew? Do you know what REALLY happened at Roswell, New Mexico in the late 1940s? Have you even heard about the Men in Black? Do you have any friends who have `missing days'? Do you sleep with your window unlocked?Be seeing you...

[Erik Mortis]

Woot!... Now I can move on....I love you Ari! *disclaimer*... Erik Mortis BrookshireCommoner of AlexandrettaHeir to the Line of Metzler/Mortis/RaynorBig Cheese of Rrakanychan Inc.Shirerithian ElderGeneral in the YAC

[Erik Mortis]

The bank is ready for you Austi. As it stands you have to make accounts.. but that'll change as time goes on. I don't plan to change anything regarding the databases. if I do I'll notify you and supply a converting tool (note on those.. run them ONLY once...).. the password for the admin account is the same. it will be the ONLY account. I need to clean up some messes on the server.. but that won't affect you. I'll continue developing the bank and creating revisions.And the bank script crashed.. damn it.. well.. by the time you read this it'll be good to go.. the admintool functions.. Erik Mortis BrookshireCommoner of AlexandrettaHeir to the Line of Metzler/Mortis/RaynorBig Cheese of Rrakanychan Inc.Shirerithian ElderGeneral in the YAC

[Erik Mortis]

FIXED!I really need to learn to use operators correctly.. Erik Mortis BrookshireCommoner of AlexandrettaHeir to the Line of Metzler/Mortis/RaynorBig Cheese of Rrakanychan Inc.Shirerithian ElderGeneral in the YAC

[Austi Scot]

My first attempt to login to the admin tool using the login and password you emailed to me.Quote:AdminTool--------------------------------------------------------------------------------Time: Sun Apr 4 01:35:08 2004--------------------------------------------------------------------------------ERROR: Block Two

[Erik Mortis]

lemme take a look..you really need to get AIM.... MSN doesn't let me sign on.. Erik Mortis BrookshireCommoner of AlexandrettaHeir to the Line of Metzler/Mortis/RaynorBig Cheese of Rrakanychan Inc.Shirerithian ElderGeneral in the YAC

[Erik Mortis]

Ok.. the problem must be with the DBMWrite program.. gimme 10.. Erik Mortis BrookshireCommoner of AlexandrettaHeir to the Line of Metzler/Mortis/RaynorBig Cheese of Rrakanychan Inc.Shirerithian ElderGeneral in the YAC

[Erik Mortis]

Fixed.... Old modification when I was making the program so it could be used with other database filenames. Erik Mortis BrookshireCommoner of AlexandrettaHeir to the Line of Metzler/Mortis/RaynorBig Cheese of Rrakanychan Inc.Shirerithian ElderGeneral in the YAC

[Austi Scot]

Quote:AdminTool--------------------------------------------------------------------------------Time: Sun Apr 4 05:05:08 2004--------------------------------------------------------------------------------input contain illegal charactersThis was an attempt to add a user ... Austi_Scotamount: 123.23the illegal character may have been the . in the money - that is what I think, but I suppose it could have been the dash in the user name.Erik: BUG FIXED Edited by: Erik Mortis Brookshire at: 4/4/04 2:11 pm

[Austi Scot]

Created two accounts - Added Erb ... of 21.21Quote:Time: Sun Apr 4 05:35:14 2004--------------------------------------------------------------------------------input contain illegal characters Probably the dot --- Erik: BUG FIXEDwent to bank to transfer funds.was successful but got this ...Quote:Time: Sun Apr 4 05:11:10 2004Check BalanceYour Funds are: 86.5 ... when checking the balance left. It appears to have the correct math, but has only one decimal place ... I'll go try with a transfer that doesn't end in 0.Erik: BUG FIXEDQuote:Time: Sun Apr 4 05:14:32 2004Check BalanceYour Funds are: 64.98 ok, that looks good .. now I'll transfer an amount that should end up in zero.Quote:Time: Sun Apr 4 05:16:03 2004Check BalanceYour Funds are: 60 .. I suppose, but it would be better if it read - 60.00 Now the log file looks great - I like that, at least so far.Quote:Time: Sun Apr 4 05:17:10 2004--------------------------------------------------------------------------------austi_scot Moved 23.50Erb To second_one on Sun Apr 4 05:11:01 2004. REASON: Just Because austi_scot Moved 21.52Erb To second_one on Sun Apr 4 05:14:26 2004. REASON: Wages austi_scot Moved 4.98Erb To second_one on Sun Apr 4 05:15:57 2004. REASON: Taxes Checking individual user data:Quote:Time: Sun Apr 4 05:19:34 2004--------------------------------------------------------------------------------Userfunds are: 60 Would perfer it read - 60.00Did a delete log file - was asked if I was sure because it was not reversable -- good I like that. But then I went to view logfile - it shouldn't be there, but:Quote:Time: Sun Apr 4 05:21:42 2004--------------------------------------------------------------------------------austi_scot Moved 23.50Erb To second_one on Sun Apr 4 05:11:01 2004. REASON: Just Because austi_scot Moved 21.52Erb To second_one on Sun Apr 4 05:14:26 2004. REASON: Wages austi_scot Moved 4.98Erb To second_one on Sun Apr 4 05:15:57 2004. REASON: Taxes Also, I just thought - why aren't the actions of adding funds part of the logfile?Erik: BUG FIXEDDid a change password on user austi_scot -- was told successful. Went to login with the new password - got:Quote:Time: Sun Apr 4 05:25:58 2004--------------------------------------------------------------------------------ERROR: Block Two Went back to login with the old password - got:[Quote:quote]Time: Sun Apr 4 05:27:07 2004--------------------------------------------------------------------------------ERROR: Block TwoTime: Sun Apr 4 05:27:47 2004You failed to login[/quote] ok, it must have just taken a few minutes cuz now it let me login with the new password.Hey, I really like this feature. I did a delete user and got thisQuote:Time: Sun Apr 4 05:30:45 2004--------------------------------------------------------------------------------58.99 moved to admin accountDatabase Entries Removed. So I don't have to move all the funds first - the delete user does that for me - great feature! List all users shows it really happened.Quote:Time: Sun Apr 4 05:31:07 2004--------------------------------------------------------------------------------Username: second_one | Funds: 161.01Username: admin | Funds: 58.99 So, that's about all I'm going to check right now. Let me know when these issues are resolved.And thanks - a great job on the bank. I'm sure Shireroth will be able to use it soon.Austi Edited by: Erik Mortis Brookshire at: 4/4/04 2:42 pm

[Ari Rahikkala]

Quote:Would perfer it read - 60.00Erik: If the variable holding the funds is $foo, the statement for printing the right value with that precision isprintf ("%.2f", $foo); Do you really believe Project Bluebook revealed EVERYTHING the Army Air Corps knew? Do you know what REALLY happened at Roswell, New Mexico in the late 1940s? Have you even heard about the Men in Black? Do you have any friends who have `missing days'? Do you sleep with your window unlocked?Be seeing you...

[Erik Mortis]

THanky!..print p("Userfunds are:"); printf("%.2f", $readfunds);put I want all that on one line... Put I don't know how..Guess I oughta go read up on printf...Some of those errors confuse me....ok.. for usernames... for security.. ONly a-zA-Z0-9_ are alowed "-" not included. So don't use symbols or anything... I'll have to check in more detail on why you got all the errors.. Erik Mortis BrookshireCommoner of AlexandrettaHeir to the Line of Metzler/Mortis/RaynorBig Cheese of Rrakanychan Inc.Shirerithian ElderGeneral in the YAC

[Erik Mortis]

my $text = "Userfunds are: ";printf ("%15s %.2f", $text, $readfunds);No.. onto those glitches.. Erik Mortis BrookshireCommoner of AlexandrettaHeir to the Line of Metzler/Mortis/RaynorBig Cheese of Rrakanychan Inc.Shirerithian ElderGeneral in the YAC

[Erik Mortis]

The log ONLY logs User transactions. I guess I could make an Admin log.... But.. seeing as the admin features really don't need to be logged... Addfunds is for creating money that doesn't exsist.. after the initial set up you'll proly only use it on the treasury.So I THINK I fixed all those bugs now. most of the errors dealing with money was as you said.. the dot... it was cause I was passing the numbers through Stringman and not Check number.. silly me. I got so many subrutines... but at least it helps keep things manageable...The logfile problem was my mistake I had conficting names.. I went in and made it so that in this version all filenames can be changed with a single variable... So for testing I can change it to use database2 instead of 1. so I can test and NOT interfer with the real bank. I guess I missed a instance of logfile... Not anymore.So I don't plan to log admin actions but if you REALLY want me to.. I will the problem is that the admin has so many different actions to choose from it might require alot of one use subrutines.. well.. I guess I could pass variables to a single subrutine that let it know what to log.. but... it would get messy and I rather not. I DO have it log the deletion of the log file though... I guess I could have it log the adding of funds.. I'll keep that in mind for the next update. I have some ideas that might make things easier for users.. I just need to see if I can use an array the way I want to..hehehe Erik Mortis BrookshireCommoner of AlexandrettaHeir to the Line of Metzler/Mortis/RaynorBig Cheese of Rrakanychan Inc.Shirerithian ElderGeneral in the YAC

[Austi Scot]

Yeah, you make a good point - no need to log admin functions. My intentions are to set up the admin account with a large amount of Erb and then to do transfers as needed. So, I'll be testing how many places I can use in the money field eg: xxxxxxxxx.xx - I'll probably be testing later tonight.The one feature I really wish for is a list of users at the bank - so people will be sure they are attempting to pay someone who has an account.

[Ari Rahikkala]

Quote: my $text = "Userfunds are: ";printf ("%15s %.2f", $text, $readfunds);printf ("Userfunds are: %.2f", $readfunds); Do you really believe Project Bluebook revealed EVERYTHING the Army Air Corps knew? Do you know what REALLY happened at Roswell, New Mexico in the late 1940s? Have you even heard about the Men in Black? Do you have any friends who have `missing days'? Do you sleep with your window unlocked?Be seeing you...

[Erik Mortis]

Oh... THanks!. Now I get it. oh well.. wasn't high on my prioities.. wow.. I got almost no work done today.. my day consisted of.. bug fixing... than... going to lunch/dinner with rob to tacohut.. running into Mike and Paul... talking with them for a while.. than while with them running into Jen and the guy who played Big Bill Johnson at game.... THan going to game and than to Shannon/Ethen place with them and Tawnya for a while talking game and they had tacobell...and coming back here... Game was fun..... Someone died... and I finaly got Rob to go.. and he had alot of fun.. YAY for being Whip of my clan... and the Primagen not being there... I was acting primagen... THan we also had no harpy.. senishal... or herrald... which made things hard... So I had to "babysit" the new malkavian.. (Rob)... which was cool.. His character is gonna go well with mine... He's big on Knowledge.. I'm big on wisdom.. and advice.. together... nice combo.. than Shasta And I make a good combo... So.. things are just working out left and right.. And Mari(sp?) is up for harpy.. (Go Alex Go!)... damn... if Oliver doens'tshow more I'm gonna get stuck with Primagen....ickypoo... My character doesn't want that...Found out I can't do the path I want. Infact.. I don't even WANT to be on a path.. since they are something other than what I thought they where....So.. Just gonna have to live with Humanity.. and since I have high counsionce... and 4 will power.. AND 4 humanity.. I get 3 chances NOT to lose a dot... and all I have to do is tie or win.. so 2/3rds of the time I win... I only have a 3.70% chance of loseing ALL 3 throws..Why am I talking about this here?..Back to business!....I MISS ALEX! Erik Mortis BrookshireCommoner of AlexandrettaHeir to the Line of Metzler/Mortis/RaynorBig Cheese of Rrakanychan Inc.Shirerithian ElderGeneral in the YAC

[Erik Mortis]

must... stay.. awake.. must... program!.......*thunk* Erik Mortis BrookshireCommoner of AlexandrettaHeir to the Line of Metzler/Mortis/RaynorBig Cheese of Rrakanychan Inc.Shirerithian ElderGeneral in the YAC

[Erik Mortis]

Austi add a "2" to the two program names and you'll be able to play with the developmental version of the bank. All the same passwords and stuff... But that's just new features... so.. yeah.. focus bug checking on what I have installed.. Erik Mortis BrookshireCommoner of AlexandrettaHeir to the Line of Metzler/Mortis/RaynorBig Cheese of Rrakanychan Inc.Shirerithian ElderGeneral in the YAC

[Erik Mortis]

OR!... to save on postage!$funds = sprintf("%.2f", $funds);print p("Userfunds are: $funds"); Erik Mortis BrookshireCommoner of AlexandrettaHeir to the Line of Metzler/Mortis/RaynorBig Cheese of Rrakanychan Inc.Shirerithian ElderGeneral in the YAC

[Ari Rahikkala]

Quote:$funds = sprintf("%.2f", $funds);Please... don't do that to this poor C programmer's brain of mine... Do you really believe Project Bluebook revealed EVERYTHING the Army Air Corps knew? Do you know what REALLY happened at Roswell, New Mexico in the late 1940s? Have you even heard about the Men in Black? Do you have any friends who have `missing days'? Do you sleep with your window unlocked?Be seeing you...