xref: /trunk/main/dbaccess/source/ext/adabas/ASqlNameEdit.cxx (revision cdf0e10c4e3984b49a9502b011690b615761d4a3)
1 /*************************************************************************
2  *
3  * DO NOT ALTER OR REMOVE COPYRIGHT NOTICES OR THIS FILE HEADER.
4  *
5  * Copyright 2000, 2010 Oracle and/or its affiliates.
6  *
7  * OpenOffice.org - a multi-platform office productivity suite
8  *
9  * This file is part of OpenOffice.org.
10  *
11  * OpenOffice.org is free software: you can redistribute it and/or modify
12  * it under the terms of the GNU Lesser General Public License version 3
13  * only, as published by the Free Software Foundation.
14  *
15  * OpenOffice.org is distributed in the hope that it will be useful,
16  * but WITHOUT ANY WARRANTY; without even the implied warranty of
17  * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
18  * GNU Lesser General Public License version 3 for more details
19  * (a copy is included in the LICENSE file that accompanied this code).
20  *
21  * You should have received a copy of the GNU Lesser General Public License
22  * version 3 along with OpenOffice.org.  If not, see
23  * <http://www.openoffice.org/license.html>
24  * for a copy of the LGPLv3 License.
25  *
26  ************************************************************************/
27 
28 #ifndef ADABASUI_SQLNAMEEDIT_HXX
29 #include "ASQLNameEdit.hxx"
30 #endif
31 namespace adabasui
32 {
33     //------------------------------------------------------------------
34     sal_Bool isCharOk(sal_Unicode _cChar)
35     {
36         return (
37                 (_cChar >= 'A' && _cChar <= 'Z') ||
38                 _cChar == '_' ||
39                 ((_cChar >= '0' && _cChar <= '9')) ||
40                 ((_cChar >= 'a' && _cChar <= 'z'))
41                );
42     }
43     //------------------------------------------------------------------
44     sal_Bool OSQLNameChecker::checkString(  const ::rtl::OUString& _sOldValue,
45                                         const ::rtl::OUString& _sToCheck,
46                                         ::rtl::OUString& _rsCorrected)
47     {
48         sal_Bool bCorrected = sal_False;
49         XubString sSavedValue   = _sOldValue;
50         XubString sText         = _sToCheck;
51         xub_StrLen nMatch       = 0;
52         for ( xub_StrLen i=nMatch;i < sText.Len(); ++i )
53         {
54             if ( !isCharOk( sText.GetBuffer()[i]) )
55             {
56                 _rsCorrected += sText.Copy( nMatch, i - nMatch );
57                 bCorrected = sal_True;
58                 nMatch = i + 1;
59             }
60         }
61         _rsCorrected += sText.Copy( nMatch, sText.Len() - nMatch );
62         return bCorrected;
63     }
64     //------------------------------------------------------------------
65     void OSQLNameEdit::Modify()
66     {
67         ::rtl::OUString sCorrected;
68         if ( checkString( GetSavedValue(),GetText(),sCorrected ) )
69         {
70             Selection aSel = GetSelection();
71             aSel.setMax( aSel.getMin() );
72             SetText( sCorrected, aSel );
73 
74             SaveValue();
75         }
76         Edit::Modify();
77     }
78 }
79 // -----------------------------------------------------------------------------
80 
81