-Change init of db worker to return pid

-Change presence of DB worker in ps output to be informative


git-svn-id: https://svn.code.sf.net/p/xcat/code/xcat-core/trunk@3960 8638fb3e-16cb-4fca-ae20-7b5d299a9bcd

perl-xCAT/xCAT/Table.pm

@@ -93,6 +93,7 @@ sub init_dbworker {
     }
     unless ($dbworkerpid) {
         #This process is the database worker, it's job is to manage database queries to reduce required handles and to permit cross-process caching
+        $0 = "xcatd: DB Access";
         use File::Path;
         mkpath('/var/run/xcat/');
         use IO::Socket;
@@ -129,7 +130,7 @@ sub init_dbworker {
         unlink($dbsockpath);
         exit 0;
     }
-    print "INITTED\n";
+    return $dbworkerpid;
 }
 sub handle_dbc_conn {
     my $client = shift;