メインページ   モジュール   名前空間一覧   クラス階層   アルファベット順一覧   構成   ファイル一覧   構成メンバ   ファイルメンバ   関連ページ    

TObjectSocket.cc

解説を見る。
00001 // =====================================================================
00002 //  $Id: TObjectSocket.cc,v 1.4 2004/03/07 10:30:32 goiwai Exp $
00003 //  $Name: CLDAQ-1-14-03 $
00004 //  $Log: TObjectSocket.cc,v $
00005 //  Revision 1.4  2004/03/07 10:30:32  goiwai
00006 //  ROOTに組みこむためのおまじないマクロを埋めこみました。
00007 //  全てにおいて完全に動作するわけではありません。
00008 //
00009 //  Revision 1.3  2003/10/06 17:02:42  goiwai
00010 //  *** empty log message ***
00011 //
00012 //  Revision 1.2  2003/07/30 16:19:31  goiwai
00013 //  ファイルにコミットログをつけることにしました.
00014 //
00015 // =====================================================================
00016 #include "TObjectSocket.hh"
00017 
00018 TObjectSocket::TObjectSocket( Tint portnumber )
00019   : theServerDescriptor( -1 ), thePortNumber( portnumber )
00020 {;}
00021 
00022 TObjectSocket::~TObjectSocket()
00023 {;}
00024 
00025 Tint TObjectSocket::OpenServer()
00026 {
00027   theServerDescriptor = socket( PF_INET, SOCK_STREAM, 0 );
00028   if ( theServerDescriptor == -1 )
00029     perror( "TObjectSocket::OpenServer" );
00030   return theServerDescriptor;
00031 }
00032 
00033 Tint TObjectSocket::CloseServer()
00034 {
00035   if ( shutdown( theServerDescriptor, 2 ) == -1 ) {
00036     perror( "TObjectSocket::CloseServer" );
00037     return -1;
00038   }
00039 
00040   if ( close( theServerDescriptor ) == -1 ) {
00041     perror( "TObjectSocket::CloseServer" );
00042     return -1;
00043   }
00044   theServerDescriptor = -1;
00045   return 0;
00046 }
00047 
00048 #ifdef __CLDAQ_ROOT_DLL
00049     ClassImp(TObjectSocket)
00050 #endif


CLDAQ - a Class Library for DataAcQuisition (Version 1.14.3)
Go IWAI -- goiwai at users.sourceforge.jp