1 /****************************************************************************

     2 **

     3 ** Copyright (C) 2009 Nokia Corporation and/or its subsidiary(-ies).

     4 ** All rights reserved.

     5 ** Contact: Nokia Corporation (qt-info@nokia.com)

     6 **

     7 ** This file is part of the QtXmlPatterns module of the Qt Toolkit.

     8 **

     9 ** $QT_BEGIN_LICENSE:LGPL$

    10 ** No Commercial Usage

    11 ** This file contains pre-release code and may not be distributed.

    12 ** You may use this file in accordance with the terms and conditions

    13 ** contained in the Technology Preview License Agreement accompanying

    14 ** this package.

    15 **

    16 ** GNU Lesser General Public License Usage

    17 ** Alternatively, this file may be used under the terms of the GNU Lesser

    18 ** General Public License version 2.1 as published by the Free Software

    19 ** Foundation and appearing in the file LICENSE.LGPL included in the

    20 ** packaging of this file.  Please review the following information to

    21 ** ensure the GNU Lesser General Public License version 2.1 requirements

    22 ** will be met: http://www.gnu.org/licenses/old-licenses/lgpl-2.1.html.

    23 **

    24 ** In addition, as a special exception, Nokia gives you certain additional

    25 ** rights.  These rights are described in the Nokia Qt LGPL Exception

    26 ** version 1.1, included in the file LGPL_EXCEPTION.txt in this package.

    27 **

    28 ** If you have questions regarding the use of this file, please contact

    29 ** Nokia at qt-info@nokia.com.

    30 **

    31 **

    32 **

    33 **

    34 **

    35 **

    36 **

    37 **

    38 ** $QT_END_LICENSE$

    39 **

    40 ****************************************************************************/

    41 

    42 #include "qcommonsequencetypes_p.h"

    43 #include "qpatternistlocale_p.h"

    44 #include "qqnamevalue_p.h"

    45 #include "qatomicstring_p.h"

    46 

    47 #include "qerrorfn_p.h"

    48 

    49 QT_BEGIN_NAMESPACE

    50 

    51 using namespace QPatternist;

    52 

    53 Item ErrorFN::evaluateSingleton(const DynamicContext::Ptr &context) const

    54 {

    55     QString msg;

    56 

    57     switch(m_operands.count())

    58     {

    59         case 0: /* No args. */

    60         {

    61             context->error(QtXmlPatterns::tr("%1 was called.").arg(formatFunction(context->namePool(), signature())),

    62                             ReportContext::FOER0000, this);

    63             return Item();

    64         }

    65         case 3:

    66         /* Fallthrough, we don't use the 'error object' param. */

    67         case 2:

    68             msg = m_operands.at(1)->evaluateSingleton(context).stringValue();

    69         /* Fall through. */

    70         case 1:

    71         {

    72             const QNameValue::Ptr qName(m_operands.first()->evaluateSingleton(context).as<QNameValue>());

    73 

    74             if(qName)

    75                 context->error(msg, qName->qName(), this);

    76             else

    77                 context->error(msg, ReportContext::FOER0000, this);

    78 

    79             return Item();

    80         }

    81         default:

    82         {

    83             Q_ASSERT_X(false, Q_FUNC_INFO,

    84                        "Invalid number of arguments passed to fn:error.");

    85             return Item();

    86         }

    87     }

    88 }

    89 

    90 FunctionSignature::Ptr ErrorFN::signature() const

    91 {

    92     const FunctionSignature::Ptr e(FunctionCall::signature());

    93 

    94     if(m_operands.count() != 1)

    95         return e;

    96 

    97     FunctionSignature::Ptr nev(FunctionSignature::Ptr(new FunctionSignature(e->name(),

    98                                                       e->minimumArguments(),

    99                                                       e->maximumArguments(),

   100                                                       e->returnType(),

   101                                                       e->properties())));

   102     const FunctionArgument::List args(e->arguments());

   103     FunctionArgument::List nargs;

   104     const QXmlName argName(StandardNamespaces::empty, StandardLocalNames::error);

   105     nargs.append(FunctionArgument::Ptr(new FunctionArgument(argName, CommonSequenceTypes::ExactlyOneQName)));

   106     nargs.append(args[1]);

   107     nargs.append(args[2]);

   108     nev->setArguments(nargs);

   109 

   110     return nev;

   111 }

   112 

   113 QT_END_NAMESPACE