Este material tem como objetivo ensinar como usar diversos pacotes do R para coletar dados financeiros e econômicos de fontes públicas como Banco Central do Brasil, BM&F Bovespa, IBGE, IPEA, Google Finance, Yahoo Finance, FED, etc.

INTRODUÇÃO

Imagine que você precisa analisar uma ação qualquer e tomar a decisão de comprar ou não tal ação. Possivelmente, você terá que pagar por algum serviço que tenha dados do histórico do preço desta ação, os resultados operacionais da empresa bem como notícias vinculadas à empresa na mídia. Outra opção é você acessar o site de relacionamento com investidores da empresa e tentar pegar os dados do site. Para isso, será necessário fazer o download dos dados, talvez manuseá-los para que fiquem no formato de seu interesse e após isso fazer suas análises.

Note que para chegar no objetivo crucial que é analisar os dados da empresa e tomar uma decisão de comprar ou não a ação, você provavelmente perdeu bastante tempo tentando acessar as informações necessárias.

Felizmente, por meio do R conseguimos acessar fontes públicas que nos ajudam com a disponibilização de dados de uma forma mais simples e eficiente. Dentre as várias fontes, temos:

Para tanto, temos duas alternativas. Uma delas é acessar as APIs destas instituições por meio do R e coletar os dados. Outra alternativa, é fazer uso de pacotes do R que facilitam o acesso às APIs por meio de funções que são bem mais simples de utilizar.

Neste material, vamos usar pacotes, mas caso queira entender como manusear uma API, observe a explicação contida no material Programação em R - Importar Dados. Os pacotes que permitirão acessar os dados das instituições citadas são:

USANDO O PACOTE Quandl

O Quandl é uma plataforma que disponibiliza milhares de fontes de dados públicos e privados para usuários de diversas tecnologias e linguagens de programação. Além disso, a plataforma fornece uma API que pode ser facilmente incorporada em outras tecnologias. Maiores detalhes de todas as opções de uso do Quandl, podem ser encontrados neste link.

Especificamente para o R, o Quandl tem um pacote (Quandl) que permite acessar todos os dados (públicos e privados) diretamente do R. Para tanto, o pacote tem funções que usam a API do Quandl para buscar e processar as requisições.

Lembrando que é necessário se cadastrar no site do Quandl para ter uma Quandl.api_key que permitirá acessar uma maior quantidade de dados (sem ela você tem um limite diário) ou até mesmo dados que você adquiriu do Quandl (dados privados e que são pagos). Na imagem abaixo, você encontrará as instruções necessárias para criar sua conta no Quandl.



Para coletar dados do Banco Central do Brasil (BACEN) no R via Quandl precisamos dos seguintes passos:

  1. Acessar o sistema de séries temporais do BACEN (http://www.bcb.gov.br/?SERIESTEMP), escolher uma série temporal de interesse e seu código. Por exemplo, o Índice nacional de preços ao consumidor-amplo (IPCA) que tem o código \(433\).



  1. No R, execute o seguinte código:
# Instalar pacotes (só executar uma vez)
# install.packages(c("Quandl", "dygraphs", "magrittr", "PerformanceAnalytics", "quantmod"))

# Carregar pacotes necessários
suppressMessages(require(Quandl))
suppressMessages(require(dygraphs))
suppressMessages(require(magrittr))
suppressMessages(require(PerformanceAnalytics))
suppressMessages(require(quantmod))

# Definir sua api key
Quandl.api_key('3gMh2BSgyDSpD4qxrsaT')
#Quandl.api_key('NjGc22-41R7zD_K7Pt7z')

# Coletar o dado do IPCA. Observe que adicionamos BCB/ ao código da série temporal. Sempre usaremos BCB/ 
# para coletar dados do BACEN por meio do Quandl. Ele tem o significado de determinar de qual banco de 
# dados o Quandl deve buscar pela série que o número definido. Como padrão o Quandl coletará os dados na
# periodicidade divulgada pelo BACEN.
ipca <- Quandl('BCB/433')

# Coletar a mesma informação para um período específico
ipca <- Quandl('BCB/433', start_date = "1996-01-01", end_date = "2017-12-31")

# Coletar definindo apenas a data inicial 
ipca <- Quandl('BCB/433', start_date = "1996-01-01")

# Coletar definindo a periodicidade de interesse
# Opções: daily, weekly, monthly, quarterly, annual
ipca <- Quandl("BCB/433", collapse = "quarterly", start_date = "1996-01-01")

# Coletar fazendo alterações nos dados. Transformações nos dados permitidas pelo Quandl:
# - diff: z[t] = y[t] – y[t-1] (diferença)
# - rdiff: z[t] = (y[t] – y[t-1]) / y[t-1] (diferença %)
# - rdiff_from: z[t] = (y[latest] – y[t]) / y[t] (incremento % em relação à última observação)
# - cumul:  z[t] = y[0] + y[1] + … + y[t] (soma acumulativa)
# - normalize: z[t] = y[t] ÷ y[0] * 100 (série iniciar em 100)
ipca <- Quandl("BCB/433", transform = "diff", start_date = "1996-01-01")

# Coletar definido o tipo de dado que queremos no R
# - ts: série temporal
# - zoo: objeto zoo 
# - xts: no formato xts
# Detalhes sobre a diferença entre os tipos no link abaixo
# https://stackoverflow.com/questions/33714660/what-is-the-difference-the-zoo-object-and-ts-object-in-r
ipca <- Quandl("BCB/433", start_date = "1996-01-01", type = "ts")
ipca <- Quandl("BCB/433", start_date = "1996-01-01", type = "xts")

# Alterar o nome da coluna do objeto para VALE3.SA
colnames(ipca) <- "IPCA"

# Visualizar os dados usando o pacote dygraphs. Mais detalhes em
# https://rstudio.github.io/dygraphs/
dygraphs::dygraph(ipca, main = "Índice Nacional de Preços ao Consumidor-Amplo (IPCA)") %>% dyRangeSelector()

Observe que o Quandl retornará uma série temporal no formato especificado. A partir disso, você pode fazer as transformações de interesse nos dados bem como visualizá-los.

USANDO O PACOTE quantmod

O quantmod (Quantitative Financial Modelling & Trading Framework for R) é um pacote que tem como objetivo facilitar o acesso a dados financeiros e disponibilizar funcionalidades que permitam a análise de tais dados. Em função disto, permite acessar dadod do Yahoo Finance, Google Finance, dentre outros.

Com relação às funcionalidades, você pode acessar a lista delas neste link, mas dentre elas temos: alterar a periodicidade de uma série, calcular o retorno de um ativo financeiro, selecionar períodos específicos de uma série temporal, transformar a periodicidade dos retornos e muito mais.

Vamos mostrar como coletar dados do Yahoo Finance no R via quantmod. Neste momento (27/04/2018) o Google Finance não está disponibilizando dados de algumas bolsas. Por este motivo, vamos usar apenas o Yahoo Finance como fonte de dados para o quantmod. Porém, posteriormente você pode testar coletar dados do Google Finance.

Para coletar os dados do Yahoo Finance, precisamos dos seguintes passos:

  1. Acessar o site do Yahoo Finance (https://finance.yahoo.com/), escolher uma ação de interesse e seu código. Por exemplo, a ação da Vale negociada na BM&F BOVESPA que tem o código \(VALE3.SA\). Atenção para o caso de ações negociadas em várias bolsas. Ao pesquisar pelo nome da empresa aparecerá a bolsa na qual ela está sendo negociada e você deve escolher para a bolsa que quer coletar os dados.

  2. No R, execute o seguinte código:

# Coletar os dados da VALE3.SA do Yahoo Finance. Temos as seguintes opções:
# - google: Google Finance
# - FRED: Federal Reserve Bank of St. Louis
# A opção auto.assign define se os dados devem ser incorporados no R com o nome
# do symbol ou um nome específico (auto.assign = FALSE). No nosso caso, optamos
# pelo nome vale.
vale <- quantmod::getSymbols("VALE3.SA", src = "yahoo", auto.assign = FALSE)

# Coletar os dados para um período específico
vale <- quantmod::getSymbols("VALE3.SA", src = "yahoo", auto.assign = FALSE, from = '2015-01-01', to = '2015-12-31')

# Coletar os dados de uma data específica até a última observação disponível sobre a ação
vale <- quantmod::getSymbols("VALE3.SA", src = "yahoo", auto.assign = FALSE, from = '2017-01-01')

# Coletar definido o tipo de dado que queremos no R
# - ts: série temporal
# - zoo: objeto zoo 
# - xts: no formato xts
# Detalhes sobre a diferença entre os tipos no link abaixo
# https://stackoverflow.com/questions/33714660/what-is-the-difference-the-zoo-object-and-ts-object-in-r
vale <- quantmod::getSymbols("VALE3.SA", src = "yahoo", auto.assign = TRUE, from = '2017-01-01', return.class = 'xts')

# Formato da saída
knitr::kable(head(VALE3.SA), align = "c")
VALE3.SA.Open VALE3.SA.High VALE3.SA.Low VALE3.SA.Close VALE3.SA.Volume VALE3.SA.Adjusted
25.28 25.49 25.05 25.06 1118500 23.06044
25.51 26.17 25.40 26.17 5658500 24.08187
26.06 26.23 25.36 25.70 2144400 23.64937
25.98 26.90 25.78 26.68 4031600 24.55118
26.29 26.59 25.86 25.97 4213500 23.89783
26.30 26.85 26.27 26.50 3407800 24.38554

Observe que o pacote quantmod entregará um objeto com várias colunas (Open, High, Low, Close, Volume, Adjusted) com o seguinte significado:

Desta forma, você pode escolher com qual dado vai trabalhar em sua análise. Para retornos diários, geralmente fazemos uso do Close que é o preço de fechamento da ação na data. Para tanto, basta fazer o seguinte:

# Calcular o retorno diário usando o log(p_t) - log(p_t-1). 
daily_return <- PerformanceAnalytics::Return.calculate(VALE3.SA$VALE3.SA.Close, method = "log")
daily_return <- periodReturn(VALE3.SA$VALE3.SA.Close,type="log",period="daily")

# Alterar o nome da coluna do objeto para VALE3.SA
colnames(daily_return) <- "VALE3.SA"

# Outra opção é o retorno diário por meio da opção method = "discrete"
daily_return <- PerformanceAnalytics::Return.calculate(VALE3.SA$VALE3.SA.Close, method = "discrete")
daily_return <- periodReturn(VALE3.SA$VALE3.SA.Close,type="arithmetic",period="daily")

# Outra opção é alterar a periodicidade dos retornos, neste caso tem-se o log-retorno mensal 
monthly_return <- periodReturn(VALE3.SA$VALE3.SA.Close,type="log",period="monthly")

# Visualizar os dados usando o pacote dygraphs. Mais detalhes em
# https://rstudio.github.io/dygraphs/
dygraphs::dygraph(daily_return, main = "Retorno Diário da VALE3.SA") %>% dyRangeSelector()


dygraphs::dygraph(monthly_return, main = "Retorno Mensal da VALE3.SA") %>% dyRangeSelector()

ESTIMAÇÃO DO MODELO CAPM

# limpando a memória
rm(list=ls())

# carregando pacotes
library(quantmod) # cotações das ações e do Ibov
library(Quandl) # Selic BACEN
library(ggplot2) # para gerar os gráficos
library(lmtest) # testes: breusch-godfrey, breuch-pagan
library(tseries) # jarque-bera test
########
##   COLETA DE DADOS
#####

# Coleta das cotações mensais da petrobras e do ibovespa
getSymbols(c("PETR4.SA","^BVSP"),
           periodicity='monthly', 
           from='2000-01-01',
           to='2019-07-01'
)
[1] "PETR4.SA" "^BVSP"   
# Coleta da taxa selic mensal
Quandl.api_key('3gMh2BSgyDSpD4qxrsaT') # set your API key = Comando necessário pra acessar o Quandl
selic <- Quandl("BCB/4390",type = 'xts', start_date = "2000-01-01", end_date = "2019-07-01") # importando a serie do selic do Bacen
selic <- Quandl("BCB/4390",type = 'xts') # importando a serie do selic do Bacen

# Checando a periodicidade dos dados da petrobras
periodicity(PETR4.SA)
Monthly periodicity from 2000-01-01 to 2019-06-01 
periodicity(BVSP)
Monthly periodicity from 2000-01-01 to 2019-06-01 
periodicity(selic)
Monthly periodicity from Jun 1986 to Aug 2019 
# Gerando gráficos de cotações e índices
# petr4 
dygraphs::dygraph(PETR4.SA$PETR4.SA.Adjusted, main = "Preço Diário da PETR4.SA") %>% dyRangeSelector()


# ibov
dygraphs::dygraph(BVSP$BVSP.Adjusted, main = "Índice Bovespa") %>% dyRangeSelector()

########
##   CÁLCULO DOS RETORNOS
#####

# calculando retornos mensais petr4 e ibov com base no preço ajustado
dados <- merge(monthlyReturn(PETR4.SA[,6],type='log')[-1,], 
               monthlyReturn(BVSP[,6],type="log")[-1,]
)

# juntando os dados petr4, ibov e selic

dados <- merge(dados,as.xts(selic/100),join="inner")

# renomeando as colunas
names(dados) <- c("petr4","ibov","selic")
head(dados)
                 petr4         ibov  selic
2000-02-01  0.12410188  0.074752835 0.0145
2000-03-01  0.02141390  0.009019227 0.0145
2000-04-01 -0.09300750 -0.137032786 0.0130
2000-05-01 -0.02600491 -0.038109219 0.0149
2000-06-01  0.26281939  0.111904544 0.0139
2000-07-01 -0.15189025 -0.016454580 0.0131
# Gerando gráficos dos retornos
# petr4 
dygraphs::dygraph(dados[,1], main = "Retorno Mensal da PETR4.SA") %>% dyRangeSelector()


# ibov
dygraphs::dygraph(dados[,2], main = "Retorno Mensal do Índice Bovespa") %>% dyRangeSelector()


# selic
dygraphs::dygraph(dados[,3], main = "Retorno Mensal SELIC") %>% dyRangeSelector()


# estimando o modelo de regressão do CAPM
mod1 <- lm(I(petr4 - selic) ~ I(ibov - selic), data=dados)
# mostrando os resultados
summary(mod1)

Call:
lm(formula = I(petr4 - selic) ~ I(ibov - selic), data = dados)

Residuals:
      Min        1Q    Median        3Q       Max 
-0.239427 -0.046591 -0.004919  0.051128  0.292055 

Coefficients:
                Estimate Std. Error t value Pr(>|t|)    
(Intercept)     0.001412   0.005062   0.279    0.781    
I(ibov - selic) 1.208198   0.072082  16.761   <2e-16 ***
---
Signif. codes:  0 ‘***’ 0.001 ‘**’ 0.01 ‘*’ 0.05 ‘.’ 0.1 ‘ ’ 1

Residual standard error: 0.07722 on 231 degrees of freedom
Multiple R-squared:  0.5488,    Adjusted R-squared:  0.5468 
F-statistic: 280.9 on 1 and 231 DF,  p-value: < 2.2e-16
g6 <- ggplot(dados, aes(x=(ibov-selic), y=(petr4-selic))) + geom_point() + geom_smooth(method=lm, se=FALSE)
g6


########
##   ANÁLISE DOS RESÍDUOS
#####

g7 <- plot(mod1$residuals)

g8 <- plot.ts(mod1$residuals)

g9 <- hist(mod1$residuals)


# testando se os resíduos são normais
jarque.bera.test(mod1$residuals)

    Jarque Bera Test

data:  mod1$residuals
X-squared = 12.862, df = 2, p-value = 0.001611
# testando se os resíduos da regressão estimada são homocedásticos (Breuch-Pagan)
# heteroscedasticidade
bptest(mod1)

    studentized Breusch-Pagan test

data:  mod1
BP = 0.47641, df = 1, p-value = 0.4901
# testando se há autocorrelação nos resíduos da regressão estimada (Breuch-Godfrey)
# autocorrelação
bgtest(mod1)

    Breusch-Godfrey test for serial correlation of order up to 1

data:  mod1
LM test = 5.9347, df = 1, p-value = 0.01485
MAIS DETALHES DOS PACOTES E ALTERNATIVAS DE USO DO R EM FINANÇAS

Apesar de apresentarmos aqui algumas opções de como usar os pacotes Quandl e quantmod para coletar dados públicos diretamente do R, existem outros pacotes que recomendo. Para tanto, use o link abaixo:

Além disso, existe um novo pacote no R chamado tidyquant que tem funcionalidades importantes para quem trabalha com dados financeiros. Você pode descobrir tais funcionalidades por meio dos link abaixo:

REFERÊNCIAS

Costa Ferreira, Pedro, Jonatha Costa, and Talitha Speranza. 2018. BETS Brazilian Economic Time Series. https://CRAN.R-project.org/package=BETS.

Raymond, McTaggart, Daroczi Gergely, and Leung Clement. 2016. Quandl API Wrapper for Quandl.com. https://CRAN.R-project.org/package=Quandl.

Ryan, Jeffrey A., and Joshua M. Ulrich. 2017. Quantmod Quantitative Financial Modelling Framework. https://CRAN.R-project.org/package=quantmod.

LS0tCnRpdGxlOiA8Y2VudGVyPiA8aDI+IDxiPiBQcm9ncmFtYcOnw6NvIGVtIFIgLSBDb2xldGEgZGUgRGFkb3MgRmluYW5jZWlyb3MgZSBFY29uw7RtaWNvcyA8L2I+IDwvaDI+IDwvY2VudGVyPiAKYXV0aG9yOiA8Y2VudGVyPiBGcmFuayBNYWdhbGjDo2VzIGRlIFBpbmhvIC0gSUJNRUMvTUcgPC9jZW50ZXI+CmdyYXBoaWNzOiB5ZXMKbGlua2NvbG9yOiBibHVlCm91dHB1dDogCiAgaHRtbF9ub3RlYm9vazoKICAgIHRoZW1lOiBjZXJ1bGVhbgogICAgZmlnX2NhcHRpb246IHllcwpyZWZlcmVuY2VzOgotIGlkOiBxdWFuZGwKICB0aXRsZTogUXVhbmRsIEFQSSBXcmFwcGVyIGZvciBRdWFuZGwuY29tCiAgYXV0aG9yOgogIC0gZmFtaWx5OiBSYXltb25kCiAgICBnaXZlbjogTWNUYWdnYXJ0CiAgLSBmYW1pbHk6IEdlcmdlbHkKICAgIGdpdmVuOiBEYXJvY3ppCiAgLSBmYW1pbHk6IENsZW1lbnQKICAgIGdpdmVuOiBMZXVuZwogIG5vdGU6IFIgcGFja2FnZQogIHR5cGU6IGJvb2sKICBVUkw6IGh0dHBzOi8vQ1JBTi5SLXByb2plY3Qub3JnL3BhY2thZ2U9UXVhbmRsCiAgaXNzdWVkOgogICAgeWVhcjogMjAxNgotIGlkOiBxdWFudG1vZAogIHRpdGxlOiBxdWFudG1vZCBRdWFudGl0YXRpdmUgRmluYW5jaWFsIE1vZGVsbGluZyBGcmFtZXdvcmsKICBhdXRob3I6CiAgLSBmYW1pbHk6IFJ5YW4KICAgIGdpdmVuOiBKZWZmcmV5IEEuCiAgLSBmYW1pbHk6IFVscmljaAogICAgZ2l2ZW46IEpvc2h1YSBNLgogIG5vdGU6IFIgcGFja2FnZQogIHR5cGU6IGJvb2sKICBVUkw6IGh0dHBzOi8vQ1JBTi5SLXByb2plY3Qub3JnL3BhY2thZ2U9cXVhbnRtb2QKICBpc3N1ZWQ6CiAgICB5ZWFyOiAyMDE3Ci0gaWQ6IGJldHMKICB0aXRsZTogQkVUUyBCcmF6aWxpYW4gRWNvbm9taWMgVGltZSBTZXJpZXMKICBhdXRob3I6CiAgLSBmYW1pbHk6IENvc3RhIEZlcnJlaXJhCiAgICBnaXZlbjogUGVkcm8KICAtIGZhbWlseTogQ29zdGEKICAgIGdpdmVuOiBKb25hdGhhCiAgLSBmYW1pbHk6IFNwZXJhbnphCiAgICBnaXZlbjogVGFsaXRoYQogIG5vdGU6IFIgcGFja2FnZQogIHR5cGU6IGJvb2sKICBVUkw6IGh0dHBzOi8vQ1JBTi5SLXByb2plY3Qub3JnL3BhY2thZ2U9QkVUUwogIGlzc3VlZDoKICAgIHllYXI6IDIwMTgKbm9jaXRlOiB8IAogIEBxdWFuZGwsIEBxdWFudG1vZCwgQGJldHMKLS0tCgpFc3RlIG1hdGVyaWFsIHRlbSBjb21vIG9iamV0aXZvIGVuc2luYXIgY29tbyB1c2FyIGRpdmVyc29zIHBhY290ZXMgZG8gUiBwYXJhIGNvbGV0YXIgZGFkb3MgZmluYW5jZWlyb3MgZSBlY29uw7RtaWNvcyBkZSBmb250ZXMgcMO6YmxpY2FzIGNvbW8gQmFuY28gQ2VudHJhbCBkbyBCcmFzaWwsIEJNJkYgQm92ZXNwYSwgSUJHRSwgSVBFQSwgR29vZ2xlIEZpbmFuY2UsIFlhaG9vIEZpbmFuY2UsIEZFRCwgZXRjLgoKIyMjIyMgKipJTlRST0RVw4fDg08qKgoKSW1hZ2luZSBxdWUgdm9jw6ogcHJlY2lzYSBhbmFsaXNhciB1bWEgYcOnw6NvIHF1YWxxdWVyIGUgdG9tYXIgYSBkZWNpc8OjbyBkZSBjb21wcmFyIG91IG7Do28gdGFsIGHDp8Ojby4gUG9zc2l2ZWxtZW50ZSwgdm9jw6ogdGVyw6EgcXVlIHBhZ2FyIHBvciBhbGd1bSBzZXJ2acOnbyBxdWUgdGVuaGEgZGFkb3MgZG8gaGlzdMOzcmljbyBkbyBwcmXDp28gZGVzdGEgYcOnw6NvLCBvcyByZXN1bHRhZG9zIG9wZXJhY2lvbmFpcyBkYSBlbXByZXNhIGJlbSBjb21vIG5vdMOtY2lhcyB2aW5jdWxhZGFzIMOgIGVtcHJlc2EgbmEgbcOtZGlhLiBPdXRyYSBvcMOnw6NvIMOpIHZvY8OqIGFjZXNzYXIgbyBzaXRlIGRlIHJlbGFjaW9uYW1lbnRvIGNvbSBpbnZlc3RpZG9yZXMgZGEgZW1wcmVzYSBlIHRlbnRhciBwZWdhciBvcyBkYWRvcyBkbyBzaXRlLiBQYXJhIGlzc28sIHNlcsOhIG5lY2Vzc8OhcmlvIGZhemVyIG8gZG93bmxvYWQgZG9zIGRhZG9zLCB0YWx2ZXogbWFudXNlw6EtbG9zIHBhcmEgcXVlIGZpcXVlbSBubyBmb3JtYXRvIGRlIHNldSBpbnRlcmVzc2UgZSBhcMOzcyBpc3NvIGZhemVyIHN1YXMgYW7DoWxpc2VzLgoKTm90ZSBxdWUgcGFyYSBjaGVnYXIgbm8gb2JqZXRpdm8gY3J1Y2lhbCBxdWUgw6kgYW5hbGlzYXIgb3MgZGFkb3MgZGEgZW1wcmVzYSBlIHRvbWFyIHVtYSBkZWNpc8OjbyBkZSBjb21wcmFyIG91IG7Do28gYSBhw6fDo28sIHZvY8OqIHByb3ZhdmVsbWVudGUgcGVyZGV1IGJhc3RhbnRlIHRlbXBvIHRlbnRhbmRvIGFjZXNzYXIgYXMgaW5mb3JtYcOnw7VlcyBuZWNlc3PDoXJpYXMuIAoKRmVsaXptZW50ZSwgcG9yIG1laW8gZG8gUiBjb25zZWd1aW1vcyBhY2Vzc2FyIGZvbnRlcyBww7pibGljYXMgcXVlIG5vcyBhanVkYW0gY29tIGEgZGlzcG9uaWJpbGl6YcOnw6NvIGRlIGRhZG9zIGRlIHVtYSBmb3JtYSBtYWlzIHNpbXBsZXMgZSBlZmljaWVudGUuIERlbnRyZSBhcyB2w6FyaWFzIGZvbnRlcywgdGVtb3M6CgoqIFtHb29nbGUgRmluYW5jZV0oaHR0cDovL3d3dy5nb29nbGUuY29tL2ZpbmFuY2UpCiogW1lhaG9vIEZpbmFuY2VdKGh0dHBzOi8vZmluYW5jZS55YWhvby5jb20vKQoqIFtJcGVhZGF0YV0oaHR0cDovL3d3dy5pcGVhZGF0YS5nb3YuYnIvKQoqIFtTSURSQS9JQkdFXShodHRwczovL3NpZHJhLmliZ2UuZ292LmJyLykKKiBbQk0mRiBCb3Zlc3BhXShodHRwOi8vd3d3LmJtZmJvdmVzcGEuY29tLmJyL3B0X2JyL3NlcnZpY29zL21hcmtldC1kYXRhL2hpc3Rvcmljby9tZXJjYWRvLWEtdmlzdGEvc2VyaWVzLWhpc3RvcmljYXMvKQoqIFtCYW5jbyBDZW50cmFsIGRvIEJyYXNpbF0oaHR0cDovL3d3dy5iY2IuZ292LmJyLz9TRVJJRVNURU1QKQoqIFtCYW5jbyBDZW50cmFsIGRvcyBFVUFdKGh0dHBzOi8vd3d3LmZlZGVyYWxyZXNlcnZlLmdvdi9kYXRhZG93bmxvYWQvKQoqIFtCYW5jbyBNdW5kaWFsXShodHRwczovL2RhdGEud29ybGRiYW5rLm9yZy8pCgpQYXJhIHRhbnRvLCB0ZW1vcyBkdWFzIGFsdGVybmF0aXZhcy4gVW1hIGRlbGFzIMOpIGFjZXNzYXIgYXMgW0FQSXNdKGh0dHBzOi8vc2Vuc2VkaWEuY29tL2Jsb2cvYXBpcy9vLXF1ZS1zYW8tYXBpcy1wYXJ0ZS0yLWNvbW8tdW1hLWFwaS1mdW5jaW9uYS8pIGRlc3RhcyBpbnN0aXR1acOnw7VlcyBwb3IgbWVpbyBkbyBSIGUgY29sZXRhciBvcyBkYWRvcy4gT3V0cmEgYWx0ZXJuYXRpdmEsIMOpIGZhemVyIHVzbyBkZSBwYWNvdGVzIGRvIFIgcXVlIGZhY2lsaXRhbSBvIGFjZXNzbyDDoHMgQVBJcyBwb3IgbWVpbyBkZSBmdW7Dp8O1ZXMgcXVlIHPDo28gYmVtIG1haXMgc2ltcGxlcyBkZSB1dGlsaXphci4gCgpOZXN0ZSBtYXRlcmlhbCwgdmFtb3MgdXNhciBwYWNvdGVzLCBtYXMgY2FzbyBxdWVpcmEgZW50ZW5kZXIgY29tbyBtYW51c2VhciB1bWEgQVBJLCBvYnNlcnZlIGEgZXhwbGljYcOnw6NvIGNvbnRpZGEgbm8gbWF0ZXJpYWwgW1Byb2dyYW1hw6fDo28gZW0gUiAtIEltcG9ydGFyIERhZG9zXShodHRwczovL3JwdWJzLmNvbS9odWRzb25jaGF2cy9pbXBvcnRhcmRhZG9zKS4gT3MgcGFjb3RlcyBxdWUgcGVybWl0aXLDo28gYWNlc3NhciBvcyBkYWRvcyBkYXMgaW5zdGl0dWnDp8O1ZXMgY2l0YWRhcyBzw6NvOgoKKiBbUXVhbmRsXShodHRwczovL3d3dy5xdWFuZGwuY29tLykKKiBbcXVhbnRtb2RdKGh0dHBzOi8vd3d3LnF1YW50bW9kLmNvbS8pCiogW0JFVFNdKGh0dHBzOi8vZ2l0aHViLmNvbS9wZWRyb2Nvc3RhZmVycmVpcmEvQkVUUykKKiBbaXBlYWRhdGFyXShodHRwczovL2dpdGh1Yi5jb20vZ29tZXNsZWR1YXJkby9pcGVhZGF0YXIpCgojIyMjIyAqKlVTQU5ETyBPIFBBQ09URSBRdWFuZGwqKgoKTyBRdWFuZGwgw6kgdW1hIHBsYXRhZm9ybWEgcXVlIGRpc3BvbmliaWxpemEgbWlsaGFyZXMgZGUgZm9udGVzIGRlIGRhZG9zIHDDumJsaWNvcyBlIHByaXZhZG9zIHBhcmEgdXN1w6FyaW9zIGRlIGRpdmVyc2FzIHRlY25vbG9naWFzIGUgbGluZ3VhZ2VucyBkZSBwcm9ncmFtYcOnw6NvLiBBbMOpbSBkaXNzbywgYSBwbGF0YWZvcm1hIGZvcm5lY2UgdW1hIEFQSSBxdWUgcG9kZSBzZXIgZmFjaWxtZW50ZSBpbmNvcnBvcmFkYSBlbSBvdXRyYXMgdGVjbm9sb2dpYXMuIE1haW9yZXMgZGV0YWxoZXMgZGUgdG9kYXMgYXMgb3DDp8O1ZXMgZGUgdXNvIGRvIFF1YW5kbCwgcG9kZW0gc2VyIGVuY29udHJhZG9zIG5lc3RlIFtsaW5rXShodHRwczovL3d3dy5xdWFuZGwuY29tL3Rvb2xzL2Z1bGwtbGlzdCkuIAoKRXNwZWNpZmljYW1lbnRlIHBhcmEgbyBSLCBvIFF1YW5kbCB0ZW0gdW0gcGFjb3RlIChbUXVhbmRsXShodHRwczovL3d3dy5xdWFuZGwuY29tL3Rvb2xzL3IpKSBxdWUgcGVybWl0ZSBhY2Vzc2FyIHRvZG9zIG9zIGRhZG9zIChww7pibGljb3MgZSBwcml2YWRvcykgZGlyZXRhbWVudGUgZG8gUi4gUGFyYSB0YW50bywgbyBwYWNvdGUgdGVtIGZ1bsOnw7VlcyBxdWUgdXNhbSBhIFtBUEldKGh0dHBzOi8vd3d3LnF1YW5kbC5jb20vdG9vbHMvYXBpKSBkbyBRdWFuZGwgcGFyYSBidXNjYXIgZSBwcm9jZXNzYXIgYXMgcmVxdWlzacOnw7Vlcy4gCgpMZW1icmFuZG8gcXVlIMOpIG5lY2Vzc8OhcmlvIHNlIGNhZGFzdHJhciBubyBzaXRlIGRvIFF1YW5kbCBwYXJhIHRlciB1bWEgKipRdWFuZGwuYXBpX2tleSoqIHF1ZSBwZXJtaXRpcsOhIGFjZXNzYXIgdW1hIG1haW9yIHF1YW50aWRhZGUgZGUgZGFkb3MgKHNlbSBlbGEgdm9jw6ogdGVtIHVtIGxpbWl0ZSBkacOhcmlvKSBvdSBhdMOpIG1lc21vIGRhZG9zIHF1ZSB2b2PDqiBhZHF1aXJpdSBkbyBRdWFuZGwgKGRhZG9zIHByaXZhZG9zIGUgcXVlIHPDo28gcGFnb3MpLiBOYSBpbWFnZW0gYWJhaXhvLCB2b2PDqiBlbmNvbnRyYXLDoSBhcyBpbnN0cnXDp8O1ZXMgbmVjZXNzw6FyaWFzIHBhcmEgY3JpYXIgc3VhIGNvbnRhIG5vIFF1YW5kbC4KCiFbXShodHRwOi8vZy5yZWNvcmRpdC5jby9QM2xPMWQ3aWN2LmdpZikKCjxicj4gPC9icj4KCiogKipEYWRvcyBkbyBCQUNFTjoqKgoKUGFyYSBjb2xldGFyIGRhZG9zIGRvIEJhbmNvIENlbnRyYWwgZG8gQnJhc2lsIChCQUNFTikgbm8gUiB2aWEgUXVhbmRsIHByZWNpc2Ftb3MgZG9zIHNlZ3VpbnRlcyBwYXNzb3M6CgoxLiBBY2Vzc2FyIG8gc2lzdGVtYSBkZSBzw6lyaWVzIHRlbXBvcmFpcyBkbyBCQUNFTiAoW2h0dHA6Ly93d3cuYmNiLmdvdi5ici8/U0VSSUVTVEVNUF0oaHR0cDovL3d3dy5iY2IuZ292LmJyLz9TRVJJRVNURU1QKSksIGVzY29saGVyIHVtYSBzw6lyaWUgdGVtcG9yYWwgZGUgaW50ZXJlc3NlIGUgc2V1IGPDs2RpZ28uIFBvciBleGVtcGxvLCBvIMONbmRpY2UgbmFjaW9uYWwgZGUgcHJlw6dvcyBhbyBjb25zdW1pZG9yLWFtcGxvIChJUENBKSBxdWUgdGVtIG8gY8OzZGlnbyAkNDMzJC4KCiFbXShodHRwOi8vZy5yZWNvcmRpdC5jby93WDhqaDFVWFQ3LmdpZikKCjxicj4gPC9icj4KCjIuIE5vIFIsIGV4ZWN1dGUgbyBzZWd1aW50ZSBjw7NkaWdvOgoKYGBge3IsIGVjaG89VFJVRSwgd2FybmluZz1GQUxTRSwgZmlnLndpZHRoPTkuNSwgZmlnLmhlaWdodD00fQojIEluc3RhbGFyIHBhY290ZXMgKHPDsyBleGVjdXRhciB1bWEgdmV6KQojIGluc3RhbGwucGFja2FnZXMoYygiUXVhbmRsIiwgImR5Z3JhcGhzIiwgIm1hZ3JpdHRyIiwgIlBlcmZvcm1hbmNlQW5hbHl0aWNzIiwgInF1YW50bW9kIikpCgojIENhcnJlZ2FyIHBhY290ZXMgbmVjZXNzw6FyaW9zCnN1cHByZXNzTWVzc2FnZXMocmVxdWlyZShRdWFuZGwpKQpzdXBwcmVzc01lc3NhZ2VzKHJlcXVpcmUoZHlncmFwaHMpKQpzdXBwcmVzc01lc3NhZ2VzKHJlcXVpcmUobWFncml0dHIpKQpzdXBwcmVzc01lc3NhZ2VzKHJlcXVpcmUoUGVyZm9ybWFuY2VBbmFseXRpY3MpKQpzdXBwcmVzc01lc3NhZ2VzKHJlcXVpcmUocXVhbnRtb2QpKQoKIyBEZWZpbmlyIHN1YSBhcGkga2V5ClF1YW5kbC5hcGlfa2V5KCczZ01oMkJTZ3lEU3BENHF4cnNhVCcpCiNRdWFuZGwuYXBpX2tleSgnTmpHYzIyLTQxUjd6RF9LN1B0N3onKQoKIyBDb2xldGFyIG8gZGFkbyBkbyBJUENBLiBPYnNlcnZlIHF1ZSBhZGljaW9uYW1vcyBCQ0IvIGFvIGPDs2RpZ28gZGEgc8OpcmllIHRlbXBvcmFsLiBTZW1wcmUgdXNhcmVtb3MgQkNCLyAKIyBwYXJhIGNvbGV0YXIgZGFkb3MgZG8gQkFDRU4gcG9yIG1laW8gZG8gUXVhbmRsLiBFbGUgdGVtIG8gc2lnbmlmaWNhZG8gZGUgZGV0ZXJtaW5hciBkZSBxdWFsIGJhbmNvIGRlIAojIGRhZG9zIG8gUXVhbmRsIGRldmUgYnVzY2FyIHBlbGEgc8OpcmllIHF1ZSBvIG7Dum1lcm8gZGVmaW5pZG8uIENvbW8gcGFkcsOjbyBvIFF1YW5kbCBjb2xldGFyw6Egb3MgZGFkb3MgbmEKIyBwZXJpb2RpY2lkYWRlIGRpdnVsZ2FkYSBwZWxvIEJBQ0VOLgppcGNhIDwtIFF1YW5kbCgnQkNCLzQzMycpCgojIENvbGV0YXIgYSBtZXNtYSBpbmZvcm1hw6fDo28gcGFyYSB1bSBwZXLDrW9kbyBlc3BlY8OtZmljbwppcGNhIDwtIFF1YW5kbCgnQkNCLzQzMycsIHN0YXJ0X2RhdGUgPSAiMTk5Ni0wMS0wMSIsIGVuZF9kYXRlID0gIjIwMTctMTItMzEiKQoKIyBDb2xldGFyIGRlZmluaW5kbyBhcGVuYXMgYSBkYXRhIGluaWNpYWwgCmlwY2EgPC0gUXVhbmRsKCdCQ0IvNDMzJywgc3RhcnRfZGF0ZSA9ICIxOTk2LTAxLTAxIikKCiMgQ29sZXRhciBkZWZpbmluZG8gYSBwZXJpb2RpY2lkYWRlIGRlIGludGVyZXNzZQojIE9ww6fDtWVzOiBkYWlseSwgd2Vla2x5LCBtb250aGx5LCBxdWFydGVybHksIGFubnVhbAppcGNhIDwtIFF1YW5kbCgiQkNCLzQzMyIsIGNvbGxhcHNlID0gInF1YXJ0ZXJseSIsIHN0YXJ0X2RhdGUgPSAiMTk5Ni0wMS0wMSIpCgojIENvbGV0YXIgZmF6ZW5kbyBhbHRlcmHDp8O1ZXMgbm9zIGRhZG9zLiBUcmFuc2Zvcm1hw6fDtWVzIG5vcyBkYWRvcyBwZXJtaXRpZGFzIHBlbG8gUXVhbmRsOgojIC0gZGlmZjogelt0XSA9IHlbdF0g4oCTIHlbdC0xXSAoZGlmZXJlbsOnYSkKIyAtIHJkaWZmOiB6W3RdID0gKHlbdF0g4oCTIHlbdC0xXSkgLyB5W3QtMV0gKGRpZmVyZW7Dp2EgJSkKIyAtIHJkaWZmX2Zyb206CXpbdF0gPSAoeVtsYXRlc3RdIOKAkyB5W3RdKSAvIHlbdF0gKGluY3JlbWVudG8gJSBlbSByZWxhw6fDo28gw6Agw7psdGltYSBvYnNlcnZhw6fDo28pCiMgLSBjdW11bDoJelt0XSA9IHlbMF0gKyB5WzFdICsg4oCmICsgeVt0XSAoc29tYSBhY3VtdWxhdGl2YSkKIyAtIG5vcm1hbGl6ZTogelt0XSA9IHlbdF0gw7cgeVswXSAqIDEwMCAoc8OpcmllIGluaWNpYXIgZW0gMTAwKQppcGNhIDwtIFF1YW5kbCgiQkNCLzQzMyIsIHRyYW5zZm9ybSA9ICJkaWZmIiwgc3RhcnRfZGF0ZSA9ICIxOTk2LTAxLTAxIikKCiMgQ29sZXRhciBkZWZpbmlkbyBvIHRpcG8gZGUgZGFkbyBxdWUgcXVlcmVtb3Mgbm8gUgojIC0gdHM6IHPDqXJpZSB0ZW1wb3JhbAojIC0gem9vOiBvYmpldG8gem9vIAojIC0geHRzOiBubyBmb3JtYXRvIHh0cwojIERldGFsaGVzIHNvYnJlIGEgZGlmZXJlbsOnYSBlbnRyZSBvcyB0aXBvcyBubyBsaW5rIGFiYWl4bwojIGh0dHBzOi8vc3RhY2tvdmVyZmxvdy5jb20vcXVlc3Rpb25zLzMzNzE0NjYwL3doYXQtaXMtdGhlLWRpZmZlcmVuY2UtdGhlLXpvby1vYmplY3QtYW5kLXRzLW9iamVjdC1pbi1yCmlwY2EgPC0gUXVhbmRsKCJCQ0IvNDMzIiwgc3RhcnRfZGF0ZSA9ICIxOTk2LTAxLTAxIiwgdHlwZSA9ICJ0cyIpCmlwY2EgPC0gUXVhbmRsKCJCQ0IvNDMzIiwgc3RhcnRfZGF0ZSA9ICIxOTk2LTAxLTAxIiwgdHlwZSA9ICJ4dHMiKQoKIyBBbHRlcmFyIG8gbm9tZSBkYSBjb2x1bmEgZG8gb2JqZXRvIHBhcmEgVkFMRTMuU0EKY29sbmFtZXMoaXBjYSkgPC0gIklQQ0EiCgojIFZpc3VhbGl6YXIgb3MgZGFkb3MgdXNhbmRvIG8gcGFjb3RlIGR5Z3JhcGhzLiBNYWlzIGRldGFsaGVzIGVtCiMgaHR0cHM6Ly9yc3R1ZGlvLmdpdGh1Yi5pby9keWdyYXBocy8KZHlncmFwaHM6OmR5Z3JhcGgoaXBjYSwgbWFpbiA9ICLDjW5kaWNlIE5hY2lvbmFsIGRlIFByZcOnb3MgYW8gQ29uc3VtaWRvci1BbXBsbyAoSVBDQSkiKSAlPiUgZHlSYW5nZVNlbGVjdG9yKCkKYGBgCgpPYnNlcnZlIHF1ZSBvIFF1YW5kbCByZXRvcm5hcsOhIHVtYSBzw6lyaWUgdGVtcG9yYWwgbm8gZm9ybWF0byBlc3BlY2lmaWNhZG8uIEEgcGFydGlyIGRpc3NvLCB2b2PDqiBwb2RlIGZhemVyIGFzIHRyYW5zZm9ybWHDp8O1ZXMgZGUgaW50ZXJlc3NlIG5vcyBkYWRvcyBiZW0gY29tbyB2aXN1YWxpesOhLWxvcy4KCiMjIyMjICoqVVNBTkRPIE8gUEFDT1RFIHF1YW50bW9kKioKCk8gcXVhbnRtb2QgKCpRdWFudGl0YXRpdmUgRmluYW5jaWFsIE1vZGVsbGluZyAmIFRyYWRpbmcgRnJhbWV3b3JrIGZvciBSKikgw6kgdW0gcGFjb3RlIHF1ZSB0ZW0gY29tbyBvYmpldGl2byBmYWNpbGl0YXIgbyBhY2Vzc28gYSBkYWRvcyBmaW5hbmNlaXJvcyBlIGRpc3BvbmliaWxpemFyIGZ1bmNpb25hbGlkYWRlcyBxdWUgcGVybWl0YW0gYSBhbsOhbGlzZSBkZSB0YWlzIGRhZG9zLiBFbSBmdW7Dp8OjbyBkaXN0bywgcGVybWl0ZSBhY2Vzc2FyIGRhZG9kIGRvIFlhaG9vIEZpbmFuY2UsIEdvb2dsZSBGaW5hbmNlLCBkZW50cmUgb3V0cm9zLgoKQ29tIHJlbGHDp8OjbyDDoHMgZnVuY2lvbmFsaWRhZGVzLCB2b2PDqiBwb2RlIGFjZXNzYXIgYSBsaXN0YSBkZWxhcyBuZXN0ZSBbbGlua10oaHR0cHM6Ly93d3cucXVhbnRtb2QuY29tL2V4YW1wbGVzL2RhdGEvKSwgbWFzIGRlbnRyZSBlbGFzIHRlbW9zOiBhbHRlcmFyIGEgcGVyaW9kaWNpZGFkZSBkZSB1bWEgc8OpcmllLCBjYWxjdWxhciBvIHJldG9ybm8gZGUgdW0gYXRpdm8gZmluYW5jZWlybywgc2VsZWNpb25hciBwZXLDrW9kb3MgZXNwZWPDrWZpY29zIGRlIHVtYSBzw6lyaWUgdGVtcG9yYWwsIHRyYW5zZm9ybWFyIGEgcGVyaW9kaWNpZGFkZSBkb3MgcmV0b3Jub3MgZSBtdWl0byBtYWlzLiAKCiogKipEYWRvcyBkbyBZYWhvbyBGaW5hbmNlIGUgR29vZ2xlIEZpbmFuY2U6KioKClZhbW9zIG1vc3RyYXIgY29tbyBjb2xldGFyIGRhZG9zIGRvIFlhaG9vIEZpbmFuY2Ugbm8gUiB2aWEgcXVhbnRtb2QuIE5lc3RlIG1vbWVudG8gKDI3LzA0LzIwMTgpIG8gR29vZ2xlIEZpbmFuY2UgbsOjbyBlc3TDoSBkaXNwb25pYmlsaXphbmRvIGRhZG9zIGRlIGFsZ3VtYXMgYm9sc2FzLiBQb3IgZXN0ZSBtb3Rpdm8sIHZhbW9zIHVzYXIgYXBlbmFzIG8gWWFob28gRmluYW5jZSBjb21vIGZvbnRlIGRlIGRhZG9zIHBhcmEgbyBxdWFudG1vZC4gUG9yw6ltLCBwb3N0ZXJpb3JtZW50ZSB2b2PDqiBwb2RlIHRlc3RhciBjb2xldGFyIGRhZG9zIGRvIEdvb2dsZSBGaW5hbmNlLiAKClBhcmEgY29sZXRhciBvcyBkYWRvcyBkbyBZYWhvbyBGaW5hbmNlLCBwcmVjaXNhbW9zIGRvcyBzZWd1aW50ZXMgcGFzc29zOgoKMS4gQWNlc3NhciBvIHNpdGUgZG8gWWFob28gRmluYW5jZSAoW2h0dHBzOi8vZmluYW5jZS55YWhvby5jb20vXShodHRwczovL2ZpbmFuY2UueWFob28uY29tLykpLCBlc2NvbGhlciB1bWEgYcOnw6NvIGRlIGludGVyZXNzZSBlIHNldSBjw7NkaWdvLiBQb3IgZXhlbXBsbywgYSBhw6fDo28gZGEgVmFsZSBuZWdvY2lhZGEgbmEgQk0mRiBCT1ZFU1BBIHF1ZSB0ZW0gbyBjw7NkaWdvICRWQUxFMy5TQSQuIEF0ZW7Dp8OjbyBwYXJhIG8gY2FzbyBkZSBhw6fDtWVzIG5lZ29jaWFkYXMgZW0gdsOhcmlhcyBib2xzYXMuIEFvIHBlc3F1aXNhciBwZWxvIG5vbWUgZGEgZW1wcmVzYSBhcGFyZWNlcsOhIGEgYm9sc2EgbmEgcXVhbCBlbGEgZXN0w6Egc2VuZG8gbmVnb2NpYWRhIGUgdm9jw6ogZGV2ZSBlc2NvbGhlciBwYXJhIGEgYm9sc2EgcXVlIHF1ZXIgY29sZXRhciBvcyBkYWRvcy4gCgoyLiBObyBSLCBleGVjdXRlIG8gc2VndWludGUgY8OzZGlnbzoKCmBgYHtyLCBlY2hvPVRSVUUsIHdhcm5pbmc9RkFMU0V9CiMgQ29sZXRhciBvcyBkYWRvcyBkYSBWQUxFMy5TQSBkbyBZYWhvbyBGaW5hbmNlLiBUZW1vcyBhcyBzZWd1aW50ZXMgb3DDp8O1ZXM6CiMgLSBnb29nbGU6IEdvb2dsZSBGaW5hbmNlCiMgLSBGUkVEOiBGZWRlcmFsIFJlc2VydmUgQmFuayBvZiBTdC4gTG91aXMKIyBBIG9ww6fDo28gYXV0by5hc3NpZ24gZGVmaW5lIHNlIG9zIGRhZG9zIGRldmVtIHNlciBpbmNvcnBvcmFkb3Mgbm8gUiBjb20gbyBub21lCiMgZG8gc3ltYm9sIG91IHVtIG5vbWUgZXNwZWPDrWZpY28gKGF1dG8uYXNzaWduID0gRkFMU0UpLiBObyBub3NzbyBjYXNvLCBvcHRhbW9zCiMgcGVsbyBub21lIHZhbGUuCnZhbGUgPC0gcXVhbnRtb2Q6OmdldFN5bWJvbHMoIlZBTEUzLlNBIiwgc3JjID0gInlhaG9vIiwgYXV0by5hc3NpZ24gPSBGQUxTRSkKCiMgQ29sZXRhciBvcyBkYWRvcyBwYXJhIHVtIHBlcsOtb2RvIGVzcGVjw61maWNvCnZhbGUgPC0gcXVhbnRtb2Q6OmdldFN5bWJvbHMoIlZBTEUzLlNBIiwgc3JjID0gInlhaG9vIiwgYXV0by5hc3NpZ24gPSBGQUxTRSwgZnJvbSA9ICcyMDE1LTAxLTAxJywgdG8gPSAnMjAxNS0xMi0zMScpCgojIENvbGV0YXIgb3MgZGFkb3MgZGUgdW1hIGRhdGEgZXNwZWPDrWZpY2EgYXTDqSBhIMO6bHRpbWEgb2JzZXJ2YcOnw6NvIGRpc3BvbsOtdmVsIHNvYnJlIGEgYcOnw6NvCnZhbGUgPC0gcXVhbnRtb2Q6OmdldFN5bWJvbHMoIlZBTEUzLlNBIiwgc3JjID0gInlhaG9vIiwgYXV0by5hc3NpZ24gPSBGQUxTRSwgZnJvbSA9ICcyMDE3LTAxLTAxJykKCiMgQ29sZXRhciBkZWZpbmlkbyBvIHRpcG8gZGUgZGFkbyBxdWUgcXVlcmVtb3Mgbm8gUgojIC0gdHM6IHPDqXJpZSB0ZW1wb3JhbAojIC0gem9vOiBvYmpldG8gem9vIAojIC0geHRzOiBubyBmb3JtYXRvIHh0cwojIERldGFsaGVzIHNvYnJlIGEgZGlmZXJlbsOnYSBlbnRyZSBvcyB0aXBvcyBubyBsaW5rIGFiYWl4bwojIGh0dHBzOi8vc3RhY2tvdmVyZmxvdy5jb20vcXVlc3Rpb25zLzMzNzE0NjYwL3doYXQtaXMtdGhlLWRpZmZlcmVuY2UtdGhlLXpvby1vYmplY3QtYW5kLXRzLW9iamVjdC1pbi1yCnZhbGUgPC0gcXVhbnRtb2Q6OmdldFN5bWJvbHMoIlZBTEUzLlNBIiwgc3JjID0gInlhaG9vIiwgYXV0by5hc3NpZ24gPSBUUlVFLCBmcm9tID0gJzIwMTctMDEtMDEnLCByZXR1cm4uY2xhc3MgPSAneHRzJykKCiMgRm9ybWF0byBkYSBzYcOtZGEKa25pdHI6OmthYmxlKGhlYWQoVkFMRTMuU0EpLCBhbGlnbiA9ICJjIikKYGBgCgpPYnNlcnZlIHF1ZSBvIHBhY290ZSBxdWFudG1vZCBlbnRyZWdhcsOhIHVtIG9iamV0byBjb20gdsOhcmlhcyBjb2x1bmFzICgqKk9wZW4sIEhpZ2gsIExvdywgQ2xvc2UsIFZvbHVtZSwgQWRqdXN0ZWQqKikgY29tIG8gc2VndWludGUgc2lnbmlmaWNhZG86CgoqICoqT3BlbioqOiBPIHByZcOnbyBkZSBhYmVydHVyYSBuYXMgZGF0YXMgZXNwZWNpZmljYWRhcwoqICoqSGlnaCoqOiBPIHByZcOnbyBkYSBhbHRhIG5hcyBkYXRhcyBlc3BlY2lmaWNhZGFzCiogKipMb3cqKjogTyBwcmXDp28gZGEgYmFpeGEgbmFzIGRhdGFzIGVzcGVjaWZpY2FkYXMKKiAqKkNsb3NlKio6IE8gcHJlw6dvIGRlIGZlY2hhbWVudG8gbmFzIGRhdGFzIGVzcGVjaWZpY2FkYXMKKiAqKlZvbHVtZSoqOiBPIHZvbHVtZSBuYXMgZGF0YXMgZXNwZWNpZmljYWRhcwoqICoqQWRqdXN0ZWQqKjogTyBwcmXDp28gZGUgZmVjaGFtZW50byBhanVzdGFkbyBkZXBvaXMgZGUgYXBsaWNhciBkaXN0cmlidWnDp8O1ZXMgZGUgZGl2aWRlbmRvcyBvdSBkaXZpc8OjbyBkYSBhw6fDo28uIAoKRGVzdGEgZm9ybWEsIHZvY8OqIHBvZGUgZXNjb2xoZXIgY29tIHF1YWwgZGFkbyB2YWkgdHJhYmFsaGFyIGVtIHN1YSBhbsOhbGlzZS4gUGFyYSByZXRvcm5vcyBkacOhcmlvcywgZ2VyYWxtZW50ZSBmYXplbW9zIHVzbyBkbyAqKkNsb3NlKiogcXVlIMOpIG8gcHJlw6dvIGRlIGZlY2hhbWVudG8gZGEgYcOnw6NvIG5hIGRhdGEuIFBhcmEgdGFudG8sIGJhc3RhIGZhemVyIG8gc2VndWludGU6CgpgYGB7ciwgZWNobz1UUlVFLCB3YXJuaW5nPUZBTFNFLCBmaWcud2lkdGg9OS41LCBmaWcuaGVpZ2h0PTR9CiMgQ2FsY3VsYXIgbyByZXRvcm5vIGRpw6FyaW8gdXNhbmRvIG8gbG9nKHBfdCkgLSBsb2cocF90LTEpLiAKZGFpbHlfcmV0dXJuIDwtIFBlcmZvcm1hbmNlQW5hbHl0aWNzOjpSZXR1cm4uY2FsY3VsYXRlKFZBTEUzLlNBJFZBTEUzLlNBLkNsb3NlLCBtZXRob2QgPSAibG9nIikKZGFpbHlfcmV0dXJuIDwtIHBlcmlvZFJldHVybihWQUxFMy5TQSRWQUxFMy5TQS5DbG9zZSx0eXBlPSJsb2ciLHBlcmlvZD0iZGFpbHkiKQoKIyBBbHRlcmFyIG8gbm9tZSBkYSBjb2x1bmEgZG8gb2JqZXRvIHBhcmEgVkFMRTMuU0EKY29sbmFtZXMoZGFpbHlfcmV0dXJuKSA8LSAiVkFMRTMuU0EiCgojIE91dHJhIG9ww6fDo28gw6kgbyByZXRvcm5vIGRpw6FyaW8gcG9yIG1laW8gZGEgb3DDp8OjbyBtZXRob2QgPSAiZGlzY3JldGUiCmRhaWx5X3JldHVybiA8LSBQZXJmb3JtYW5jZUFuYWx5dGljczo6UmV0dXJuLmNhbGN1bGF0ZShWQUxFMy5TQSRWQUxFMy5TQS5DbG9zZSwgbWV0aG9kID0gImRpc2NyZXRlIikKZGFpbHlfcmV0dXJuIDwtIHBlcmlvZFJldHVybihWQUxFMy5TQSRWQUxFMy5TQS5DbG9zZSx0eXBlPSJhcml0aG1ldGljIixwZXJpb2Q9ImRhaWx5IikKCiMgT3V0cmEgb3DDp8OjbyDDqSBhbHRlcmFyIGEgcGVyaW9kaWNpZGFkZSBkb3MgcmV0b3Jub3MsIG5lc3RlIGNhc28gdGVtLXNlIG8gbG9nLXJldG9ybm8gbWVuc2FsIAptb250aGx5X3JldHVybiA8LSBwZXJpb2RSZXR1cm4oVkFMRTMuU0EkVkFMRTMuU0EuQ2xvc2UsdHlwZT0ibG9nIixwZXJpb2Q9Im1vbnRobHkiKQoKIyBWaXN1YWxpemFyIG9zIGRhZG9zIHVzYW5kbyBvIHBhY290ZSBkeWdyYXBocy4gTWFpcyBkZXRhbGhlcyBlbQojIGh0dHBzOi8vcnN0dWRpby5naXRodWIuaW8vZHlncmFwaHMvCmR5Z3JhcGhzOjpkeWdyYXBoKGRhaWx5X3JldHVybiwgbWFpbiA9ICJSZXRvcm5vIERpw6FyaW8gZGEgVkFMRTMuU0EiKSAlPiUgZHlSYW5nZVNlbGVjdG9yKCkKCmR5Z3JhcGhzOjpkeWdyYXBoKG1vbnRobHlfcmV0dXJuLCBtYWluID0gIlJldG9ybm8gTWVuc2FsIGRhIFZBTEUzLlNBIikgJT4lIGR5UmFuZ2VTZWxlY3RvcigpCmBgYAoKIyMjIyMjIyMjIyMjIyMjIyMjIyMjIyMjIyMjIyMjIyMjIyMjIyMjIyMKIyMjIyAgICBFU1RJTUHDh8ODTyBETyBNT0RFTE8gQ0FQTSAgICAgIyMjIwojIyMjIyMjIyMjIyMjIyMjIyMjIyMjIyMjIyMjIyMjIyMjIyMjIyMjIwoKYGBge3IsIGVjaG89VFJVRSwgd2FybmluZz1GQUxTRX0KIyMjIyMjIyMKIyMgICBQQUNPVEVTIE5FQ0VTU8OBUklPUwojIyMjIwoKIyBsaW1wYW5kbyBhIG1lbcOzcmlhCnJtKGxpc3Q9bHMoKSkKCiMgY2FycmVnYW5kbyBwYWNvdGVzCmxpYnJhcnkocXVhbnRtb2QpICMgY290YcOnw7VlcyBkYXMgYcOnw7VlcyBlIGRvIElib3YKbGlicmFyeShRdWFuZGwpICMgU2VsaWMgQkFDRU4KbGlicmFyeShnZ3Bsb3QyKSAjIHBhcmEgZ2VyYXIgb3MgZ3LDoWZpY29zCmxpYnJhcnkobG10ZXN0KSAjIHRlc3RlczogYnJldXNjaC1nb2RmcmV5LCBicmV1Y2gtcGFnYW4KbGlicmFyeSh0c2VyaWVzKSAjIGphcnF1ZS1iZXJhIHRlc3QKYGBgCgoKYGBge3IsIGVjaG89VFJVRSwgd2FybmluZz1GQUxTRX0KIyMjIyMjIyMKIyMgICBDT0xFVEEgREUgREFET1MKIyMjIyMKCiMgQ29sZXRhIGRhcyBjb3Rhw6fDtWVzIG1lbnNhaXMgZGEgcGV0cm9icmFzIGUgZG8gaWJvdmVzcGEKZ2V0U3ltYm9scyhjKCJQRVRSNC5TQSIsIl5CVlNQIiksCiAgICAgICAgICAgcGVyaW9kaWNpdHk9J21vbnRobHknLCAKICAgICAgICAgICBmcm9tPScyMDAwLTAxLTAxJywKICAgICAgICAgICB0bz0nMjAxOS0wNy0wMScKKQoKIyBDb2xldGEgZGEgdGF4YSBzZWxpYyBtZW5zYWwKUXVhbmRsLmFwaV9rZXkoJzNnTWgyQlNneURTcEQ0cXhyc2FUJykgIyBzZXQgeW91ciBBUEkga2V5ID0gQ29tYW5kbyBuZWNlc3PDoXJpbyBwcmEgYWNlc3NhciBvIFF1YW5kbApzZWxpYyA8LSBRdWFuZGwoIkJDQi80MzkwIix0eXBlID0gJ3h0cycsIHN0YXJ0X2RhdGUgPSAiMjAwMC0wMS0wMSIsIGVuZF9kYXRlID0gIjIwMTktMDctMDEiKSAjIGltcG9ydGFuZG8gYSBzZXJpZSBkbyBzZWxpYyBkbyBCYWNlbgpzZWxpYyA8LSBRdWFuZGwoIkJDQi80MzkwIix0eXBlID0gJ3h0cycpICMgaW1wb3J0YW5kbyBhIHNlcmllIGRvIHNlbGljIGRvIEJhY2VuCgojIENoZWNhbmRvIGEgcGVyaW9kaWNpZGFkZSBkb3MgZGFkb3MgZGEgcGV0cm9icmFzCnBlcmlvZGljaXR5KFBFVFI0LlNBKQpwZXJpb2RpY2l0eShCVlNQKQpwZXJpb2RpY2l0eShzZWxpYykKCiMgR2VyYW5kbyBncsOhZmljb3MgZGUgY290YcOnw7VlcyBlIMOtbmRpY2VzCiMgcGV0cjQgCmR5Z3JhcGhzOjpkeWdyYXBoKFBFVFI0LlNBJFBFVFI0LlNBLkFkanVzdGVkLCBtYWluID0gIlByZcOnbyBEacOhcmlvIGRhIFBFVFI0LlNBIikgJT4lIGR5UmFuZ2VTZWxlY3RvcigpCgojIGlib3YKZHlncmFwaHM6OmR5Z3JhcGgoQlZTUCRCVlNQLkFkanVzdGVkLCBtYWluID0gIsONbmRpY2UgQm92ZXNwYSIpICU+JSBkeVJhbmdlU2VsZWN0b3IoKQpgYGAKCgpgYGB7ciwgZWNobz1UUlVFLCB3YXJuaW5nPUZBTFNFfQoKIyMjIyMjIyMKIyMgICBDw4FMQ1VMTyBET1MgUkVUT1JOT1MKIyMjIyMKCiMgY2FsY3VsYW5kbyByZXRvcm5vcyBtZW5zYWlzIHBldHI0IGUgaWJvdiBjb20gYmFzZSBubyBwcmXDp28gYWp1c3RhZG8KZGFkb3MgPC0gbWVyZ2UobW9udGhseVJldHVybihQRVRSNC5TQVssNl0sdHlwZT0nbG9nJylbLTEsXSwgCiAgICAgICAgICAgICAgIG1vbnRobHlSZXR1cm4oQlZTUFssNl0sdHlwZT0ibG9nIilbLTEsXQopCgojIGp1bnRhbmRvIG9zIGRhZG9zIHBldHI0LCBpYm92IGUgc2VsaWMKCmRhZG9zIDwtIG1lcmdlKGRhZG9zLGFzLnh0cyhzZWxpYy8xMDApLGpvaW49ImlubmVyIikKCiMgcmVub21lYW5kbyBhcyBjb2x1bmFzCm5hbWVzKGRhZG9zKSA8LSBjKCJwZXRyNCIsImlib3YiLCJzZWxpYyIpCmhlYWQoZGFkb3MpCgojIEdlcmFuZG8gZ3LDoWZpY29zIGRvcyByZXRvcm5vcwojIHBldHI0IApkeWdyYXBoczo6ZHlncmFwaChkYWRvc1ssMV0sIG1haW4gPSAiUmV0b3JubyBNZW5zYWwgZGEgUEVUUjQuU0EiKSAlPiUgZHlSYW5nZVNlbGVjdG9yKCkKCiMgaWJvdgpkeWdyYXBoczo6ZHlncmFwaChkYWRvc1ssMl0sIG1haW4gPSAiUmV0b3JubyBNZW5zYWwgZG8gw41uZGljZSBCb3Zlc3BhIikgJT4lIGR5UmFuZ2VTZWxlY3RvcigpCgojIHNlbGljCmR5Z3JhcGhzOjpkeWdyYXBoKGRhZG9zWywzXSwgbWFpbiA9ICJSZXRvcm5vIE1lbnNhbCBTRUxJQyIpICU+JSBkeVJhbmdlU2VsZWN0b3IoKQoKIyBlc3RpbWFuZG8gbyBtb2RlbG8gZGUgcmVncmVzc8OjbyBkbyBDQVBNCm1vZDEgPC0gbG0oSShwZXRyNCAtIHNlbGljKSB+IEkoaWJvdiAtIHNlbGljKSwgZGF0YT1kYWRvcykKIyBtb3N0cmFuZG8gb3MgcmVzdWx0YWRvcwpzdW1tYXJ5KG1vZDEpCgpnNiA8LSBnZ3Bsb3QoZGFkb3MsIGFlcyh4PShpYm92LXNlbGljKSwgeT0ocGV0cjQtc2VsaWMpKSkgKyBnZW9tX3BvaW50KCkgKyBnZW9tX3Ntb290aChtZXRob2Q9bG0sIHNlPUZBTFNFKQpnNgpgYGAKCmBgYHtyLCBlY2hvPVRSVUUsIHdhcm5pbmc9RkFMU0V9CgojIyMjIyMjIwojIyAgIEFOw4FMSVNFIERPUyBSRVPDjURVT1MKIyMjIyMKCmc3IDwtIHBsb3QobW9kMSRyZXNpZHVhbHMpCmc4IDwtIHBsb3QudHMobW9kMSRyZXNpZHVhbHMpCmc5IDwtIGhpc3QobW9kMSRyZXNpZHVhbHMpCgojIHRlc3RhbmRvIHNlIG9zIHJlc8OtZHVvcyBzw6NvIG5vcm1haXMKamFycXVlLmJlcmEudGVzdChtb2QxJHJlc2lkdWFscykKCiMgdGVzdGFuZG8gc2Ugb3MgcmVzw61kdW9zIGRhIHJlZ3Jlc3PDo28gZXN0aW1hZGEgc8OjbyBob21vY2Vkw6FzdGljb3MgKEJyZXVjaC1QYWdhbikKIyBoZXRlcm9zY2VkYXN0aWNpZGFkZQpicHRlc3QobW9kMSkKCiMgdGVzdGFuZG8gc2UgaMOhIGF1dG9jb3JyZWxhw6fDo28gbm9zIHJlc8OtZHVvcyBkYSByZWdyZXNzw6NvIGVzdGltYWRhIChCcmV1Y2gtR29kZnJleSkKIyBhdXRvY29ycmVsYcOnw6NvCmJndGVzdChtb2QxKQpgYGAKCiMjIyMjICoqTUFJUyBERVRBTEhFUyBET1MgUEFDT1RFUyBFIEFMVEVSTkFUSVZBUyBERSBVU08gRE8gUiBFTSBGSU5BTsOHQVMqKgoKQXBlc2FyIGRlIGFwcmVzZW50YXJtb3MgYXF1aSBhbGd1bWFzIG9ww6fDtWVzIGRlIGNvbW8gdXNhciBvcyBwYWNvdGVzIFF1YW5kbCBlIHF1YW50bW9kIHBhcmEgY29sZXRhciBkYWRvcyBww7pibGljb3MgZGlyZXRhbWVudGUgZG8gUiwgZXhpc3RlbSBvdXRyb3MgcGFjb3RlcyBxdWUgcmVjb21lbmRvLiBQYXJhIHRhbnRvLCB1c2UgbyBsaW5rIGFiYWl4bzoKCiogW0JFVFNdKGh0dHBzOi8vY3Jhbi5yLXByb2plY3Qub3JnL3dlYi9wYWNrYWdlcy9CRVRTL3ZpZ25ldHRlcy9CRVRTX2Jhc2ljX3VzYWdlLmh0bWwpCiogW2lwZWFkYXRhcl0oaHR0cHM6Ly9naXRodWIuY29tL2dvbWVzbGVkdWFyZG8vaXBlYWRhdGFyKQoqIFtkZWZsYXRlQlJdKGh0dHBzOi8vZ2l0aHViLmNvbS9tZWlyZWxlc2ZmL2RlZmxhdGVCUikKCkFsw6ltIGRpc3NvLCBleGlzdGUgdW0gbm92byBwYWNvdGUgbm8gUiBjaGFtYWRvIFt0aWR5cXVhbnRdKGh0dHBzOi8vZ2l0aHViLmNvbS9idXNpbmVzcy1zY2llbmNlL3RpZHlxdWFudCkgcXVlIHRlbSBmdW5jaW9uYWxpZGFkZXMgaW1wb3J0YW50ZXMgcGFyYSBxdWVtIHRyYWJhbGhhIGNvbSBkYWRvcyBmaW5hbmNlaXJvcy4gVm9jw6ogcG9kZSBkZXNjb2JyaXIgdGFpcyBmdW5jaW9uYWxpZGFkZXMgcG9yIG1laW8gZG9zIGxpbmsgYWJhaXhvOgoKKiBbSW50cm9kdWN0aW9uIHRvIHRpZHlxdWFudF0oaHR0cHM6Ly9jcmFuLnItcHJvamVjdC5vcmcvd2ViL3BhY2thZ2VzL3RpZHlxdWFudC92aWduZXR0ZXMvVFEwMC1pbnRyb2R1Y3Rpb24tdG8tdGlkeXF1YW50Lmh0bWwpCiogW0NvcmUgZnVuY3Rpb25zIGluIHRpZHlxdWFudF0oaHR0cHM6Ly9jcmFuLnItcHJvamVjdC5vcmcvd2ViL3BhY2thZ2VzL3RpZHlxdWFudC92aWduZXR0ZXMvVFEwMS1jb3JlLWZ1bmN0aW9ucy1pbi10aWR5cXVhbnQuaHRtbCkKKiBbUiBxdWFudGl0YXRpdmUgYW5hbHlzaXMgcGFja2FnZSBpbnRlZ3JhdGlvbnMgaW4gdGlkeXF1YW50XShodHRwczovL2NyYW4uci1wcm9qZWN0Lm9yZy93ZWIvcGFja2FnZXMvdGlkeXF1YW50L3ZpZ25ldHRlcy9UUTAyLXF1YW50LWludGVncmF0aW9ucy1pbi10aWR5cXVhbnQuaHRtbCkKKiBbU2NhbGluZyBhbmQgbW9kZWxpbmcgd2l0aCB0aWR5cXVhbnRdKGh0dHBzOi8vY3Jhbi5yLXByb2plY3Qub3JnL3dlYi9wYWNrYWdlcy90aWR5cXVhbnQvdmlnbmV0dGVzL1RRMDMtc2NhbGluZy1hbmQtbW9kZWxpbmctd2l0aC10aWR5cXVhbnQuaHRtbCkKKiBbQ2hhcnRpbmcgd2l0aCB0aWR5cXVhbnRdKGh0dHBzOi8vY3Jhbi5yLXByb2plY3Qub3JnL3dlYi9wYWNrYWdlcy90aWR5cXVhbnQvdmlnbmV0dGVzL1RRMDQtY2hhcnRpbmctd2l0aC10aWR5cXVhbnQuaHRtbCkKKiBbUGVyZm9ybWFuY2UgYW5hbHlzaXMgd2l0aCB0aWR5cXVhbnRdKGh0dHBzOi8vY3Jhbi5yLXByb2plY3Qub3JnL3dlYi9wYWNrYWdlcy90aWR5cXVhbnQvdmlnbmV0dGVzL1RRMDUtcGVyZm9ybWFuY2UtYW5hbHlzaXMtd2l0aC10aWR5cXVhbnQuaHRtbCkKCgojIyMjIyAqKlJFRkVSw4pOQ0lBUyoq