Поделиться через

Оценка выражения часов

  • Статья

Важно!

В Visual Studio 2015 такая реализация вычислителя выражений была сделана нерекомендуемой. Сведения о реализации вычислителей выражений в среде CLR см. на страницах CLR expression evaluators (Вычислители выражений CLR) и Managed expression evaluator sample (Пример управляемого вычислителя выражений).

Когда Visual Studio готов отобразить значение выражения часов, он вызывает EvaluateSync, который, в свою очередь, вызывает EvaluateSync. Этот процесс создает объект IDebugProperty2 , содержащий значение и тип выражения.

В этой реализации IDebugParsedExpression::EvaluateSyncвыражение анализируется и вычисляется одновременно. Эта реализация выполняет следующие задачи:

  1. Анализирует и вычисляет выражение для создания универсального объекта, который содержит значение и его тип. В C#это представляется как object некоторое время в C++, это представляется как объект VARIANT.

  2. Создает экземпляр класса (вызываемого CValueProperty в этом примере), который реализует IDebugProperty2 интерфейс и сохраняет в классе возвращаемое значение.

  3. возвращает интерфейс IDebugProperty2 из объекта CValueProperty.

Управляемый код

Это реализация управляемого IDebugParsedExpression::EvaluateSync кода. Вспомогательный метод Tokenize анализирует выражение в дереве синтаксического анализа. Вспомогательная функция EvalToken преобразует маркер в значение. Вспомогательная функция FindTerm рекурсивно проходит по дереву синтаксического анализа, вызывая EvalToken для каждого узла значение и применяя любые операции (добавление или вычитание) в выражении.

namespace EEMC
{
    public class CParsedExpression : IDebugParsedExpression
    {
        public HRESULT EvaluateSync(
            uint evalFlags,
            uint timeout,
            IDebugSymbolProvider provider,
            IDebugAddress address,
            IDebugBinder binder,
            string resultType,
            out IDebugProperty2 result)
        {
            HRESULT retval = COM.S_OK;
            this.evalFlags = evalFlags;
            this.timeout = timeout;
            this.provider = provider;
            this.address = address;
            this.binder = binder;
            this.resultType = resultType;

            try
            {
                IDebugField field = null;
                // Tokenize, then parse.
                tokens = Tokenize(expression);
                result = new CValueProperty(
                        expression,
                        (int) FindTerm(EvalToken(tokens[0], out field),1),
                        field,
                        binder);
            }
            catch (ParseException)
            {
                result = new CValueProperty(expression, "Huh?");
                retval = COM.E_INVALIDARG;
            }
            return retval;
        }
    }
}

Неуправляемый код

Это реализация IDebugParsedExpression::EvaluateSync неуправляемого кода. Вспомогающая функция Evaluate анализирует и вычисляет выражение, возвращая VARIANT полученное значение. Вспомогательная функция VariantValueToProperty объединяет CValueProperty VARIANT объект.

STDMETHODIMP CParsedExpression::EvaluateSync(
    in  DWORD                 evalFlags,
    in  DWORD                 dwTimeout,
    in  IDebugSymbolProvider* pprovider,
    in  IDebugAddress*        paddress,
    in  IDebugBinder*         pbinder,
    in  BSTR                  bstrResultType,
    out IDebugProperty2**     ppproperty )
{
    // dwTimeout parameter is ignored in this implementation.
    if (pprovider == NULL)
        return E_INVALIDARG;

    if (paddress == NULL)
        return E_INVALIDARG;

    if (pbinder == NULL)
        return E_INVALIDARG;

    if (ppproperty == NULL)
        return E_INVALIDARG;
    else
        *ppproperty = 0;

    HRESULT hr;
    VARIANT value;
    BSTR    bstrErrorMessage = NULL;
    hr = ::Evaluate( pprovider,
                     paddress,
                     pbinder,
                     m_expr,
                     &bstrErrorMessage,
                     &value );
    if (hr != S_OK)
    {
        if (bstrErrorMessage == NULL)
            return hr;

        //we can display better messages ourselves.
        HRESULT hrLocal = S_OK;
        VARIANT varType;
        VARIANT varErrorMessage;

        VariantInit( &varType );
        VariantInit( &varErrorMessage );
        varErrorMessage.vt      = VT_BSTR;
        varErrorMessage.bstrVal = bstrErrorMessage;

        CValueProperty* valueProperty = new CValueProperty();
        if (valueProperty != NULL)
        {
            hrLocal = valueProperty->Init(m_expr, varType, varErrorMessage);
            if (SUCCEEDED(hrLocal))
            {
                hrLocal = valueProperty->QueryInterface( IID_IDebugProperty2,
                        reinterpret_cast<void**>(ppproperty) );
            }
        }

        VariantClear(&varType);
        VariantClear(&varErrorMessage); //frees BSTR
        if (!valueProperty)
            return hr;
        valueProperty->Release();
        if (FAILED(hrLocal))
            return hr;
    }
    else
    {
        if (bstrErrorMessage != NULL)
            SysFreeString(bstrErrorMessage);

        hr = VariantValueToProperty( pprovider,
                                     paddress,
                                     pbinder,
                                     m_radix,
                                     m_expr,
                                     value,
                                     ppproperty );
        VariantClear(&value);
        if (FAILED(hr))
            return hr;
    }

    return S_OK;
}

Связанный контент