X-Git-Url: http://dxcluster.net/gitweb/gitweb.cgi?a=blobdiff_plain;f=html%2Fprogram.html;h=9b6262ec28dcc9575fa5c4f9c7d4d19f170c215e;hb=refs%2Fheads%2Fnewusers;hp=1be759f0ab4247e031219b54a95f0f1ade2db365;hpb=5d197c9f7aa2ea796d86aa5473f93956b24cf1b7;p=spider.git diff --git a/html/program.html b/html/program.html index 1be759f0..9b6262ec 100644 --- a/html/program.html +++ b/html/program.html @@ -2,10 +2,12 @@ Programming New Commands - + + + @@ -132,7 +134,7 @@ Last modified: Mon Dec 28 23:13:21 GMT 1998 and are subroutines derived from the DXChannel class. They effectively the following declaration :-

-  sub Emb_($self, $args)
+  sub Emb_<cmdname>($self, $args)
   {
      ...
      your code here
@@ -155,7 +157,7 @@ Last modified: Mon Dec 28 23:13:21 GMT 1998
   my @out;
 
   # check privileges
-  return (1, $self->msg('e5')) if $self->priv < 5;
+  return (1, $self->msg('e5')) if $self->priv < 5;
 
   ....
   ....
@@ -226,11 +228,11 @@ my @out;
 my $user;
 my $ref;
   
-return (1, $self->msg('e5')) if $self->priv < 9;
+return (1, $self->msg('e5')) if $self->priv < 9;
   
 foreach $call (@args) {
     $call = uc $call;
-    if ($ref = DXUser->get_current($call)) {
+    if ($ref = DXUser::get_current($call)) {
         $ref->passwd($pass);
   	    $ref->put();
   		push @out, $self->msg("password", $call);
@@ -301,11 +303,11 @@ return (1, @out)
 
 		

  • It is important that you remember when you have tie hashes using MLDBM et al. If you do a - DXUser->get($call) you will get a different (older) + DXUser::get($call) you will get a different (older) thing than the one in $self->user. This is almost certainly NOT what you want if want to modify a user that is currently connected. Either use $self->user or, if - you want another user, use DXUser->get_current($call) + you want another user, use DXUser::get_current($call)

  • If you want to debug something, start the cluster.pl up thus:-
    @@ -331,7 +333,7 @@ return (1, @out)
     		mean that this is a prompt and will not have a \r or \n appended to
     		it in the client for telnet sessions (only).
     
    -		

  • help is kept in /spider/cmd/Command_.hlp files. +

  • help is kept in /spider/cmd/Command_<lang>.hlp files. The format of the help files should be self explanatory, but they are explained further in the files themselves.