sql_test.cpp
上传用户:romrleung
上传日期:2022-05-23
资源大小:18897k
文件大小:12k
源码类别:

MySQL数据库

开发平台:

Visual C++

  1. /* Copyright (C) 2000 MySQL AB & MySQL Finland AB & TCX DataKonsult AB
  2.    This program is free software; you can redistribute it and/or modify
  3.    it under the terms of the GNU General Public License as published by
  4.    the Free Software Foundation; either version 2 of the License, or
  5.    (at your option) any later version.
  6.    This program is distributed in the hope that it will be useful,
  7.    but WITHOUT ANY WARRANTY; without even the implied warranty of
  8.    MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
  9.    GNU General Public License for more details.
  10.    You should have received a copy of the GNU General Public License
  11.    along with this program; if not, write to the Free Software
  12.    Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA  02111-1307  USA */
  13. /* Write some debug info */
  14. #include "mysql_priv.h"
  15. #include "sql_select.h"
  16. #include <hash.h>
  17. #include <thr_alarm.h>
  18. #if defined(HAVE_MALLINFO) && defined(HAVE_MALLOC_H)
  19. #include <malloc.h>
  20. #elif defined(HAVE_MALLINFO) && defined(HAVE_SYS_MALLOC_H)
  21. #include <sys/malloc.h>
  22. #endif
  23. static const char *lock_descriptions[] =
  24. {
  25.   "No lock",
  26.   "Low priority read lock",
  27.   "Shared Read lock",
  28.   "High priority read lock",
  29.   "Read lock  without concurrent inserts",
  30.   "Write lock that allows other writers",
  31.   "Write lock, but allow reading",
  32.   "Concurrent insert lock",
  33.   "Lock Used by delayed insert",
  34.   "Low priority write lock",
  35.   "High priority write lock",
  36.   "Highest priority write lock"
  37. };
  38. #ifndef DBUG_OFF
  39. void
  40. print_where(COND *cond,const char *info)
  41. {
  42.   if (cond)
  43.   {
  44.     char buff[256];
  45.     String str(buff,(uint32) sizeof(buff), system_charset_info);
  46.     str.length(0);
  47.     cond->print(&str);
  48.     str.append('');
  49.     DBUG_LOCK_FILE;
  50.     (void) fprintf(DBUG_FILE,"nWHERE:(%s) ",info);
  51.     (void) fputs(str.ptr(),DBUG_FILE);
  52.     (void) fputc('n',DBUG_FILE);
  53.     DBUG_UNLOCK_FILE;
  54.   }
  55. }
  56. /* This is for debugging purposes */
  57. void print_cached_tables(void)
  58. {
  59.   uint idx,count,unused;
  60.   TABLE *start_link,*lnk;
  61.   VOID(pthread_mutex_lock(&LOCK_open));
  62.   puts("DB             Table                            Version  Thread  L.thread  Open  Lock");
  63.   for (idx=unused=0 ; idx < open_cache.records ; idx++)
  64.   {
  65.     TABLE *entry=(TABLE*) hash_element(&open_cache,idx);
  66.     printf("%-14.14s %-32s%6ld%8ld%10ld%6d  %sn",
  67.    entry->table_cache_key,entry->real_name,entry->version,
  68.    entry->in_use ? entry->in_use->thread_id : 0L,
  69.    entry->in_use ? entry->in_use->dbug_thread_id : 0L,
  70.    entry->db_stat ? 1 : 0, entry->in_use ? lock_descriptions[(int)entry->reginfo.lock_type] : "Not in use");
  71.     if (!entry->in_use)
  72.       unused++;
  73.   }
  74.   count=0;
  75.   if ((start_link=lnk=unused_tables))
  76.   {
  77.     do
  78.     {
  79.       if (lnk != lnk->next->prev || lnk != lnk->prev->next)
  80.       {
  81. printf("unused_links isn't linked properlyn");
  82. return;
  83.       }
  84.     } while (count++ < open_cache.records && (lnk=lnk->next) != start_link);
  85.     if (lnk != start_link)
  86.     {
  87.       printf("Unused_links aren't connectedn");
  88.     }
  89.   }
  90.   if (count != unused)
  91.     printf("Unused_links (%d) doesn't match open_cache: %dn", count,unused);
  92.   printf("nCurrent refresh version: %ldn",refresh_version);
  93.   if (hash_check(&open_cache))
  94.     printf("Error: File hash table is corruptedn");
  95.   fflush(stdout);
  96.   VOID(pthread_mutex_unlock(&LOCK_open));
  97.   return;
  98. }
  99. void TEST_filesort(SORT_FIELD *sortorder,uint s_length)
  100. {
  101.   char buff[256],buff2[256];
  102.   String str(buff,sizeof(buff),system_charset_info);
  103.   String out(buff2,sizeof(buff2),system_charset_info);
  104.   const char *sep;
  105.   DBUG_ENTER("TEST_filesort");
  106.   out.length(0);
  107.   for (sep=""; s_length-- ; sortorder++, sep=" ")
  108.   {
  109.     out.append(sep);
  110.     if (sortorder->reverse)
  111.       out.append('-');
  112.     if (sortorder->field)
  113.     {
  114.       if (sortorder->field->table_name)
  115.       {
  116. out.append(sortorder->field->table_name);
  117. out.append('.');
  118.       }
  119.       out.append(sortorder->field->field_name ? sortorder->field->field_name:
  120.  "tmp_table_column");
  121.     }
  122.     else
  123.     {
  124.       str.length(0);
  125.       sortorder->item->print(&str);
  126.       out.append(str);
  127.     }
  128.   }
  129.   out.append(''); // Purify doesn't like c_ptr()
  130.   DBUG_LOCK_FILE;
  131.   VOID(fputs("nInfo about FILESORTn",DBUG_FILE));
  132.   fprintf(DBUG_FILE,"Sortorder: %sn",out.ptr());
  133.   DBUG_UNLOCK_FILE;
  134.   DBUG_VOID_RETURN;
  135. }
  136. void
  137. TEST_join(JOIN *join)
  138. {
  139.   uint i,ref;
  140.   DBUG_ENTER("TEST_join");
  141.   DBUG_LOCK_FILE;
  142.   VOID(fputs("nInfo about JOINn",DBUG_FILE));
  143.   for (i=0 ; i < join->tables ; i++)
  144.   {
  145.     JOIN_TAB *tab=join->join_tab+i;
  146.     TABLE *form=tab->table;
  147.     char key_map_buff[128];
  148.     fprintf(DBUG_FILE,"%-16.16s  type: %-7s  q_keys: %s  refs: %d  key: %d  len: %dn",
  149.     form->table_name,
  150.     join_type_str[tab->type],
  151.     tab->keys.print(key_map_buff),
  152.     tab->ref.key_parts,
  153.     tab->ref.key,
  154.     tab->ref.key_length);
  155.     if (tab->select)
  156.     {
  157.       char buf[MAX_KEY/8+1];
  158.       if (tab->use_quick == 2)
  159. fprintf(DBUG_FILE,
  160. "                  quick select checked for each record (keys: %s)n",
  161. tab->select->quick_keys.print(buf));
  162.       else if (tab->select->quick)
  163. fprintf(DBUG_FILE,"                  quick select used on key %s, length: %dn",
  164. form->key_info[tab->select->quick->index].name,
  165. tab->select->quick->max_used_key_length);
  166.       else
  167. VOID(fputs("                  select usedn",DBUG_FILE));
  168.     }
  169.     if (tab->ref.key_parts)
  170.     {
  171.       VOID(fputs("                  refs: ",DBUG_FILE));
  172.       for (ref=0 ; ref < tab->ref.key_parts ; ref++)
  173.       {
  174. Item *item=tab->ref.items[ref];
  175. fprintf(DBUG_FILE,"%s  ", item->full_name());
  176.       }
  177.       VOID(fputc('n',DBUG_FILE));
  178.     }
  179.   }
  180.   DBUG_UNLOCK_FILE;
  181.   DBUG_VOID_RETURN;
  182. }
  183. #endif
  184. typedef struct st_debug_lock
  185. {
  186.   ulong thread_id;
  187.   char table_name[FN_REFLEN];
  188.   bool waiting;
  189.   const char *lock_text;
  190.   enum thr_lock_type type;
  191. } TABLE_LOCK_INFO;
  192. static int dl_compare(TABLE_LOCK_INFO *a,TABLE_LOCK_INFO *b)
  193. {
  194.   if (a->thread_id > b->thread_id)
  195.     return 1;
  196.   if (a->thread_id < b->thread_id)
  197.     return -1;
  198.   if (a->waiting == b->waiting)
  199.     return 0;
  200.   else if (a->waiting)
  201.     return -1;
  202.   return 1;
  203. }
  204. static void push_locks_into_array(DYNAMIC_ARRAY *ar, THR_LOCK_DATA *data,
  205.   bool wait, const char *text)
  206. {
  207.   if (data)
  208.   {
  209.     TABLE *table=(TABLE *)data->debug_print_param;
  210.     if (table && table->tmp_table == NO_TMP_TABLE)
  211.     {
  212.       TABLE_LOCK_INFO table_lock_info;
  213.       table_lock_info.thread_id=table->in_use->thread_id;
  214.       memcpy(table_lock_info.table_name, table->table_cache_key,
  215.      table->key_length);
  216.       table_lock_info.table_name[strlen(table_lock_info.table_name)]='.';
  217.       table_lock_info.waiting=wait;
  218.       table_lock_info.lock_text=text;
  219.       // lock_type is also obtainable from THR_LOCK_DATA
  220.       table_lock_info.type=table->reginfo.lock_type;
  221.       VOID(push_dynamic(ar,(gptr) &table_lock_info));
  222.     }
  223.   }
  224. }
  225. /*
  226.   Regarding MERGE tables:
  227.   For now, the best option is to use the common TABLE *pointer for all
  228.   cases;  The drawback is that for MERGE tables we will see many locks
  229.   for the merge tables even if some of them are for individual tables.
  230.   The way to solve this is to add to 'THR_LOCK' structure a pointer to
  231.   the filename and use this when printing the data.
  232.   (We can for now ignore this and just print the same name for all merge
  233.   table parts;  Please add the above as a comment to the display_lock
  234.   function so that we can easily add this if we ever need this.
  235. */
  236. static void display_table_locks(void) 
  237. {
  238.   LIST *list;
  239.   DYNAMIC_ARRAY saved_table_locks;
  240.   VOID(my_init_dynamic_array(&saved_table_locks,sizeof(TABLE_LOCK_INFO),open_cache.records + 20,50));
  241.   VOID(pthread_mutex_lock(&THR_LOCK_lock));
  242.   for (list= thr_lock_thread_list; list; list= list_rest(list))
  243.   {
  244.     THR_LOCK *lock=(THR_LOCK*) list->data;
  245.     VOID(pthread_mutex_lock(&lock->mutex));
  246.     push_locks_into_array(&saved_table_locks, lock->write.data, FALSE,
  247.   "Locked - write");
  248.     push_locks_into_array(&saved_table_locks, lock->write_wait.data, TRUE,
  249.   "Waiting - write");
  250.     push_locks_into_array(&saved_table_locks, lock->read.data, FALSE,
  251.   "Locked - read");
  252.     push_locks_into_array(&saved_table_locks, lock->read_wait.data, TRUE,
  253.   "Waiting - read");
  254.     VOID(pthread_mutex_unlock(&lock->mutex));
  255.   }
  256.   VOID(pthread_mutex_unlock(&THR_LOCK_lock));
  257.   if (!saved_table_locks.elements) goto end;
  258.   
  259.   qsort((gptr) dynamic_element(&saved_table_locks,0,TABLE_LOCK_INFO *),saved_table_locks.elements,sizeof(TABLE_LOCK_INFO),(qsort_cmp) dl_compare);
  260.   freeze_size(&saved_table_locks);
  261.   puts("nThread database.table_name          Locked/Waiting        Lock_typen");
  262.   
  263.   unsigned int i;
  264.   for (i=0 ; i < saved_table_locks.elements ; i++)
  265.   {
  266.     TABLE_LOCK_INFO *dl_ptr=dynamic_element(&saved_table_locks,i,TABLE_LOCK_INFO*);
  267.     printf("%-8ld%-28.28s%-22s%sn",
  268.    dl_ptr->thread_id,dl_ptr->table_name,dl_ptr->lock_text,lock_descriptions[(int)dl_ptr->type]);
  269.   }
  270.   puts("nn");
  271. end:
  272.   delete_dynamic(&saved_table_locks);
  273. }
  274. static int print_key_cache_status(const char *name, KEY_CACHE *key_cache)
  275. {
  276.   char llbuff1[22];
  277.   char llbuff2[22];
  278.   char llbuff3[22];
  279.   char llbuff4[22];
  280.   if (!key_cache->key_cache_inited)
  281.   {
  282.     printf("%s: Not in usen", name);
  283.   }
  284.   else
  285.   {
  286.     printf("%sn
  287. Buffer_size:    %10lun
  288. Block_size:     %10lun
  289. Division_limit: %10lun
  290. Age_limit:      %10lun
  291. blocks used:    %10lun
  292. not flushed:    %10lun
  293. w_requests:     %10sn
  294. writes:         %10sn
  295. r_requests:     %10sn
  296. reads:          %10snn",
  297.    name,
  298.    (ulong) key_cache->param_buff_size, key_cache->param_block_size,
  299.    key_cache->param_division_limit, key_cache->param_age_threshold,
  300.    key_cache->blocks_used,key_cache->global_blocks_changed,
  301.    llstr(key_cache->global_cache_w_requests,llbuff1),
  302.            llstr(key_cache->global_cache_write,llbuff2),
  303.    llstr(key_cache->global_cache_r_requests,llbuff3),
  304.            llstr(key_cache->global_cache_read,llbuff4));
  305.   }
  306.   return 0;
  307. }
  308. void mysql_print_status(THD *thd)
  309. {
  310.   char current_dir[FN_REFLEN];
  311.   printf("nStatus information:nn");
  312.   my_getwd(current_dir, sizeof(current_dir),MYF(0));
  313.   printf("Current dir: %sn", current_dir);
  314.   printf("Running threads: %d  Stack size: %ldn", thread_count,
  315.  (long) thread_stack);
  316.   if (thd)
  317.     thd->proc_info="locks";
  318.   thr_print_locks(); // Write some debug info
  319. #ifndef DBUG_OFF
  320.   if (thd)
  321.     thd->proc_info="table cache";
  322.   print_cached_tables();
  323. #endif
  324.   /* Print key cache status */
  325.   if (thd)
  326.     thd->proc_info="key cache";
  327.   puts("nKey caches:");
  328.   process_key_caches(print_key_cache_status);
  329.   if (thd)
  330.     thd->proc_info="status";
  331.   pthread_mutex_lock(&LOCK_status);
  332.   printf("nhandler status:n
  333. read_key:   %10lun
  334. read_next:  %10lun
  335. read_rnd    %10lun
  336. read_first: %10lun
  337. write:      %10lun
  338. delete      %10lun
  339. update:     %10lun",
  340.  ha_read_key_count, ha_read_next_count,
  341.  ha_read_rnd_count, ha_read_first_count,
  342.  ha_write_count, ha_delete_count, ha_update_count);
  343.   pthread_mutex_unlock(&LOCK_status);
  344.   printf("nTable status:n
  345. Opened tables: %10lun
  346. Open tables:   %10lun
  347. Open files:    %10lun
  348. Open streams:  %10lun",
  349.  opened_tables,
  350.  (ulong) cached_tables(),
  351.  (ulong) my_file_opened,
  352.  (ulong) my_stream_opened);
  353.   ALARM_INFO alarm_info;
  354. #ifndef DONT_USE_THR_ALARM
  355.   thr_alarm_info(&alarm_info);
  356.   printf("nAlarm status:n
  357. Active alarms:   %un
  358. Max used alarms: %un
  359. Next alarm time: %lun",
  360.  alarm_info.active_alarms,
  361.  alarm_info.max_used_alarms,
  362.  alarm_info.next_alarm_time);
  363. #endif
  364.   display_table_locks();
  365.   fflush(stdout);
  366.   if (thd)
  367.     thd->proc_info="malloc";
  368.   my_checkmalloc();
  369.   TERMINATE(stdout); // Write malloc information
  370. #ifdef HAVE_MALLINFO
  371.   struct mallinfo info= mallinfo();
  372.   printf("nMemory status:n
  373. Non-mmapped space allocated from system: %dn
  374. Number of free chunks:  %dn
  375. Number of fastbin blocks:  %dn
  376. Number of mmapped regions:  %dn
  377. Space in mmapped regions:  %dn
  378. Maximum total allocated space:  %dn
  379. Space available in freed fastbin blocks: %dn
  380. Total allocated space:  %dn
  381. Total free space:  %dn
  382. Top-most, releasable space:  %dn
  383. Estimated memory (with thread stack):    %ldn",
  384.  (int) info.arena ,
  385.  (int) info.ordblks,
  386.  (int) info.smblks,
  387.  (int) info.hblks,
  388.  (int) info.hblkhd,
  389.  (int) info.usmblks,
  390.  (int) info.fsmblks,
  391.  (int) info.uordblks,
  392.  (int) info.fordblks,
  393.  (int) info.keepcost,
  394.  (long) (thread_count * thread_stack + info.hblkhd + info.arena));
  395. #endif
  396.   puts("");
  397.   if (thd)
  398.     thd->proc_info=0;
  399. }