From 59ad6ec44a584e8983f095735eb4e99ba3de6a98 Mon Sep 17 00:00:00 2001
From: jbjohnso <jbjohnso@8638fb3e-16cb-4fca-ae20-7b5d299a9bcd>
Date: Thu, 6 Aug 2009 12:44:22 +0000
Subject: [PATCH] -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 | 3 ++-
 1 file changed, 2 insertions(+), 1 deletion(-)

diff --git a/perl-xCAT/xCAT/Table.pm b/perl-xCAT/xCAT/Table.pm
index 2a43a99bf..b20e5c118 100644
--- a/perl-xCAT/xCAT/Table.pm
+++ b/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;