View/Edit #305:do_login_command

Switch to edit mode.

Name(s): do_login_command
1:  if (!argstr)
2:    return notify(player, "00")
3:  endif
4:  "ack it is endless spamming somehow -whiz, Jan 2022"
5:  return
6:  {username, pass, size} = $su:explode(argstr, ":")
7:  user = $su:match_player(username)
8:  if (!valid(user))
9:    return notify(player, "01")
10: endif
11: if (!$perm_utils:authorise_user(user, pass, username))
12:   return notify(player, "01")
13: endif
14: size = toint(size)
15: if (user:free_dbytes() < size)
16:   return notify(player, "02")
17: endif
18: for who in (this.spies)
19:   who:tell("[#305]: File upload by ", $su:nn(user), " (aka ", username, ") to ", user:basedir(), "/")
20: endfor
21: return notify(player, "03:" + tostr(user:basedir()))
22: "Last modified by whiz (#3135) on Thu Jan 20 01:48:58 2022 UTC."

Verb arguments: this none this
Verb perms: Readable eXecutable NOT-Debug
Verb owned by: Lao-Tzu (#8084)

You are not logged in.

[home | help | who | search | setup | code]