RMySqlを介してMySqlへの接続が継続するかどうかを確認する方法はありますか？

Question

私はこの文を使用してRMySQLのパッケージを介してMySQLデータベースに接続していない：

con<-dbConnect(drv=RMySQL::MySQL(max.con=1,fetch.default.rec=500),host="host",dbname="dbname",password="psswd",user="user")) 

これまでのところ何の問題。私がチェックした場合：

>class(con) 
[1] "MySQLConnection" 
attr(,"package") 
[1] "RMySQL" 

時間後、私は次のステートメントを使用：

dbGetQuery(conn=con,"show tables") 

を、私はエラーました：私はこの文をチェックすると、しかし

Error in .local(dbObj, ...) : 
internal error in RS_DBI_getConnection: corrupt connection handle 

を：

dbListConnections(drv=RMySQL::MySQL()) 

以下のようになります。

[[1]] 
<MySQLConnection:0,21> 

私は試してみてください。

dbDisconnect(conn=con) 

私は同じエラーを取得：私は接続しようとしたとき

rm(con) 

：

Error in .local(dbObj, ...) : 
internal error in RS_DBI_getConnection: corrupt connection handle 

は、それから私は、接続オブジェクトを削除再度dbConnect（）を使用して、私はこのエラーを受け取りました：

con<-dbConnect(drv=RMySQL::MySQL(max.con=1,fetch.default.rec=500),host="host",dbname="dbname",password="psswd",user="user")) 
Error in .local(drv, ...): Cannot allocate a new connection: 1 connections already opened 

データベースへの接続がない場合、dbListConnections（）呼び出しが空のリストを返すことがわかりました。しかし、この場合、空のリストは返されません。

は破損し、接続が切断された状態より接続の異なる状態を扱いますか？

または

接続がタイムアウトしましたか。

DBへの接続がまだ機能しているかどうかを確認する最良の方法はありますか？

Answer 1

rm(con)ではなく、dbDisconnect(con)で接続を閉じて、内部接続ハンドルを解放し、新しい接続を許可する必要があります。後者は、接続オブジェクトへの「ポインタ」を削除するだけです（したがって、conでこのオブジェクトにアクセスすることはできません）。ただし、物理的にはまだgarbage collectionまで存在します。

dbIsValid(con)で接続が有効かどうかを確認したり、dbGetQuery(con, "SELECT 1")を使用して簡単に確認できます。私は前者があなたのシステムの切断を検出したかどうか知りたいと思うでしょう。このトピックの周りにはdiscussion on GitHubがあります。