← Back to branch summary

~drizzle-trunk/drizzle/development

« back to all changes in this revision

Viewing changes to drizzled/sql_lex.cc

Added the testsuite location finding code to support in-plugin-dir test suites.

Show diffs side-by-side

added added

removed removed

Lines of Context:
drizzled/sql_lex.cc
11
11
 
12
12
   You should have received a copy of the GNU General Public License
13
13
   along with this program; if not, write to the Free Software
14
 
   Foundation, Inc., 51 Franklin St, Fifth Floor, Boston, MA  02110-1301  USA */
 
14
   Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA  02111-1307  USA */
15
15
 
16
16
 
17
17
/* A lexical scanner on a temporary buffer with a yacc interface */
18
18
 
19
 
#include "config.h"
20
19
#define DRIZZLE_LEX 1
 
20
#include "drizzled/server_includes.h"
21
21
#include "drizzled/configmake.h"
22
22
#include "drizzled/item/num.h"
23
23
#include "drizzled/error.h"
26
26
#include "drizzled/lookup_symbol.h"
27
27
#include "drizzled/index_hint.h"
28
28
 
29
 
#include <cstdio>
30
29
#include <ctype.h>
31
30
 
32
31
using namespace std;
33
32
 
34
 
/* Stay outside of the namespace because otherwise bison goes nuts */
 
33
static int lex_one_token(void *arg, void *yysession);
35
34
int DRIZZLElex(void *arg, void *yysession);
36
35
 
37
 
namespace drizzled
38
 
{
39
 
 
40
 
static int lex_one_token(void *arg, void *yysession);
41
 
 
42
36
/**
43
37
  save order by and tables in own lists.
44
38
*/
45
39
static bool add_to_list(Session *session, SQL_LIST &list, Item *item, bool asc)
46
40
{
47
 
  Order *order;
48
 
  if (!(order = (Order *) session->alloc(sizeof(Order))))
 
41
  order_st *order;
 
42
  if (!(order = (order_st *) session->alloc(sizeof(order_st))))
49
43
    return(1);
50
44
  order->item_ptr= item;
51
45
  order->item= &order->item_ptr;
85
79
  m_body_utf8(NULL),
86
80
  m_cpp_utf8_processed_ptr(NULL),
87
81
  next_state(MY_LEX_START),
 
82
  found_semicolon(NULL),
88
83
  ignore_space(1),
89
84
  in_comment(NO_COMMENT)
90
85
{
206
201
  Because of this, it's critical to not do too much things here.
207
202
  (We already do too much here)
208
203
*/
209
 
void LEX::start(Session *arg)
210
 
{
211
 
  lex_start(arg);
212
 
}
213
 
 
214
204
void lex_start(Session *session)
215
205
{
216
206
  LEX *lex= session->lex;
264
254
 
265
255
  lex->is_lex_started= true;
266
256
  lex->statement= NULL;
267
 
  
268
 
  lex->is_cross= false;
269
 
 
270
 
  lex->reset();
271
257
}
272
258
 
273
 
void LEX::end()
 
259
void lex_end(LEX *lex)
274
260
{
275
 
  if (yacc_yyss)
 
261
  if (lex->yacc_yyss)
276
262
  {
277
 
    free(yacc_yyss);
278
 
    free(yacc_yyvs);
279
 
    yacc_yyss= 0;
280
 
    yacc_yyvs= 0;
 
263
    free(lex->yacc_yyss);
 
264
    free(lex->yacc_yyvs);
 
265
    lex->yacc_yyss= 0;
 
266
    lex->yacc_yyvs= 0;
281
267
  }
282
268
 
283
 
  delete result;
284
 
 
285
 
  result= 0;
286
 
  setCacheable(true);
287
 
 
288
 
  delete statement;
289
 
  statement= NULL;
 
269
  delete lex->result;
 
270
 
 
271
  lex->result= 0;
 
272
 
 
273
  if (lex->statement) 
 
274
    delete lex->statement;
290
275
}
291
276
 
292
277
static int find_keyword(Lex_input_stream *lip, uint32_t len, bool function)
424
409
      assert(end >= str);
425
410
 
426
411
      if (!(start= (char*) lip->m_session->alloc((uint32_t) (end-str)+1)))
427
 
        return (char*) "";              // memory::SqlAlloc has set error flag
 
412
        return (char*) "";              // Sql_alloc has set error flag
428
413
 
429
414
      lip->m_cpp_text_start= lip->get_cpp_tok_start() + pre_skip;
430
415
      lip->m_cpp_text_end= lip->get_cpp_ptr() - post_skip;
587
572
  return ((unsigned char) str[-1] <= (unsigned char) cmp[-1]) ? smaller : bigger;
588
573
}
589
574
 
590
 
} /* namespace drizzled */
591
575
/*
592
576
  DRIZZLElex remember the following states from the following DRIZZLElex()
593
577
 
597
581
*/
598
582
int DRIZZLElex(void *arg, void *yysession)
599
583
{
600
 
  drizzled::Session *session= (drizzled::Session *)yysession;
601
 
  drizzled::Lex_input_stream *lip= session->m_lip;
 
584
  Session *session= (Session *)yysession;
 
585
  Lex_input_stream *lip= session->m_lip;
602
586
  YYSTYPE *yylval=(YYSTYPE*) arg;
603
587
  int token;
604
588
 
615
599
    return token;
616
600
  }
617
601
 
618
 
  token= drizzled::lex_one_token(arg, yysession);
 
602
  token= lex_one_token(arg, yysession);
619
603
 
620
604
  switch(token) {
621
605
  case WITH:
626
610
      to transform the grammar into a LALR(1) grammar,
627
611
      which sql_yacc.yy can process.
628
612
    */
629
 
    token= drizzled::lex_one_token(arg, yysession);
 
613
    token= lex_one_token(arg, yysession);
630
614
    if (token == ROLLUP_SYM)
631
615
    {
632
616
      return WITH_ROLLUP_SYM;
648
632
  return token;
649
633
}
650
634
 
651
 
namespace drizzled
652
 
{
653
 
 
654
635
int lex_one_token(void *arg, void *yysession)
655
636
{
656
637
  register unsigned char c= 0; /* Just set to shutup GCC */
1304
1285
  options= 0;
1305
1286
  linkage= UNSPECIFIED_TYPE;
1306
1287
  no_error= no_table_names_allowed= 0;
1307
 
  uncacheable.reset();
 
1288
  uncacheable= 0;
1308
1289
}
1309
1290
 
1310
1291
void Select_Lex_Node::init_select()
1371
1352
{
1372
1353
  sj_nests.empty();
1373
1354
  group_list.empty();
1374
 
  db= 0;
 
1355
  type= db= 0;
1375
1356
  having= 0;
 
1357
  table_join_options= 0;
1376
1358
  in_sum_expr= with_wild= 0;
1377
1359
  options= 0;
1378
1360
  braces= 0;
1569
1551
       s && s != last;
1570
1552
       s= s->outer_select())
1571
1553
  {
1572
 
    if (! (s->uncacheable.test(UNCACHEABLE_DEPENDENT)))
 
1554
    if (!(s->uncacheable & UNCACHEABLE_DEPENDENT))
1573
1555
    {
1574
1556
      // Select is dependent of outer select
1575
 
      s->uncacheable.set(UNCACHEABLE_DEPENDENT);
1576
 
      s->uncacheable.set(UNCACHEABLE_UNITED);
 
1557
      s->uncacheable= (s->uncacheable & ~UNCACHEABLE_UNITED) |
 
1558
                       UNCACHEABLE_DEPENDENT;
1577
1559
      Select_Lex_Unit *munit= s->master_unit();
1578
 
      munit->uncacheable.set(UNCACHEABLE_UNITED);
1579
 
      munit->uncacheable.set(UNCACHEABLE_DEPENDENT);
 
1560
      munit->uncacheable= (munit->uncacheable & ~UNCACHEABLE_UNITED) |
 
1561
                       UNCACHEABLE_DEPENDENT;
1580
1562
      for (Select_Lex *sl= munit->first_select(); sl ; sl= sl->next_select())
1581
1563
      {
1582
1564
        if (sl != s &&
1583
 
            ! (sl->uncacheable.test(UNCACHEABLE_DEPENDENT) && sl->uncacheable.test(UNCACHEABLE_UNITED)))
1584
 
          sl->uncacheable.set(UNCACHEABLE_UNITED);
 
1565
            !(sl->uncacheable & (UNCACHEABLE_DEPENDENT | UNCACHEABLE_UNITED)))
 
1566
          sl->uncacheable|= UNCACHEABLE_UNITED;
1585
1567
      }
1586
1568
    }
1587
1569
    s->is_correlated= true;
1606
1588
List<Item>* Select_Lex_Node::get_item_list()
1607
1589
{ return NULL; }
1608
1590
 
1609
 
TableList *Select_Lex_Node::add_table_to_list(Session *, 
1610
 
                                              Table_ident *, 
1611
 
                                              LEX_STRING *, 
1612
 
                                              const bitset<NUM_OF_TABLE_OPTIONS>&,
1613
 
                                              thr_lock_type, 
1614
 
                                              List<Index_hint> *, 
1615
 
                                              LEX_STRING *)
 
1591
TableList *Select_Lex_Node::add_table_to_list (Session *, Table_ident *, LEX_STRING *, uint32_t,
 
1592
                                                  thr_lock_type, List<Index_hint> *, LEX_STRING *)
1616
1593
{
1617
1594
  return 0;
1618
1595
}
1619
1596
 
 
1597
uint32_t Select_Lex_Node::get_table_join_options()
 
1598
{
 
1599
  return 0;
 
1600
}
1620
1601
 
1621
1602
/*
1622
1603
  prohibit using LIMIT clause
1694
1675
  return &item_list;
1695
1676
}
1696
1677
 
 
1678
uint32_t Select_Lex::get_table_join_options()
 
1679
{
 
1680
  return table_join_options;
 
1681
}
1697
1682
 
1698
1683
bool Select_Lex::setup_ref_array(Session *session, uint32_t order_group_num)
1699
1684
{
1734
1719
      str->append(STRING_WITH_LEN(" order by "));
1735
1720
      fake_select_lex->print_order(
1736
1721
        str,
1737
 
        (Order *) fake_select_lex->order_list.first,
 
1722
        (order_st *) fake_select_lex->order_list.first,
1738
1723
        query_type);
1739
1724
    }
1740
1725
    fake_select_lex->print_limit(session, str, query_type);
1742
1727
}
1743
1728
 
1744
1729
void Select_Lex::print_order(String *str,
1745
 
                                Order *order,
 
1730
                                order_st *order,
1746
1731
                                enum_query_type query_type)
1747
1732
{
1748
1733
  for (; order; order= order->next)
1864
1849
    for this.
1865
1850
*/
1866
1851
LEX::LEX()
1867
 
  :
1868
 
    result(0), 
1869
 
    yacc_yyss(0), 
1870
 
    yacc_yyvs(0),
1871
 
    charset(NULL),
1872
 
    sql_command(SQLCOM_END), 
1873
 
    option_type(OPT_DEFAULT), 
1874
 
    is_lex_started(0),
1875
 
    cacheable(true),
1876
 
    sum_expr_used(false)
 
1852
  :result(0), yacc_yyss(0), yacc_yyvs(0),
 
1853
   sql_command(SQLCOM_END), option_type(OPT_DEFAULT), is_lex_started(0)
1877
1854
{
1878
1855
  reset_query_tables_list(true);
1879
1856
  statement= NULL;
1880
1857
}
1881
1858
 
 
1859
/*
 
1860
  Detect that we need only table structure of derived table/view
 
1861
 
 
1862
  SYNOPSIS
 
1863
    only_view_structure()
 
1864
 
 
1865
  RETURN
 
1866
    true yes, we need only structure
 
1867
    false no, we need data
 
1868
*/
 
1869
bool LEX::only_view_structure()
 
1870
{
 
1871
  switch (sql_command) {
 
1872
  case SQLCOM_SHOW_CREATE:
 
1873
  case SQLCOM_SHOW_TABLES:
 
1874
  case SQLCOM_SHOW_FIELDS:
 
1875
    return true;
 
1876
  default:
 
1877
    return false;
 
1878
  }
 
1879
}
 
1880
 
 
1881
/*
 
1882
  Should Items_ident be printed correctly
 
1883
 
 
1884
  SYNOPSIS
 
1885
    need_correct_ident()
 
1886
 
 
1887
  RETURN
 
1888
    true yes, we need only structure
 
1889
    false no, we need data
 
1890
*/
 
1891
bool LEX::need_correct_ident()
 
1892
{
 
1893
  switch(sql_command)
 
1894
  {
 
1895
  case SQLCOM_SHOW_CREATE:
 
1896
  case SQLCOM_SHOW_TABLES:
 
1897
    return true;
 
1898
  default:
 
1899
    return false;
 
1900
  }
 
1901
}
 
1902
 
1882
1903
/**
1883
1904
  This method should be called only during parsing.
1884
1905
  It is aware of compound statements (stored routine bodies)
2151
2172
                                            current_index_hint_clause,
2152
2173
                                            str, length));
2153
2174
}
2154
 
 
2155
 
} /* namespace drizzled */