Mercurial > hg > ltpda
view m-toolbox/classes/@repogui2/cb_get_dbs.m @ 14:6d43f39633b8 database-connection-manager
Remove unused functions from utils.jmysql
author | Daniele Nicolodi <nicolodi@science.unitn.it> |
---|---|
date | Mon, 05 Dec 2011 16:20:06 +0100 |
parents | f0afece42f48 |
children |
line wrap: on
line source
% CB_GET_DBS callback when the user clicks the 'get dbs' button. % % M Hewitson 22-09-08 % % $Id: cb_get_dbs.m,v 1.2 2011/04/08 08:56:36 hewitson Exp $ % function cb_get_dbs(varargin) % Handles myh = varargin{1}; mainfig = varargin{end}; tables = {'collections', 'objmeta', 'objs', 'transactions', 'users'}; % Get conn conn = mainfig.connection; % Assume I don't need to open the connection wasEmpty = 0; % Open connection, if necessary if isempty(conn) % we opened the connection wasEmpty = 1; % have we a stored username and password dbuser = mainfig.dbuser; dbpass = mainfig.dbpass; % get hostname hostname = get(findobj(mainfig.handle, 'Tag','RepoguiServerEdit'), 'String'); if isempty(hostname) error('### Please select a server to connect to.'); end % connect if ~isempty(dbuser) && ~isempty(dbpass) conn = utils.mysql.connect(hostname, 'test', dbuser, dbpass); else [conn, dbpass] = utils.mysql.connect(hostname); end if ~isa(conn, 'database') error('### couldn''t connect to server'); end % store the connection mainfig.dbuser = conn.Username; mainfig.dbpass = dbpass; end % get the databases q = 'show databases'; curs = exec(conn, q); curs = fetch(curs); ltpda_dbs = []; % Now get the LTPDA databases for j=1:length(curs.Data) db = curs.Data{j}; if ~strcmp(db, 'information_schema') q = sprintf('show tables from %s', db); c = exec(conn, q); c = fetch(c); match = 0; for l=1:length(c.Data) for k=1:length(tables) if strcmp(c.Data{l}, tables{k}) match = match + 1; end end end close(c); if match == 5 % we have an LTPDA database ltpda_dbs = [ltpda_dbs cellstr(db)]; end end end close(curs); % If I opened the connection, close it again if wasEmpty close(conn); end % Set the list id = findobj(mainfig.handle, 'Tag', 'RepoguiDatabaseList'); set(id, 'String', ltpda_dbs, 'Value', 1); % Get selected DB dbh = findobj(mainfig.handle, 'Tag', 'RepoguiDatabaseList'); dbs = get(dbh, 'String'); db = dbs{1}; % set selected DB dbh = findobj(mainfig.handle, 'Tag', 'RepoguiDatabaseEdit'); set(dbh, 'String', db); end