Visualisasi Data

Exercises ~ Week 3

Logo

1 Pendahuluan

Tujuan dari data data ini adalah untuk memberikan pemahaman secara menyeluruh tentang performa produk dari berbagai jenis tipe sepatu ventela berdasarkan rating, jumlah penjualan, dan harga. Dari berbagai macam visualisasi kita dapat melihat perbandingan tingkat penjualan disetiap tipe produk, serta kisaran harga yang ditentukan, sampai pola hubungan penjualan antara harga dan minat pembeli. Hasil dari visualisasi membantu kita mengidentifikasi produk yang paling diminati konsumen, pengaruhnya terhadap tingkat penjualan, serta terdapat gambaran kondisi pasar secara keseluruhan.

2 Persiapan Data

# Load package
library(ggplot2)
# 1. Create a Shoe Sales Table
library(knitr)
shoes <- data.frame(
  Type = c(
    "Champion Low Black Natural", "Public Low All Black Kanvas",
    "Victory Low All Black", "Reborn Low Reflective White",
    "Olympic Low Black White", "Alpha Low Cream",
    "Ethnic High All Black Kanvas", "Evo Low Black Natural",
    "V23 Low Black Brown", "Rubick Fat Low Black White"
  ),
  Rating = c(4.9, 4.9, 4.6, 4.8, 5.0, 4.9, 4.9, 5.0, 4.7, 4.8),
  Sold = c(57, 980, 46, 697, 62, 572, 840, 29, 46, 80),
  Price = c(276.104, 229.280, 248.940, 302.940, 302.940, 167.680, 185.280, 190.440, 275.940, 284.940))

knitr::kable(shoes, caption = "table:ventela shoe sales")
table:ventela shoe sales
Type Rating Sold Price
Champion Low Black Natural 4.9 57 276.104
Public Low All Black Kanvas 4.9 980 229.280
Victory Low All Black 4.6 46 248.940
Reborn Low Reflective White 4.8 697 302.940
Olympic Low Black White 5.0 62 302.940
Alpha Low Cream 4.9 572 167.680
Ethnic High All Black Kanvas 4.9 840 185.280
Evo Low Black Natural 5.0 29 190.440
V23 Low Black Brown 4.7 46 275.940
Rubick Fat Low Black White 4.8 80 284.940

3 VIsualisasi

3.1 Bar Chart

3.1.1 Definisi

Definisi: Bar Chart adalah grafik berbentuk batang yang digunakan untuk menampilkan data dalam kategori tertentu. Setiap batang mewakili satu kategori, dan tinggi atau panjang batang menunjukkan besarnya nilai pada kategori tersebut. Grafik ini berguna untuk membandingkan nilai antar kelompok secara cepat dan visual.

3.1.2 Aturan Penggunaan

  • Sumbu: Sumbu X (Horizontal): berisi kategori atau kelompok (misalnya jenis sepatu). Sumbu Y (Vertikal): menunjukkan nilai atau jumlah (misalnya total penjualan).

  • Skala: Pastikan skala pada sumbu Y dimulai dari nol untuk menghindari distorsi visual yang salah.

  • Lebar Batang: semua batang harus memiliki ukuran dan jarak yang konsisten agar mudah dibaca.

  • Jarak Antar Batang: Jarak antar batang sebaiknya konsisten untuk menjaga kejelasan visual.

  • Label: tambahkan label jelas pada setiap batang agar pembaca tahu kategori yang ditampilkan.

3.1.3 Kelebihan dan Kekurangan

  • Kelebihan:
    • Mudah dibaca dan dipahami oleh semua orang.
    • Efektif untuk membandingkan perbedaan antar kategori.
    • Dapat menampilkan perbedaan besar atau kecil antar nilai secara jelas.
    • Cocok untuk berbagai jenis data kategorikal (seperti produk, tipe, wilayah, dll).
  • Kekurangan:
    • Kurang cocok jika jumlah kategori terlalu banyak karena bisa membuat grafik tampak penuh dan sulit dibaca.
    • Tidak ideal untuk menunjukkan perubahan dari waktu ke waktu (lebih cocok pakai Line Chart).
    • Bisa memberikan kesan visual yang salah kalau skala sumbu tidak dimulai dari nol.
    • Keterbatasan kategori sehingga tidak cocok untuk menampilkan data yang memuat kategori sangat banyak karena bisa membuat diagram terlalu ramai dan sulit dibaca
# Bar Chart - Enhanced Sales Comparison

library(ggplot2)
ggplot(shoes, aes(x = Type, y = Sold, fill = Type)) +
  geom_bar(stat = "identity", color = "black") +
  geom_point(aes(y = Sold), color = "red", size = 3) +
  geom_text(aes(label = Sold), vjust = -0.5, size = 4) +
  labs(title = "Sales Comparison", x = "Shoe Type", y = "Units Sold") +
  theme_minimal(base_size = 13) +
  theme(axis.text.x = element_text(angle = 45, hjust = 1),
        legend.position = "none",
        plot.title = element_text(face = "bold", hjust = 0.5)) +
  scale_fill_brewer(palette = "Set3")

  • kegunaan kode:
    • ggplot(…) → buat kanvas grafik dari data shoes, dengan sumbu X = tipe sepatu dan Y = jumlah terjual.
    • geom_bar(stat=“identity”) → menggambar batang sesuai nilai Sold.
    • geom_point() → kasih titik merah di puncak batang biar jelas tinggi nilainya.
    • geom_text() → menampilkan angka jumlah penjualan di atas tiap batang.
    • labs() → menambah judul dan label sumbu.
    • theme_minimal() & theme() → bikin tampilan bersih, memiringkan teks sumbu X, dan menengahkan judul.
    • scale_fill_brewer() → pakai warna lembut berbeda untuk tiap tipe sepatu.

3.2 Histogram - Price Distribution

3.2.1 Definisi

Histogram adalah grafik batang yang menampilkan distribusi frekuensi dari data numerik. Data dibagi ke dalam beberapa interval (bin), dan tinggi batang menunjukkan berapa banyak data yang berada di setiap interval. Grafik ini berguna untuk melihat pola sebaran data — seperti apakah data cenderung merata, miring, atau memiliki nilai ekstrem.

3.2.2 Aturan Penggunaan

  • Sumbu:
    • Sumbu X: menampilkan rentang nilai (misalnya harga).
    • Sumbu Y: menunjukkan jumlah data dalam tiap rentang.
  • Bin:
    • Lebar Bin dan jumlahnya : semua bin harus memiliki lebar sama. Terlalu sedikit bin bisa menyembunyikan detail, sedangkan terlalu banyak bisa membuat grafik tampak berisik.
  • Label dan Judul: setiap sumbu dan grafik harus diberi keterangan yang jelas.
  • Tidak Ada Jarak Antar Batang: tidak boleh ada jarak antar batang karena data bersifat kontinu.

3.2.3 Kelebihan dan Kekurangan

  • Kelebihan:
    • Efektif untuk melihat sebaran dan pola data numerik.
    • Dapat menunjukkan pusat data, variasi, dan bentuk distribusi.
    • Membantu mendeteksi outlier atau nilai yang tidak biasa.
  • Kekurangan:
    • Detail data individu hilang karena dikelompokkan ke dalam bin.
    • Hasil bisa berbeda tergantung pada jumlah dan lebar bin.
    • Hanya cocok untuk data numerik, bukan kategori.
ggplot(shoes, aes(x = Price)) +
  geom_histogram(bins = 6, fill = "skyblue", color = "black", alpha = 0.9) +
  geom_vline(aes(xintercept = mean(Price)), color = "red", linetype = "dashed") +
  annotate("text", x = mean(shoes$Price) + 3, y = 2.5,
           label = paste0("Avg: Rp", round(mean(shoes$Price), 0), "k"),
           color = "red", size = 4, hjust = 0) +
  scale_x_continuous(breaks = seq(155, 330, by = 25),
                     labels = scales::label_number(suffix = "k", accuracy = 1)) +
  labs(title = "Price Distribution of Ventela Shoes",
       x = "Price (in thousand Rupiah)", y = "Number of Shoe Types") +
  theme_minimal(base_size = 13)

  • kegunaan kode:
    • geom_histogram() → bikin batang sebaran harga.
    • geom_vline() → garis merah nunjukin rata-rata harga.
    • bins = 6 → harga dibagi jadi 6 kelompok (rentang harga).
    • fill = “skyblue” → batang berwarna biru muda.
    • color = “black” → garis tepi batang warna hitam.
    • alpha = 0.9 → transparansi sedikit biar warnanya lembut.

3.3 Boxplot - Various Shoe Prices

3.3.1 Definisi

Boxplot adalah grafik yang menampilkan sebaran data numerik melalui kuartil dan mendeteksi adanya outlier (nilai ekstrem). Grafik ini membantu memahami pusat data (median), sebaran (IQR), serta apakah data condong ke satu sisi (skewness).

3.3.2 Aturan Penggunaan

  • Sumbu:
    • Sumbu vertikal menampilkan rentang nilai (misalnya harga)
    • sumbu horizontal menunjukkan kategori atau kelompok data.
  • Kotak (Box):
    • Tepi bawah kotak menunjukkan kuartil pertama (Q1), yaitu 25% data berada di bawah nilai ini
    • Tepi atas kotak menunjukkan kuartil ketiga (Q2), yaitu 75% data berada di bawah nilai ini
    • Panjang kotak (Q3-Q1) disebut interquartile range (IQR), yang menunjukkan sebaran 50% data tengah
  • Median:
    • Garis horizontal di dalam kotak menunjukkan median (Q2), yaitu nilai tengah data
  • Kumis (Whiskers):
    • Menunjukkan nilai minimum dan maksimum yang masih dalam jangkauan wajar (bukan outlier).

3.3.3 Kelebihan dan Kekurangan

  • Kelebihan:
    • Mudah menunjukkan sebaran, median, dan outlier secara visual.
    • Memudahkan perbandingan antar kelompok data.
    • Tidak perlu asumsi bentuk distribusi tertentu.
  • Kekurangan:
    • Menyederhanakan data, jadi detail seperti rata-rata atau jumlah data tidak terlihat.
    • Kurang cocok untuk data dengan banyak puncak (multimodal).
    • Penentuan outlier kadang subjektif.
# Boxplot - Various Shoe Prices
ggplot(shoes, aes(y = Price)) +
  geom_boxplot(fill = "lightgreen", color = "black") +
  labs(title = "Boxplot of Various Shoe Prices",
       y = "Price (in thousands IDR)",
       x = "") +
  theme_minimal()

  • kegunaan kode:
    • ggplot(shoes, aes(y = Price)) → Buat plot vertikal harga sepatu.
    • geom_boxplot(fill=“lightgreen”, color=“black”) → Tampilkan boxplot hijau dengan garis hitam.
    • labs(…) → Tambah judul dan label sumbu Y, sumbu X dikosongkan.
    • theme_minimal() → Tampilan plot bersih dan sederhana.

3.4 Pie Chart - Sales Percentage

3.4.1 Definisi

Pie Chart (diagram lingkaran) adalah representasi grafis data dalam bentuk lingkaran yang dibagi menjadi beberapa sektor. Setiap sektor menunjukkan proporsi atau persentase dari setiap kategori terhadap total keseluruhan. Tujuannya untuk memperlihatkan kontribusi relatif masing-masing kategori dalam satu tampilan yang sederhana dan mudah dipahami.

3.4.2 Aturan Penggunaan

  • Sektor:
    • Setiap sektor mewakili satu kategori data, dan ukurannya sebanding dengan persentase kategori tersebut terhadap total.
  • Label:
    • Setiap sektor sebaiknya diberi label yang jelas berisi nama kategori serta persentase atau proporsinya.
  • Jumlah Kategori:
    • Ideal digunakan untuk data dengan sedikit kategori (kurang dari 7–8), karena terlalu banyak sektor membuat visual sulit dibaca.
  • Total 100%:
    • Jumlah semua persentase dalam pie chart harus sama dengan 100%
  • Urutan:
    • Sektor biasanya diurutkan dari yang terbesar ke terkecil agar perbandingan lebih mudah dilakukan.

3.4.3 Kelebihan dan Kekurangan

  • Kelebihan:
    • Mudah dipahami dan menarik secara visual.
    • Efektif untuk menunjukkan proporsi tiap kategori terhadap total data.
    • Memberikan gambaran cepat mengenai kategori dominan.
  • Kekurangan:
    • Tidak akurat untuk membandingkan sektor yang ukurannya mirip.
    • Kurang efektif jika kategori terlalu banyak.
    • Tidak menunjukkan nilai absolut, hanya persentase.
    • Sulit digunakan jika ingin membandingkan lebih dari satu pie chart.
library(ggplot2)
library(dplyr)
## 
## Attaching package: 'dplyr'
## The following objects are masked from 'package:stats':
## 
##     filter, lag
## The following objects are masked from 'package:base':
## 
##     intersect, setdiff, setequal, union
library(ggrepel)

# Palette warna manual
my_colors <- c(
  "Champion Low Black Natural" = "red",
  "Public Low All Black Kanvas" = "navy",
  "Victory Low All Black" = "darkgreen",
  "Reborn Low Reflective White" = "orange",
  "Olympic Low Black White" = "purple",
  "Alpha Low Cream" = "darkgrey",
  "Ethnic High All Black Kanvas" = "brown",
  "Evo Low Black Natural" = "magenta",
  "V23 Low Black Brown" = "blue",
  "Rubick Fat Low Black White" = "black"
)

# Pie chart 
shoes %>%
  mutate(Percent = round(Sold / sum(Sold) * 100, 1),
         Label = paste0(Percent, "%")) %>%
  ggplot(aes("", Percent, fill = Type)) +
  geom_bar(stat = "identity", color = "white", width = 1) +
  coord_polar(theta = "y") +
  geom_text_repel(aes(label = Label, color = Type), nudge_x = 1, segment.color = NA, size = 3.5, show.legend = FALSE) +
  scale_fill_manual(values = my_colors,
                    labels = paste0(shoes$Type, " (", round(shoes$Sold / sum(shoes$Sold) * 100, 1), "%)")) +
  scale_color_manual(values = my_colors) +
  labs(title = "Sales Percentage of Ventela Shoes", fill = "Shoe Type") +
  theme_minimal() +
  theme(plot.title = element_text(face = "bold", hjust = 0.5),
        legend.position = "right",
        legend.title = element_text(face = "bold"))

  • kegunaan kode:
    • geom_bar(stat=“identity”) → batang sesuai nilai Percent.
    • coord_polar(theta=“y”) → ubah batang menjadi pie chart.
    • color=“white” → garis tepi tiap sektor supaya jelas.
    • geom_text_repel() → mencegah label tumpang tindih.
    • color = Type → label pakai warna sektor.
    • segment.color = NA → garis penghubung tidak ditampilkan.
    • scale_fill_manual() → pakai warna custom tiap tipe sepatu (my_colors).
    • Legend menampilkan tipe sepatu + persentase.
    • scale_color_manual() → label persentase pakai warna yang sama dengan sektor.

3.5 Scatter Plot - Price vs Sales

3.5.1 Definisi

Scatter Plot (diagram pencar) adalah grafik yang digunakan untuk menampilkan hubungan antara dua variabel numerik. Setiap titik mewakili satu observasi, dengan posisi horizontal (sumbu X) menunjukkan nilai satu variabel, dan posisi vertikal (sumbu Y) menunjukkan nilai variabel lainnya. Grafik ini membantu melihat apakah dua variabel memiliki hubungan positif, negatif, atau tidak ada hubungan sama sekali

3.5.2 Aturan Penggunaan

1. Tentukan Variabel: * Pilih dua variabel numerik yang ingin dibandingkan. 2. Buat Sumbu: * Sumbu X menunjukkan variabel pertama (misalnya harga), dan sumbu Y menunjukkan variabel kedua (misalnya jumlah terjual). 3. Plot Data: * Setiap titik pada grafik mewakili kombinasi nilai dari dua variabel tersebut

4. Interpretasi: * Perhatikan pola titik-titik, apakah naik (hubungan positif), turun (negatif), atau tersebar acak (tidak ada hubungan). Outlier juga perlu diperhatikan karena bisa mempengaruhi kesimpulan.

3.5.3 Kelebihan dan Kekurangan

  • Kelebihan:
    • Menunjukkan pola hubungan antara dua variabel dengan jelas.
    • Memudahkan identifikasi korelasi, klaster, atau tren tertentu.
    • Dapat mengungkap outlier atau data ekstrem.
    • Visual sederhana dan mudah dipahami, bahkan bagi pemula.
  • Kekurangan:
    • Hanya menampilkan hubungan dua variabel sekaligus.
    • Tidak bisa menunjukkan sebab-akibat, hanya korelasi.
    • Sensitif terhadap outlier yang dapat menyesatkan interpretasi.
    • Jika data terlalu padat, titik bisa saling tumpang tindih dan sulit dibaca.
ggplot(shoes, aes(x = Price, y = Sold, color = Rating, size = Rating)) +
geom_point(alpha = 0.8) +
geom_smooth(method = "lm", se = FALSE, color = "darkblue", linetype = "dashed") +
labs(
title = "Price vs Sales of Ventela Shoes",
x = "Price (Rp in thousands)",
y = "Units Sold",
color = "Rating",
size = "Rating"
) +
theme_minimal(base_size = 13)
## Warning: Using `size` aesthetic for lines was deprecated in ggplot2 3.4.0.
## ℹ Please use `linewidth` instead.
## This warning is displayed once every 8 hours.
## Call `lifecycle::last_lifecycle_warnings()` to see where this warning was
## generated.
## `geom_smooth()` using formula = 'y ~ x'
## Warning: The following aesthetics were dropped during statistical transformation: size.
## ℹ This can happen when ggplot fails to infer the correct grouping structure in
##   the data.
## ℹ Did you forget to specify a `group` aesthetic or to convert a numerical
##   variable into a factor?

* kegunaan kode: * color=“white” → garis tepi tiap sektor supaya jelas. * ggplot(shoes, aes(x = Price, y = Sold, color = Rating, size = Rating)) → Buat kanvas scatter plot dari data shoes, sumbu X = harga (Price), sumbu Y = jumlah terjual (Sold). Warna dan ukuran titik (geom_point) ditentukan oleh rating tiap sepatu. geom_point(alpha = 0.8) → Tambahkan titik dengan transparansi 0.8 supaya titik yang saling tumpang tindih tetap terlihat. * geom_smooth(method = “lm”, se = FALSE, color = “darkblue”, linetype = “dashed”) → Tambahkan garis tren linear (regresi) berwarna biru tua dan putus-putus. se = FALSE artinya tidak menampilkan confidence interval. * labs(…) → Menambahkan judul plot dan label sumbu, serta label legend untuk warna dan ukuran titik. * theme_minimal(base_size = 13) → Memberikan tema bersih dengan ukuran font dasar 13 untuk visual yang rapi.

3.6 Line Plot - Sales Performance

3.6.1 Definisi

Line Plot digunakan untuk menampilkan perubahan nilai antar kategori atau dari waktu ke waktu menggunakan garis penghubung antar titik. Dalam konteks ini, grafik menunjukkan performa penjualan tiap tipe sepatu Ventela berdasarkan jumlah unit yang terjual. Setiap titik mewakili jumlah penjualan untuk satu jenis sepatu, sedangkan garis menunjukkan pergerakan nilai antar jenis.

3.6.2 Aturan Penggunaan

1. Buat Sumbu: * Sumbu X menunjukkan kategori (tipe sepatu), sedangkan sumbu Y menunjukkan nilai numerik (jumlah terjual). 2. Garis dan Titik: * Gunakan garis untuk menghubungkan titik-titik data agar pola perubahan terlihat jelas. 3. Urutan Data: * Data harus diurutkan secara logis (misalnya berdasarkan kategori atau waktu) agar tren mudah diikuti. 4. Tampilan: * Tambahkan label dan sesuaikan tampilan agar titik serta garis mudah dibaca.

3.6.3 Kelebihan dan Kekurangan

  • Kelebihan:
    • Cocok untuk menunjukkan tren atau perubahan nilai antar kategori.
    • Memberikan gambaran cepat tentang kenaikan atau penurunan performa.
    • Mudah dipahami dan efektif untuk data urut atau berkelanjutan.
  • Kekurangan:
    • Tidak cocok untuk data kategori acak tanpa urutan.
    • Bisa menyesatkan jika jarak antar kategori tidak konsisten.
    • Sulit dibaca jika terlalu banyak titik atau garis tumpang tindih.

3.6.4 Interpretasi:

Line Plot menunjukkan tren penjualan antar tipe sepatu Ventela. Dari grafik ini terlihat mana produk dengan performa tertinggi dan terendah, serta perubahan penjualan antar tipe. Misalnya, tipe tertentu memiliki peningkatan tajam, menandakan produk tersebut lebih diminati dibanding tipe lainnya.

ggplot(shoes, aes(Type, Sold, group = 1)) +
  geom_line(color = "blue") +
  geom_point(size = 2) +
  labs(title = "Sales Performance", x = "Shoe Type", y = "Units Sold") +
  theme(axis.text.x = element_text(angle = 45, hjust = 1))

* kegunaan kode: * ggplot(shoes, aes(Type, Sold, group = 1)) → Buat kanvas plot dari data shoes, sumbu X = tipe sepatu (Type), sumbu Y = jumlah terjual (Sold). * group = 1 memastikan semua titik dihubungkan menjadi satu garis. * geom_line(color = “blue”) → Menggambar garis biru yang menghubungkan titik-titik penjualan tiap tipe sepatu, menunjukkan tren penjualan. * geom_point(size = 2) → Menambahkan titik di tiap tipe sepatu untuk menandai jumlah penjualan, ukuran titik = 2. * labs(title = “Sales Performance”, x = “Shoe Type”, y = “Units Sold”) → Menambahkan judul plot dan label sumbu X & Y. * theme(axis.text.x = element_text(angle = 45, hjust = 1)) → Memiringkan teks sumbu X 45° agar nama tipe sepatu panjang tetap terbaca rapi t_repel() → mencegah label tumpang tindih.

3.7 Density Plot – Distribusi Harga Sepatu

3.7.1 Definisi

Density Plot (atau plot kepadatan) adalah grafik yang menggambarkan distribusi probabilitas dari suatu variabel numerik kontinu dalam bentuk kurva halus. Plot ini menunjukkan sebaran data dan kepadatan relatif dari nilai-nilai yang diamati, di mana luas di bawah kurva bernilai 1 (merepresentasikan total,proporsi,data).

3.7.2 Aturan Penggunaan

1. Buat Sumbu: * Buat Sumbu: X: variabel numerik kontinu (misal: Price), Y: biasanya tidak digunakan secara eksplisit (karena grafik satu dimensi) 2. Alpha (Transparansi): * Mengatur tingkat transparansi kurva agar overlapping tetap terlihat 3. color: * Menentukan warna garis tepi kurva agar masing-masing kurva mudah dibedakan 4. Tata Letak: * Gunakan tema bersih seperti theme_minimal() 5. Judul plot: * di tengah dan tebal agar jelas 6. Legend: * sesuaikan atau hapus judul agar rapi 7. Fill / Pengelompokan: * Gunakan fill untuk membedakan kategori (misal: tipe sepatu)

3.7.3 Kelebihan dan Kekurangan

  • Kelebihan:
    • Menunjukkan distribusi data secara halus dan visual.
    • Mudah membandingkan beberapa kelompok atau kategori.
    • Mendeteksi pola seperti skewness, puncak ganda, atau outlier.
    • Estetis dan cocok untuk presentasi visual.
  • Kekurangan:
    • Tidak menampilkan nilai individu secara detail.
    • Hasil bisa berbeda tergantung pemilihan bandwidth / smoothing.
    • Kurang cocok untuk data kategori; hanya untuk variabel numerik kontinu.
    • Bisa membingungkan jika terlalu banyak kelompok sekaligus.
library(ggplot2)
# Enhanced Density Plot
ggplot(shoes, aes(x = Price, fill = Type)) +
  geom_density(alpha = 0.8, color = "black", size = 0.7) +  
  scale_fill_brewer(palette = "Dark2") +                   
  labs(
    title = "Price Distribution of Ventela Shoes by Type",
    x = "Price (Rp in thousands)",
    y = "Density",
    fill = "Shoe Type"
  ) +
  geom_vline(data = shoes, aes(xintercept = Price, color = Type),
             linetype = "dashed", size = 0.4, alpha = 0.5, show.legend = FALSE) +  # garis vertikal tiap harga
  theme_minimal(base_size = 13) +
  theme(
    plot.title = element_text(face = "bold", hjust = 0.5),
    legend.position = "right",
    legend.title = element_text(face = "bold")
  )
## Warning: Groups with fewer than two data points have been dropped.
## Groups with fewer than two data points have been dropped.
## Groups with fewer than two data points have been dropped.
## Groups with fewer than two data points have been dropped.
## Groups with fewer than two data points have been dropped.
## Groups with fewer than two data points have been dropped.
## Groups with fewer than two data points have been dropped.
## Groups with fewer than two data points have been dropped.
## Groups with fewer than two data points have been dropped.
## Groups with fewer than two data points have been dropped.
## Warning in RColorBrewer::brewer.pal(n, pal): n too large, allowed maximum for palette Dark2 is 8
## Returning the palette you asked for with that many colors
## Warning: Removed 10 rows containing missing values or values outside the scale range
## (`geom_density()`).

  • kegunaan kode:
    • geom_density() → buat kurva halus untuk melihat distribusi harga tiap tipe sepatu.
    • alpha = 0.6 → membuat warna sedikit transparan agar overlapping kurva tetap terlihat.
    • scale_fill_brewer() → memberikan warna berbeda untuk tiap tipe sepatu.
    • labs() → judul dan label sumbu dalam bahasa Inggris sederhana.
    • theme_minimal() + theme() → tampilan bersih, judul tebal dan di tengah, legend tanpa judul.

3.7.4 Interpretasi:

Density Plot menunjukkan bahwa sebagian besar tipe sepatu Ventela berada di rentang harga menengah, dengan beberapa tipe memiliki sebaran harga lebih lebar, menandakan variasi model atau kualitas. Puncak kurva yang lebih tinggi menunjukkan tipe dengan konsentrasi harga tertinggi, sedangkan ekor kurva menandakan adanya harga ekstrem. Dengan membandingkan kurva tiap tipe, kita dapat melihat perbedaan pola harga antar sepatu dan mengidentifikasi produk yang cenderung lebih mahal atau lebih murah.

3.8 Ridgeline Plot - Price distribution by shoe type

3.8.1 Definisi

Ridgeline Plot digunakan untuk menampilkan distribusi data numerik (seperti harga) untuk beberapa kategori secara tumpang tindih dengan bentuk kurva halus. Grafik ini menampilkan bagaimana sebaran harga tiap tipe sepatu Ventela berbeda satu sama lain.

3.8.2 Aturan Penggunaan

1. Buat Sumbu: * Sumbu X menunjukkan nilai numerik (harga), sedangkan sumbu Y menunjukkan kategori (tipe sepatu). 2. Distribusi: * Setiap kurva mewakili distribusi harga dari satu tipe sepatu. 3. Warna dan Label: * Gunakan warna berbeda untuk tiap kategori agar visual mudah dibedakan. 4. Tata Letak: * Pastikan kurva tidak terlalu banyak agar visual tetap jelas dan informatif.

3.8.3 Kelebihan dan Kekurangan

  • Kelebihan:
    • Memberikan visual menarik dan informatif untuk membandingkan distribusi antar kelompok.
    • Efektif untuk menunjukkan variasi, rentang, dan pola sebaran data.
    • Menarik secara estetika dan mudah menarik perhatian audiens.
  • Kekurangan:
    • Kurang efektif jika jumlah kategori terlalu banyak karena kurva bisa saling tumpang tindih.
    • Tidak menunjukkan nilai spesifik, hanya pola sebaran umum.
    • Perlu interpretasi hati-hati karena tampilan tumpang tindih bisa membingungkan.

3.8.4 Interpretasi:

Ridgeline Plot memperlihatkan bagaimana harga tiap tipe sepatu Ventela tersebar — mulai dari tipe dengan harga rendah hingga yang premium. Dari grafik ini dapat dilihat bahwa sebagian besar harga berada di rentang menengah, sementara beberapa tipe memiliki sebaran harga yang lebih lebar, menunjukkan variasi model atau kualitas yang berbeda.

3.9 Ridgeline Plot - Price distribution by shoe type}

library(ggplot2)
library(ggridges)
library(dplyr)

# Buat data untuk label: ambil harga tertinggi tiap tipe (di sini satu harga per tipe)
labels <- shoes %>%
  select(Type, Price)

# Ridgeline Plot dengan label harga
ggplot(shoes, aes(x = Price, y = reorder(Type, Price), fill = Type)) +
  geom_density_ridges(
    alpha = 0.8,
    color = "black",
    scale = 2.5,
    rel_min_height = 0.01
  ) +
  geom_text(
    data = labels,
    aes(x = Price, y = reorder(Type, Price), label = paste0("Rp", round(Price, 0), "k")),
    hjust = -0.1,  # sedikit di kanan puncak
    size = 3.5,
    color = "black",
    fontface = "bold"
  ) +
  scale_fill_brewer(palette = "Set2") +
  labs(
    title = "Ridgeline Plot: Price Distribution by Shoe Type",
    x = "Price (Rp in thousands)",
    y = "Shoe Type"
  ) +
  theme_minimal(base_size = 13) +
  theme(
    legend.position = "none",
    plot.title = element_text(face = "bold", hjust = 0.5),
    axis.text.y = element_text(face = "bold")
  )
## Picking joint bandwidth of NaN
## Warning in RColorBrewer::brewer.pal(n, pal): n too large, allowed maximum for palette Set2 is 8
## Returning the palette you asked for with that many colors

3.9.1 kesimpulan:

1. Penjualan berbeda-beda tiap sepatu: Beberapa sepatu, misalnya Public Low All Black Kanvas dan Ethnic High All Black Kanvas, laris banget dibanding sepatu lain. Ada juga yang sepi peminat, seperti Evo Low Black Natural atau Victory Low All Black. Jadi jelas ada sepatu favorit konsumen.

2. Harga tidak selalu menentukan laku atau tidaknya sepatu: Dari scatter plot terlihat beberapa sepatu mahal tetap laku, dan ada yang murah tapi tidak banyak terjual. Jadi faktor selain harga, seperti model atau popularitas, ikut menentukan.

3. Sebaran harga tiap tipe sepatu berbeda-beda: Sebagian besar sepatu berada di harga menengah, tapi ada tipe premium dan tipe murah. Beberapa tipe punya harga yang bervariasi, kemungkinan karena ada beberapa model atau kualitas dalam satu tipe.

4. Ada sepatu yang mendominasi penjualan: Pie chart menunjukkan kalau sebagian kecil tipe sepatu menyumbang penjualan paling banyak. Artinya, ada produk andalan yang benar-benar jadi favorit pasar.

5. Kesimpulan sederhana: Kalau ingin jualan lebih sukses, fokus pada tipe sepatu yang laris dan populer. Untuk yang kurang laku, bisa dipertimbangkan strategi harga, promosi, atau model baru supaya lebih menarik bagi konsumen.

LS0tDQp0aXRsZTogIlZpc3VhbGlzYXNpIERhdGEiICAgICAgICMgTWFpbiB0aXRsZSBvZiB0aGUgZG9jdW1lbnQNCnN1YnRpdGxlOiAiRXhlcmNpc2VzIH4gV2VlayAzIiAgIyBTdWJ0aXRsZSBvciB0b3BpYyBmb3Igd2VlayAyDQphdXRob3I6IA0KLSAiTXVoYW1tYWQgTmFiaWwgS2hhaXJpbCBBbmFtIE5JTTo1MjI1MDA2NiINCi0gIkNhcm9sIER1cGlubyBwZXJlaXJhIE5JTTo1MjI1MDA1MSINCi0gIklnbmFzaXVzIFJhYmkgQmxvbG9uZyBOSU06NTIyNTAwNzMiDQotICJSYWloYW5pYSBTeWFoIFB1dHJpIE5JTTo1MjI1MDA1NCINCi0gIkRhbWVyaWEgQWRlbGluYSBNaW5pIFNpbWFybWF0YSBOSU06NTIyNTAwNzEiDQogICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICMgUmVwbGFjZSB3aXRoIHlvdXIgZnVsbCBuYW1lDQpkYXRlOiAgImByIGZvcm1hdChTeXMuRGF0ZSgpLCAnJUIgJWQsICVZJylgIiAjIEF1dG8gZGlzcGxheXMgdGhlIGN1cnJlbnQgZGF0ZQ0Kb3V0cHV0OiAgICAgICAgICAgICAgICAgICAgICAgICAjIE91dHB1dCBzZWN0aW9uIGRlZmluZXMgdGhlIGZvcm1hdCBhbmQgbGF5b3V0IA0KICBybWRmb3JtYXRzOjpyZWFkdGhlZG93bjogICAgICAjIGh0dHBzOi8vZ2l0aHViLmNvbS9qdWJhL3JtZGZvcm1hdHMNCiAgICBzZWxmX2NvbnRhaW5lZDogdHJ1ZSAgICAgICAgIyBFbWJlZHMgYWxsIHJlc291cmNlcyAoQ1NTLCBKUywgaW1hZ2VzKSANCiAgICB0aHVtYm5haWxzOiB0cnVlICAgICAgICAgICAgIyBEaXNwbGF5cyBpbWFnZSB0aHVtYm5haWxzIGluIHRoZSBkb2MNCiAgICBsaWdodGJveDogdHJ1ZSAgICAgICAgICAgICAgIyBFbmFibGVzIGNsaWNrIHRvIGVubGFyZ2UgaW1hZ2VzDQogICAgZ2FsbGVyeTogdHJ1ZSAgICAgICAgICAgICAgICMgR3JvdXBzIGltYWdlcyBpbnRvIGFuIGludGVyYWN0aXZlIGdhbGxlcnkNCiAgICBudW1iZXJfc2VjdGlvbnM6IHRydWUgICAgICAgIyBBdXRvbWF0aWNhbGx5IG51bWJlcnMgYWxsIHNlY3Rpb25zDQogICAgbGliX2RpcjogbGlicyAgICAgICAgICAgICAgICMgRGlyZWN0b3J5IHdoZXJlIEphdmFTY3JpcHQvQ1NTIGxpYnJhcmllcw0KICAgIGRmX3ByaW50OiAicGFnZWQiICAgICAgICAgICAjIERpc3BsYXlzIGRhdGEgZnJhbWVzIGFzIGludGVyYWN0aXZlIHBhZ2VkIA0KICAgIGNvZGVfZm9sZGluZzogInNob3ciICAgICAgICAjIEFsbG93cyBmb2xkaW5nL3VuZm9sZGluZyBSIGNvZGUgYmxvY2tzIA0KICAgIGNvZGVfZG93bmxvYWQ6IHllcyAgICAgICAgICAjIEFkZHMgYSBidXR0b24gdG8gZG93bmxvYWQgYWxsIFIgY29kZQ0KLS0tDQoNCg0KPGltZyBzcmM9ImtlbG9tcG9rXzQuanBnIiBhbHQ9IkxvZ28iIGlkPSJGb3RvIiBzdHlsZT0id2lkdGg6MjAwcHg7IGRpc3BsYXk6IGJsb2NrOyBtYXJnaW46IGF1dG87Ii8+DQoNCi0tLS0tLS0tLS0tLS0tLS0tLS0tLS0tLS0tLS0tLS0tLS0tLS0tLS0tLS0tLS0tLS0tLS0tLS0tLS0tLS0tLS0tLS0tLS0tLQ0KDQojIyBQZW5kYWh1bHVhbg0KDQpUdWp1YW4gZGFyaSBkYXRhIGRhdGEgaW5pIGFkYWxhaCB1bnR1ayBtZW1iZXJpa2FuIHBlbWFoYW1hbiBzZWNhcmEgbWVueWVsdXJ1aCB0ZW50YW5nIHBlcmZvcm1hIHByb2R1ayBkYXJpIGJlcmJhZ2FpIGplbmlzIHRpcGUgc2VwYXR1IHZlbnRlbGEgYmVyZGFzYXJrYW4gcmF0aW5nLCBqdW1sYWggcGVuanVhbGFuLCBkYW4gaGFyZ2EuIERhcmkgYmVyYmFnYWkgbWFjYW0gdmlzdWFsaXNhc2kga2l0YSBkYXBhdCBtZWxpaGF0IHBlcmJhbmRpbmdhbiB0aW5na2F0IHBlbmp1YWxhbiBkaXNldGlhcCB0aXBlIHByb2R1aywgc2VydGEga2lzYXJhbiBoYXJnYSB5YW5nIGRpdGVudHVrYW4sIHNhbXBhaSBwb2xhIGh1YnVuZ2FuIHBlbmp1YWxhbiBhbnRhcmEgaGFyZ2EgZGFuIG1pbmF0IHBlbWJlbGkuIEhhc2lsIGRhcmkgdmlzdWFsaXNhc2kgbWVtYmFudHUga2l0YSBtZW5naWRlbnRpZmlrYXNpIHByb2R1ayB5YW5nIHBhbGluZyBkaW1pbmF0aSBrb25zdW1lbiwgcGVuZ2FydWhueWEgdGVyaGFkYXAgdGluZ2thdCBwZW5qdWFsYW4sIHNlcnRhIHRlcmRhcGF0IGdhbWJhcmFuIGtvbmRpc2kgcGFzYXIgc2VjYXJhIGtlc2VsdXJ1aGFuLg0KDQojIyBQZXJzaWFwYW4gRGF0YQ0KDQpgYGB7cn0gDQojIExvYWQgcGFja2FnZQ0KbGlicmFyeShnZ3Bsb3QyKQ0KIyAxLiBDcmVhdGUgYSBTaG9lIFNhbGVzIFRhYmxlDQpsaWJyYXJ5KGtuaXRyKQ0Kc2hvZXMgPC0gZGF0YS5mcmFtZSgNCiAgVHlwZSA9IGMoDQogICAgIkNoYW1waW9uIExvdyBCbGFjayBOYXR1cmFsIiwgIlB1YmxpYyBMb3cgQWxsIEJsYWNrIEthbnZhcyIsDQogICAgIlZpY3RvcnkgTG93IEFsbCBCbGFjayIsICJSZWJvcm4gTG93IFJlZmxlY3RpdmUgV2hpdGUiLA0KICAgICJPbHltcGljIExvdyBCbGFjayBXaGl0ZSIsICJBbHBoYSBMb3cgQ3JlYW0iLA0KICAgICJFdGhuaWMgSGlnaCBBbGwgQmxhY2sgS2FudmFzIiwgIkV2byBMb3cgQmxhY2sgTmF0dXJhbCIsDQogICAgIlYyMyBMb3cgQmxhY2sgQnJvd24iLCAiUnViaWNrIEZhdCBMb3cgQmxhY2sgV2hpdGUiDQogICksDQogIFJhdGluZyA9IGMoNC45LCA0LjksIDQuNiwgNC44LCA1LjAsIDQuOSwgNC45LCA1LjAsIDQuNywgNC44KSwNCiAgU29sZCA9IGMoNTcsIDk4MCwgNDYsIDY5NywgNjIsIDU3MiwgODQwLCAyOSwgNDYsIDgwKSwNCiAgUHJpY2UgPSBjKDI3Ni4xMDQsIDIyOS4yODAsIDI0OC45NDAsIDMwMi45NDAsIDMwMi45NDAsIDE2Ny42ODAsIDE4NS4yODAsIDE5MC40NDAsIDI3NS45NDAsIDI4NC45NDApKQ0KDQprbml0cjo6a2FibGUoc2hvZXMsIGNhcHRpb24gPSAidGFibGU6dmVudGVsYSBzaG9lIHNhbGVzIikNCmBgYA0KDQotLS0tLS0tLS0tLS0tLS0tLS0tLS0tLS0tLS0tLS0tLS0tLS0tLS0tLS0tLS0tLS0tLS0tLS0tLS0tLS0tLS0tLS0tLS0tLS0tLS0NCg0KIyMgVklzdWFsaXNhc2kNCg0KIyMjIEJhciBDaGFydA0KDQojIyMjIERlZmluaXNpDQoNCkRlZmluaXNpOg0KQmFyIENoYXJ0IGFkYWxhaCBncmFmaWsgYmVyYmVudHVrIGJhdGFuZyB5YW5nIGRpZ3VuYWthbiB1bnR1ayBtZW5hbXBpbGthbiBkYXRhIGRhbGFtIGthdGVnb3JpIHRlcnRlbnR1LiBTZXRpYXAgYmF0YW5nIG1ld2FraWxpIHNhdHUga2F0ZWdvcmksIGRhbiB0aW5nZ2kgYXRhdSBwYW5qYW5nIGJhdGFuZyBtZW51bmp1a2thbiBiZXNhcm55YSBuaWxhaSBwYWRhIGthdGVnb3JpIHRlcnNlYnV0LiBHcmFmaWsgaW5pIGJlcmd1bmEgdW50dWsgbWVtYmFuZGluZ2thbiBuaWxhaSBhbnRhciBrZWxvbXBvayBzZWNhcmEgY2VwYXQgZGFuIHZpc3VhbC4NCg0KIyMjIyBBdHVyYW4gUGVuZ2d1bmFhbg0KDQoqICoqU3VtYnU6KioNClN1bWJ1IFggKEhvcml6b250YWwpOiBiZXJpc2kga2F0ZWdvcmkgYXRhdSBrZWxvbXBvayAobWlzYWxueWEgamVuaXMgc2VwYXR1KS4NClN1bWJ1IFkgKFZlcnRpa2FsKTogbWVudW5qdWtrYW4gbmlsYWkgYXRhdSBqdW1sYWggKG1pc2FsbnlhIHRvdGFsIHBlbmp1YWxhbikuDQoNCiogKipTa2FsYToqKiBQYXN0aWthbiBza2FsYSBwYWRhIHN1bWJ1IFkgZGltdWxhaSBkYXJpIG5vbCB1bnR1ayBtZW5naGluZGFyaSBkaXN0b3JzaSB2aXN1YWwgeWFuZyBzYWxhaC4NCg0KKiAqKkxlYmFyIEJhdGFuZzoqKiBzZW11YSBiYXRhbmcgaGFydXMgbWVtaWxpa2kgdWt1cmFuIGRhbiBqYXJhayB5YW5nIGtvbnNpc3RlbiBhZ2FyIG11ZGFoIGRpYmFjYS4NCg0KKiAqKkphcmFrIEFudGFyIEJhdGFuZzoqKiBKYXJhayBhbnRhciBiYXRhbmcgc2ViYWlrbnlhIGtvbnNpc3RlbiB1bnR1ayBtZW5qYWdhIGtlamVsYXNhbiB2aXN1YWwuDQoNCiogKipMYWJlbDoqKiB0YW1iYWhrYW4gbGFiZWwgamVsYXMgcGFkYSBzZXRpYXAgYmF0YW5nIGFnYXIgcGVtYmFjYSB0YWh1IGthdGVnb3JpIHlhbmcgZGl0YW1waWxrYW4uDQoNCiMjIyMgS2VsZWJpaGFuIGRhbiBLZWt1cmFuZ2FuDQoNCiogKipLZWxlYmloYW46KiogDQogICogTXVkYWggZGliYWNhIGRhbiBkaXBhaGFtaSBvbGVoIHNlbXVhIG9yYW5nLg0KICAqIEVmZWt0aWYgdW50dWsgbWVtYmFuZGluZ2thbiBwZXJiZWRhYW4gYW50YXIga2F0ZWdvcmkuDQogICogRGFwYXQgbWVuYW1waWxrYW4gcGVyYmVkYWFuIGJlc2FyIGF0YXUga2VjaWwgYW50YXIgbmlsYWkgc2VjYXJhIGplbGFzLg0KICAqIENvY29rIHVudHVrIGJlcmJhZ2FpIGplbmlzIGRhdGEga2F0ZWdvcmlrYWwgKHNlcGVydGkgcHJvZHVrLCB0aXBlLCB3aWxheWFoLCBkbGwpLg0KDQoqICoqS2VrdXJhbmdhbjoqKiANCiAgKiBLdXJhbmcgY29jb2sgamlrYSBqdW1sYWgga2F0ZWdvcmkgdGVybGFsdSBiYW55YWsga2FyZW5hIGJpc2EgbWVtYnVhdCBncmFmaWsgdGFtcGFrIHBlbnVoIGRhbiBzdWxpdCBkaWJhY2EuDQogICogVGlkYWsgaWRlYWwgdW50dWsgbWVudW5qdWtrYW4gcGVydWJhaGFuIGRhcmkgd2FrdHUga2Ugd2FrdHUgKGxlYmloIGNvY29rIHBha2FpIExpbmUgQ2hhcnQpLg0KICAqIEJpc2EgbWVtYmVyaWthbiBrZXNhbiB2aXN1YWwgeWFuZyBzYWxhaCBrYWxhdSBza2FsYSBzdW1idSB0aWRhayBkaW11bGFpIGRhcmkgbm9sLg0KICAqIEtldGVyYmF0YXNhbiBrYXRlZ29yaSBzZWhpbmdnYSB0aWRhayBjb2NvayB1bnR1ayBtZW5hbXBpbGthbiBkYXRhIHlhbmcgbWVtdWF0IGthdGVnb3JpIHNhbmdhdCBiYW55YWsga2FyZW5hIGJpc2EgbWVtYnVhdCBkaWFncmFtIHRlcmxhbHUgcmFtYWkgZGFuIHN1bGl0IGRpYmFjYQ0KICANCiAgDQpgYGB7ciBCYXIgQ2hhcnQgLSBTYWxlcyBDb21wYXJpc29ufQ0KDQojIEJhciBDaGFydCAtIEVuaGFuY2VkIFNhbGVzIENvbXBhcmlzb24NCg0KbGlicmFyeShnZ3Bsb3QyKQ0KZ2dwbG90KHNob2VzLCBhZXMoeCA9IFR5cGUsIHkgPSBTb2xkLCBmaWxsID0gVHlwZSkpICsNCiAgZ2VvbV9iYXIoc3RhdCA9ICJpZGVudGl0eSIsIGNvbG9yID0gImJsYWNrIikgKw0KICBnZW9tX3BvaW50KGFlcyh5ID0gU29sZCksIGNvbG9yID0gInJlZCIsIHNpemUgPSAzKSArDQogIGdlb21fdGV4dChhZXMobGFiZWwgPSBTb2xkKSwgdmp1c3QgPSAtMC41LCBzaXplID0gNCkgKw0KICBsYWJzKHRpdGxlID0gIlNhbGVzIENvbXBhcmlzb24iLCB4ID0gIlNob2UgVHlwZSIsIHkgPSAiVW5pdHMgU29sZCIpICsNCiAgdGhlbWVfbWluaW1hbChiYXNlX3NpemUgPSAxMykgKw0KICB0aGVtZShheGlzLnRleHQueCA9IGVsZW1lbnRfdGV4dChhbmdsZSA9IDQ1LCBoanVzdCA9IDEpLA0KICAgICAgICBsZWdlbmQucG9zaXRpb24gPSAibm9uZSIsDQogICAgICAgIHBsb3QudGl0bGUgPSBlbGVtZW50X3RleHQoZmFjZSA9ICJib2xkIiwgaGp1c3QgPSAwLjUpKSArDQogIHNjYWxlX2ZpbGxfYnJld2VyKHBhbGV0dGUgPSAiU2V0MyIpDQoNCmBgYA0KDQoqICoqa2VndW5hYW4ga29kZToqKg0KICAqIGdncGxvdCguLi4pIOKGkiBidWF0IGthbnZhcyBncmFmaWsgZGFyaSBkYXRhIHNob2VzLCBkZW5nYW4gc3VtYnUgWCA9IHRpcGUgc2VwYXR1IGRhbiBZID0ganVtbGFoIHRlcmp1YWwuDQogICogZ2VvbV9iYXIoc3RhdD0iaWRlbnRpdHkiKSDihpIgbWVuZ2dhbWJhciBiYXRhbmcgc2VzdWFpIG5pbGFpIFNvbGQuDQogICogZ2VvbV9wb2ludCgpIOKGkiBrYXNpaCB0aXRpayBtZXJhaCBkaSBwdW5jYWsgYmF0YW5nIGJpYXIgamVsYXMgdGluZ2dpIG5pbGFpbnlhLg0KICAqIGdlb21fdGV4dCgpIOKGkiBtZW5hbXBpbGthbiBhbmdrYSBqdW1sYWggcGVuanVhbGFuIGRpIGF0YXMgdGlhcCBiYXRhbmcuDQogICogbGFicygpIOKGkiBtZW5hbWJhaCBqdWR1bCBkYW4gbGFiZWwgc3VtYnUuDQogICogdGhlbWVfbWluaW1hbCgpICYgdGhlbWUoKSDihpIgYmlraW4gdGFtcGlsYW4gYmVyc2loLCBtZW1pcmluZ2thbiB0ZWtzIHN1bWJ1IFgsIGRhbiBtZW5lbmdhaGthbiBqdWR1bC4NCiAgKiBzY2FsZV9maWxsX2JyZXdlcigpIOKGkiBwYWthaSB3YXJuYSBsZW1idXQgYmVyYmVkYSB1bnR1ayB0aWFwIHRpcGUgc2VwYXR1Lg0KDQotLS0tLS0tLS0tLS0tLS0tLS0tLS0tLS0tLS0tLS0tLS0tLS0tLS0tLS0tLS0tLS0tLS0tLS0tLS0tLS0tLS0tLS0tLS0tLS0tLS0NCg0KIyMjIEhpc3RvZ3JhbSAtIFByaWNlIERpc3RyaWJ1dGlvbg0KDQojIyMjIERlZmluaXNpDQoNCkhpc3RvZ3JhbSBhZGFsYWggZ3JhZmlrIGJhdGFuZyB5YW5nIG1lbmFtcGlsa2FuIGRpc3RyaWJ1c2kgZnJla3VlbnNpIGRhcmkgZGF0YSBudW1lcmlrLiBEYXRhIGRpYmFnaSBrZSBkYWxhbSBiZWJlcmFwYSBpbnRlcnZhbCAoYmluKSwgZGFuIHRpbmdnaSBiYXRhbmcgbWVudW5qdWtrYW4gYmVyYXBhIGJhbnlhayBkYXRhIHlhbmcgYmVyYWRhIGRpIHNldGlhcCBpbnRlcnZhbC4gR3JhZmlrIGluaSBiZXJndW5hIHVudHVrIG1lbGloYXQgcG9sYSBzZWJhcmFuIGRhdGEg4oCUIHNlcGVydGkgYXBha2FoIGRhdGEgY2VuZGVydW5nIG1lcmF0YSwgbWlyaW5nLCBhdGF1IG1lbWlsaWtpIG5pbGFpIGVrc3RyZW0uDQoNCiMjIyMgQXR1cmFuIFBlbmdndW5hYW4gDQoNCiogKipTdW1idToqKg0KICAqIFN1bWJ1IFg6IG1lbmFtcGlsa2FuIHJlbnRhbmcgbmlsYWkgKG1pc2FsbnlhIGhhcmdhKS4NCiAgKiBTdW1idSBZOiBtZW51bmp1a2thbiBqdW1sYWggZGF0YSBkYWxhbSB0aWFwIHJlbnRhbmcuDQogIA0KKiAqKkJpbjoqKg0KICAqICoqTGViYXIgQmluIGRhbiBqdW1sYWhueWEgOioqIHNlbXVhIGJpbiBoYXJ1cyBtZW1pbGlraSBsZWJhciBzYW1hLiBUZXJsYWx1IHNlZGlraXQgYmluIGJpc2EgbWVueWVtYnVueWlrYW4gZGV0YWlsLCBzZWRhbmdrYW4gdGVybGFsdSBiYW55YWsgYmlzYSBtZW1idWF0IGdyYWZpayB0YW1wYWsgYmVyaXNpay4NCiogKipMYWJlbCBkYW4gSnVkdWw6Kiogc2V0aWFwIHN1bWJ1IGRhbiBncmFmaWsgaGFydXMgZGliZXJpIGtldGVyYW5nYW4geWFuZyBqZWxhcy4NCiogKipUaWRhayBBZGEgSmFyYWsgQW50YXIgQmF0YW5nOioqIHRpZGFrIGJvbGVoIGFkYSBqYXJhayBhbnRhciBiYXRhbmcga2FyZW5hIGRhdGEgYmVyc2lmYXQga29udGludS4NCg0KIyMjIyBLZWxlYmloYW4gZGFuIEtla3VyYW5nYW4NCg0KKiAqKktlbGViaWhhbjoqKiANCiAgKiBFZmVrdGlmIHVudHVrIG1lbGloYXQgc2ViYXJhbiBkYW4gcG9sYSBkYXRhIG51bWVyaWsuDQogICogRGFwYXQgbWVudW5qdWtrYW4gcHVzYXQgZGF0YSwgdmFyaWFzaSwgZGFuIGJlbnR1ayBkaXN0cmlidXNpLg0KICAqIE1lbWJhbnR1IG1lbmRldGVrc2kgb3V0bGllciBhdGF1IG5pbGFpIHlhbmcgdGlkYWsgYmlhc2EuDQoNCiogKipLZWt1cmFuZ2FuOioqIA0KICAqIERldGFpbCBkYXRhIGluZGl2aWR1IGhpbGFuZyBrYXJlbmEgZGlrZWxvbXBva2thbiBrZSBkYWxhbSBiaW4uDQogICogSGFzaWwgYmlzYSBiZXJiZWRhIHRlcmdhbnR1bmcgcGFkYSBqdW1sYWggZGFuIGxlYmFyIGJpbi4NCiAgKiBIYW55YSBjb2NvayB1bnR1ayBkYXRhIG51bWVyaWssIGJ1a2FuIGthdGVnb3JpLg0KDQpgYGB7ciBIaXN0b2dyYW0gLSBQcmljZSBEaXN0cmlidXRpb259DQpnZ3Bsb3Qoc2hvZXMsIGFlcyh4ID0gUHJpY2UpKSArDQogIGdlb21faGlzdG9ncmFtKGJpbnMgPSA2LCBmaWxsID0gInNreWJsdWUiLCBjb2xvciA9ICJibGFjayIsIGFscGhhID0gMC45KSArDQogIGdlb21fdmxpbmUoYWVzKHhpbnRlcmNlcHQgPSBtZWFuKFByaWNlKSksIGNvbG9yID0gInJlZCIsIGxpbmV0eXBlID0gImRhc2hlZCIpICsNCiAgYW5ub3RhdGUoInRleHQiLCB4ID0gbWVhbihzaG9lcyRQcmljZSkgKyAzLCB5ID0gMi41LA0KICAgICAgICAgICBsYWJlbCA9IHBhc3RlMCgiQXZnOiBScCIsIHJvdW5kKG1lYW4oc2hvZXMkUHJpY2UpLCAwKSwgImsiKSwNCiAgICAgICAgICAgY29sb3IgPSAicmVkIiwgc2l6ZSA9IDQsIGhqdXN0ID0gMCkgKw0KICBzY2FsZV94X2NvbnRpbnVvdXMoYnJlYWtzID0gc2VxKDE1NSwgMzMwLCBieSA9IDI1KSwNCiAgICAgICAgICAgICAgICAgICAgIGxhYmVscyA9IHNjYWxlczo6bGFiZWxfbnVtYmVyKHN1ZmZpeCA9ICJrIiwgYWNjdXJhY3kgPSAxKSkgKw0KICBsYWJzKHRpdGxlID0gIlByaWNlIERpc3RyaWJ1dGlvbiBvZiBWZW50ZWxhIFNob2VzIiwNCiAgICAgICB4ID0gIlByaWNlIChpbiB0aG91c2FuZCBSdXBpYWgpIiwgeSA9ICJOdW1iZXIgb2YgU2hvZSBUeXBlcyIpICsNCiAgdGhlbWVfbWluaW1hbChiYXNlX3NpemUgPSAxMykNCg0KYGBgDQoNCiogKiprZWd1bmFhbiBrb2RlOioqDQogICogZ2VvbV9oaXN0b2dyYW0oKSDihpIgYmlraW4gYmF0YW5nIHNlYmFyYW4gaGFyZ2EuDQogICogZ2VvbV92bGluZSgpIOKGkiBnYXJpcyBtZXJhaCBudW5qdWtpbiByYXRhLXJhdGEgaGFyZ2EuDQogICogYmlucyA9IDYg4oaSIGhhcmdhIGRpYmFnaSBqYWRpIDYga2Vsb21wb2sgKHJlbnRhbmcgaGFyZ2EpLg0KICAqIGZpbGwgPSAic2t5Ymx1ZSIg4oaSIGJhdGFuZyBiZXJ3YXJuYSBiaXJ1IG11ZGEuDQogICogY29sb3IgPSAiYmxhY2siIOKGkiBnYXJpcyB0ZXBpIGJhdGFuZyB3YXJuYSBoaXRhbS4NCiAgKiBhbHBoYSA9IDAuOSDihpIgdHJhbnNwYXJhbnNpIHNlZGlraXQgYmlhciB3YXJuYW55YSBsZW1idXQuDQogDQotLS0tLS0tLS0tLS0tLS0tLS0tLS0tLS0tLS0tLS0tLS0tLS0tLS0tLS0tLS0tLS0tLS0tLS0tLS0tLS0tLS0tLS0tLS0tLS0tLS0NCg0KIyMjIEJveHBsb3QgLSBWYXJpb3VzIFNob2UgUHJpY2VzDQoNCiMjIyMgRGVmaW5pc2kNCg0KQm94cGxvdCBhZGFsYWggZ3JhZmlrIHlhbmcgbWVuYW1waWxrYW4gc2ViYXJhbiBkYXRhIG51bWVyaWsgbWVsYWx1aSBrdWFydGlsIGRhbiBtZW5kZXRla3NpIGFkYW55YSBvdXRsaWVyIChuaWxhaSBla3N0cmVtKS4gR3JhZmlrIGluaSBtZW1iYW50dSBtZW1haGFtaSBwdXNhdCBkYXRhIChtZWRpYW4pLCBzZWJhcmFuIChJUVIpLCBzZXJ0YSBhcGFrYWggZGF0YSBjb25kb25nIGtlIHNhdHUgc2lzaSAoc2tld25lc3MpLg0KDQojIyMjIEF0dXJhbiBQZW5nZ3VuYWFuIA0KDQoqICoqU3VtYnU6KioNCiAgKiBTdW1idSB2ZXJ0aWthbCBtZW5hbXBpbGthbiByZW50YW5nIG5pbGFpIChtaXNhbG55YSBoYXJnYSkNCiAgKiBzdW1idSBob3Jpem9udGFsIG1lbnVuanVra2FuIGthdGVnb3JpIGF0YXUga2Vsb21wb2sgZGF0YS4NCiAgDQoqICoqS290YWsgKEJveCk6KioNCiAgKiBUZXBpIGJhd2FoIGtvdGFrIG1lbnVuanVra2FuIGt1YXJ0aWwgcGVydGFtYSAoUTEpLCB5YWl0dSAyNSUgZGF0YSBiZXJhZGEgZGkgYmF3YWggbmlsYWkgaW5pDQogICogVGVwaSBhdGFzIGtvdGFrIG1lbnVuanVra2FuIGt1YXJ0aWwga2V0aWdhIChRMiksIHlhaXR1IDc1JSBkYXRhIGJlcmFkYSBkaSBiYXdhaCBuaWxhaSBpbmkNCiAgKiBQYW5qYW5nIGtvdGFrIChRMy1RMSkgZGlzZWJ1dCBpbnRlcnF1YXJ0aWxlIHJhbmdlIChJUVIpLCB5YW5nIG1lbnVuanVra2FuIHNlYmFyYW4gNTAlIGRhdGEgdGVuZ2FoDQogIA0KKiAqKk1lZGlhbjoqKiANCiAgKiBHYXJpcyBob3Jpem9udGFsIGRpIGRhbGFtIGtvdGFrIG1lbnVuanVra2FuIG1lZGlhbiAoUTIpLCB5YWl0dSBuaWxhaSB0ZW5nYWggZGF0YQ0KICANCiogKipLdW1pcyAoV2hpc2tlcnMpOioqDQogICogTWVudW5qdWtrYW4gbmlsYWkgbWluaW11bSBkYW4gbWFrc2ltdW0geWFuZyBtYXNpaCBkYWxhbSBqYW5na2F1YW4gd2FqYXIgKGJ1a2FuIG91dGxpZXIpLg0KICANCiMjIyMgS2VsZWJpaGFuIGRhbiBLZWt1cmFuZ2FuDQoNCiogKipLZWxlYmloYW46KioNCiAgKiBNdWRhaCBtZW51bmp1a2thbiBzZWJhcmFuLCBtZWRpYW4sIGRhbiBvdXRsaWVyIHNlY2FyYSB2aXN1YWwuDQogICogTWVtdWRhaGthbiBwZXJiYW5kaW5nYW4gYW50YXIga2Vsb21wb2sgZGF0YS4NCiAgKiBUaWRhayBwZXJsdSBhc3Vtc2kgYmVudHVrIGRpc3RyaWJ1c2kgdGVydGVudHUuDQogIA0KKiAqKktla3VyYW5nYW46KioNCiAgKiBNZW55ZWRlcmhhbmFrYW4gZGF0YSwgamFkaSBkZXRhaWwgc2VwZXJ0aSByYXRhLXJhdGEgYXRhdSBqdW1sYWggZGF0YSB0aWRhayB0ZXJsaWhhdC4NCiAgKiBLdXJhbmcgY29jb2sgdW50dWsgZGF0YSBkZW5nYW4gYmFueWFrIHB1bmNhayAobXVsdGltb2RhbCkuDQogICogUGVuZW50dWFuIG91dGxpZXIga2FkYW5nIHN1Ympla3RpZi4NCg0KDQpgYGB7ciBCb3hwbG90IC0gVmFyaW91cyBTaG9lIFByaWNlc30NCiMgQm94cGxvdCAtIFZhcmlvdXMgU2hvZSBQcmljZXMNCmdncGxvdChzaG9lcywgYWVzKHkgPSBQcmljZSkpICsNCiAgZ2VvbV9ib3hwbG90KGZpbGwgPSAibGlnaHRncmVlbiIsIGNvbG9yID0gImJsYWNrIikgKw0KICBsYWJzKHRpdGxlID0gIkJveHBsb3Qgb2YgVmFyaW91cyBTaG9lIFByaWNlcyIsDQogICAgICAgeSA9ICJQcmljZSAoaW4gdGhvdXNhbmRzIElEUikiLA0KICAgICAgIHggPSAiIikgKw0KICB0aGVtZV9taW5pbWFsKCkNCmBgYA0KDQoqICoqa2VndW5hYW4ga29kZToqKg0KICAqIGdncGxvdChzaG9lcywgYWVzKHkgPSBQcmljZSkpIOKGkiBCdWF0IHBsb3QgdmVydGlrYWwgaGFyZ2Egc2VwYXR1Lg0KICAqIGdlb21fYm94cGxvdChmaWxsPSJsaWdodGdyZWVuIiwgY29sb3I9ImJsYWNrIikg4oaSIFRhbXBpbGthbiBib3hwbG90IGhpamF1IGRlbmdhbiBnYXJpcyBoaXRhbS4NCiAgKiBsYWJzKC4uLikg4oaSIFRhbWJhaCBqdWR1bCBkYW4gbGFiZWwgc3VtYnUgWSwgc3VtYnUgWCBkaWtvc29uZ2thbi4NCiAgKiB0aGVtZV9taW5pbWFsKCkg4oaSIFRhbXBpbGFuIHBsb3QgYmVyc2loIGRhbiBzZWRlcmhhbmEuDQoNCi0tLS0tLS0tLS0tLS0tLS0tLS0tLS0tLS0tLS0tLS0tLS0tLS0tLS0tLS0tLS0tLS0tLS0tLS0tLS0tLS0tLS0tLS0tLS0tLS0tLQ0KDQojIyMgUGllIENoYXJ0IC0gU2FsZXMgUGVyY2VudGFnZQ0KDQojIyMjIERlZmluaXNpDQoNClBpZSBDaGFydCAoZGlhZ3JhbSBsaW5na2FyYW4pIGFkYWxhaCByZXByZXNlbnRhc2kgZ3JhZmlzIGRhdGEgZGFsYW0gYmVudHVrIGxpbmdrYXJhbiB5YW5nIGRpYmFnaSBtZW5qYWRpIGJlYmVyYXBhIHNla3Rvci4gU2V0aWFwIHNla3RvciBtZW51bmp1a2thbiBwcm9wb3JzaSBhdGF1IHBlcnNlbnRhc2UgZGFyaSBzZXRpYXAga2F0ZWdvcmkgdGVyaGFkYXAgdG90YWwga2VzZWx1cnVoYW4uIFR1anVhbm55YSB1bnR1ayBtZW1wZXJsaWhhdGthbiBrb250cmlidXNpIHJlbGF0aWYgbWFzaW5nLW1hc2luZyBrYXRlZ29yaSBkYWxhbSBzYXR1IHRhbXBpbGFuIHlhbmcgc2VkZXJoYW5hIGRhbiBtdWRhaCBkaXBhaGFtaS4NCg0KIyMjIyBBdHVyYW4gUGVuZ2d1bmFhbg0KDQoqICoqU2VrdG9yOioqDQogICogU2V0aWFwIHNla3RvciBtZXdha2lsaSBzYXR1IGthdGVnb3JpIGRhdGEsIGRhbiB1a3VyYW5ueWEgc2ViYW5kaW5nIGRlbmdhbiBwZXJzZW50YXNlIGthdGVnb3JpIHRlcnNlYnV0IHRlcmhhZGFwIHRvdGFsLg0KICANCiogKipMYWJlbDoqKg0KICAqIFNldGlhcCBzZWt0b3Igc2ViYWlrbnlhIGRpYmVyaSBsYWJlbCB5YW5nIGplbGFzIGJlcmlzaSBuYW1hIGthdGVnb3JpIHNlcnRhIHBlcnNlbnRhc2UgYXRhdSBwcm9wb3JzaW55YS4NCiAgDQoqICoqSnVtbGFoIEthdGVnb3JpOioqDQogICogSWRlYWwgZGlndW5ha2FuIHVudHVrIGRhdGEgZGVuZ2FuIHNlZGlraXQga2F0ZWdvcmkgKGt1cmFuZyBkYXJpIDfigJM4KSwga2FyZW5hIHRlcmxhbHUgYmFueWFrIHNla3RvciBtZW1idWF0IHZpc3VhbCBzdWxpdCBkaWJhY2EuDQogIA0KKiAqKlRvdGFsIDEwMCU6KioNCiAgKiBKdW1sYWggc2VtdWEgcGVyc2VudGFzZSBkYWxhbSBwaWUgY2hhcnQgaGFydXMgc2FtYSBkZW5nYW4gMTAwJQ0KICANCiogKipVcnV0YW46KioNCiAgKiBTZWt0b3IgYmlhc2FueWEgZGl1cnV0a2FuIGRhcmkgeWFuZyB0ZXJiZXNhciBrZSB0ZXJrZWNpbCBhZ2FyIHBlcmJhbmRpbmdhbiBsZWJpaCBtdWRhaCBkaWxha3VrYW4uDQogIA0KIyMjIyBLZWxlYmloYW4gZGFuIEtla3VyYW5nYW4NCg0KKiAqKktlbGViaWhhbjoqKg0KICAqIE11ZGFoIGRpcGFoYW1pIGRhbiBtZW5hcmlrIHNlY2FyYSB2aXN1YWwuDQogICogRWZla3RpZiB1bnR1ayBtZW51bmp1a2thbiBwcm9wb3JzaSB0aWFwIGthdGVnb3JpIHRlcmhhZGFwIHRvdGFsIGRhdGEuDQogICogTWVtYmVyaWthbiBnYW1iYXJhbiBjZXBhdCBtZW5nZW5haSBrYXRlZ29yaSBkb21pbmFuLg0KICANCiogKipLZWt1cmFuZ2FuOioqDQogICogVGlkYWsgYWt1cmF0IHVudHVrIG1lbWJhbmRpbmdrYW4gc2VrdG9yIHlhbmcgdWt1cmFubnlhIG1pcmlwLg0KICAqIEt1cmFuZyBlZmVrdGlmIGppa2Ega2F0ZWdvcmkgdGVybGFsdSBiYW55YWsuDQogICogVGlkYWsgbWVudW5qdWtrYW4gbmlsYWkgYWJzb2x1dCwgaGFueWEgcGVyc2VudGFzZS4NCiAgKiBTdWxpdCBkaWd1bmFrYW4gamlrYSBpbmdpbiBtZW1iYW5kaW5na2FuIGxlYmloIGRhcmkgc2F0dSBwaWUgY2hhcnQuDQoNCmBgYHtyIFBpZSBDaGFydCAtIFNhbGVzIFBlcmNlbnRhZ2V9DQpsaWJyYXJ5KGdncGxvdDIpDQpsaWJyYXJ5KGRwbHlyKQ0KbGlicmFyeShnZ3JlcGVsKQ0KDQojIFBhbGV0dGUgd2FybmEgbWFudWFsDQpteV9jb2xvcnMgPC0gYygNCiAgIkNoYW1waW9uIExvdyBCbGFjayBOYXR1cmFsIiA9ICJyZWQiLA0KICAiUHVibGljIExvdyBBbGwgQmxhY2sgS2FudmFzIiA9ICJuYXZ5IiwNCiAgIlZpY3RvcnkgTG93IEFsbCBCbGFjayIgPSAiZGFya2dyZWVuIiwNCiAgIlJlYm9ybiBMb3cgUmVmbGVjdGl2ZSBXaGl0ZSIgPSAib3JhbmdlIiwNCiAgIk9seW1waWMgTG93IEJsYWNrIFdoaXRlIiA9ICJwdXJwbGUiLA0KICAiQWxwaGEgTG93IENyZWFtIiA9ICJkYXJrZ3JleSIsDQogICJFdGhuaWMgSGlnaCBBbGwgQmxhY2sgS2FudmFzIiA9ICJicm93biIsDQogICJFdm8gTG93IEJsYWNrIE5hdHVyYWwiID0gIm1hZ2VudGEiLA0KICAiVjIzIExvdyBCbGFjayBCcm93biIgPSAiYmx1ZSIsDQogICJSdWJpY2sgRmF0IExvdyBCbGFjayBXaGl0ZSIgPSAiYmxhY2siDQopDQoNCiMgUGllIGNoYXJ0IA0Kc2hvZXMgJT4lDQogIG11dGF0ZShQZXJjZW50ID0gcm91bmQoU29sZCAvIHN1bShTb2xkKSAqIDEwMCwgMSksDQogICAgICAgICBMYWJlbCA9IHBhc3RlMChQZXJjZW50LCAiJSIpKSAlPiUNCiAgZ2dwbG90KGFlcygiIiwgUGVyY2VudCwgZmlsbCA9IFR5cGUpKSArDQogIGdlb21fYmFyKHN0YXQgPSAiaWRlbnRpdHkiLCBjb2xvciA9ICJ3aGl0ZSIsIHdpZHRoID0gMSkgKw0KICBjb29yZF9wb2xhcih0aGV0YSA9ICJ5IikgKw0KICBnZW9tX3RleHRfcmVwZWwoYWVzKGxhYmVsID0gTGFiZWwsIGNvbG9yID0gVHlwZSksIG51ZGdlX3ggPSAxLCBzZWdtZW50LmNvbG9yID0gTkEsIHNpemUgPSAzLjUsIHNob3cubGVnZW5kID0gRkFMU0UpICsNCiAgc2NhbGVfZmlsbF9tYW51YWwodmFsdWVzID0gbXlfY29sb3JzLA0KICAgICAgICAgICAgICAgICAgICBsYWJlbHMgPSBwYXN0ZTAoc2hvZXMkVHlwZSwgIiAoIiwgcm91bmQoc2hvZXMkU29sZCAvIHN1bShzaG9lcyRTb2xkKSAqIDEwMCwgMSksICIlKSIpKSArDQogIHNjYWxlX2NvbG9yX21hbnVhbCh2YWx1ZXMgPSBteV9jb2xvcnMpICsNCiAgbGFicyh0aXRsZSA9ICJTYWxlcyBQZXJjZW50YWdlIG9mIFZlbnRlbGEgU2hvZXMiLCBmaWxsID0gIlNob2UgVHlwZSIpICsNCiAgdGhlbWVfbWluaW1hbCgpICsNCiAgdGhlbWUocGxvdC50aXRsZSA9IGVsZW1lbnRfdGV4dChmYWNlID0gImJvbGQiLCBoanVzdCA9IDAuNSksDQogICAgICAgIGxlZ2VuZC5wb3NpdGlvbiA9ICJyaWdodCIsDQogICAgICAgIGxlZ2VuZC50aXRsZSA9IGVsZW1lbnRfdGV4dChmYWNlID0gImJvbGQiKSkNCg0KYGBgDQoNCiogKiprZWd1bmFhbiBrb2RlOioqDQogICogZ2VvbV9iYXIoc3RhdD0iaWRlbnRpdHkiKSDihpIgYmF0YW5nIHNlc3VhaSBuaWxhaSBQZXJjZW50Lg0KICAqIGNvb3JkX3BvbGFyKHRoZXRhPSJ5Iikg4oaSIHViYWggYmF0YW5nIG1lbmphZGkgcGllIGNoYXJ0Lg0KICAqIGNvbG9yPSJ3aGl0ZSIg4oaSIGdhcmlzIHRlcGkgdGlhcCBzZWt0b3Igc3VwYXlhIGplbGFzLg0KICAqIGdlb21fdGV4dF9yZXBlbCgpIOKGkiBtZW5jZWdhaCBsYWJlbCB0dW1wYW5nIHRpbmRpaC4NCiAgKiBjb2xvciA9IFR5cGUg4oaSIGxhYmVsIHBha2FpIHdhcm5hIHNla3Rvci4NCiAgKiBzZWdtZW50LmNvbG9yID0gTkEg4oaSIGdhcmlzIHBlbmdodWJ1bmcgdGlkYWsgZGl0YW1waWxrYW4uDQogICogc2NhbGVfZmlsbF9tYW51YWwoKSDihpIgcGFrYWkgd2FybmEgY3VzdG9tIHRpYXAgdGlwZSBzZXBhdHUgKG15X2NvbG9ycykuDQogICogTGVnZW5kIG1lbmFtcGlsa2FuIHRpcGUgc2VwYXR1ICsgcGVyc2VudGFzZS4NCiAgKiBzY2FsZV9jb2xvcl9tYW51YWwoKSDihpIgbGFiZWwgcGVyc2VudGFzZSBwYWthaSB3YXJuYSB5YW5nIHNhbWEgZGVuZ2FuIHNla3Rvci4NCg0KLS0tLS0tLS0tLS0tLS0tLS0tLS0tLS0tLS0tLS0tLS0tLS0tLS0tLS0tLS0tLS0tLS0tLS0tLS0tLS0tLS0tLS0tLS0tLS0tLS0tDQoNCiMjIyBTY2F0dGVyIFBsb3QgLSBQcmljZSB2cyBTYWxlcw0KDQojIyMjIERlZmluaXNpDQoNClNjYXR0ZXIgUGxvdCAoZGlhZ3JhbSBwZW5jYXIpIGFkYWxhaCBncmFmaWsgeWFuZyBkaWd1bmFrYW4gdW50dWsgbWVuYW1waWxrYW4gaHVidW5nYW4gYW50YXJhIGR1YSB2YXJpYWJlbCBudW1lcmlrLiBTZXRpYXAgdGl0aWsgbWV3YWtpbGkgc2F0dSBvYnNlcnZhc2ksIGRlbmdhbiBwb3Npc2kgaG9yaXpvbnRhbCAoc3VtYnUgWCkgbWVudW5qdWtrYW4gbmlsYWkgc2F0dSB2YXJpYWJlbCwgZGFuIHBvc2lzaSB2ZXJ0aWthbCAoc3VtYnUgWSkgbWVudW5qdWtrYW4gbmlsYWkgdmFyaWFiZWwgbGFpbm55YS4gR3JhZmlrIGluaSBtZW1iYW50dSBtZWxpaGF0IGFwYWthaCBkdWEgdmFyaWFiZWwgbWVtaWxpa2kgaHVidW5nYW4gcG9zaXRpZiwgbmVnYXRpZiwgYXRhdSB0aWRhayBhZGEgaHVidW5nYW4gc2FtYSBzZWthbGkNCg0KIyMjIyBBdHVyYW4gUGVuZ2d1bmFhbg0KDQoqKjEuIFRlbnR1a2FuIFZhcmlhYmVsOioqDQogICogUGlsaWggZHVhIHZhcmlhYmVsIG51bWVyaWsgeWFuZyBpbmdpbiBkaWJhbmRpbmdrYW4uDQoqKjIuIEJ1YXQgU3VtYnU6KioNCiAgKiBTdW1idSBYIG1lbnVuanVra2FuIHZhcmlhYmVsIHBlcnRhbWEgKG1pc2FsbnlhIGhhcmdhKSwgZGFuIHN1bWJ1IFkgbWVudW5qdWtrYW4gdmFyaWFiZWwga2VkdWEgKG1pc2FsbnlhIGp1bWxhaCB0ZXJqdWFsKS4NCioqMy4gUGxvdCBEYXRhOioqDQogICogU2V0aWFwIHRpdGlrIHBhZGEgZ3JhZmlrIG1ld2FraWxpIGtvbWJpbmFzaSBuaWxhaSBkYXJpIGR1YSB2YXJpYWJlbCB0ZXJzZWJ1dA0KICANCioqNC4gSW50ZXJwcmV0YXNpOioqDQogICogUGVyaGF0aWthbiBwb2xhIHRpdGlrLXRpdGlrLCBhcGFrYWggbmFpayAoaHVidW5nYW4gcG9zaXRpZiksIHR1cnVuIChuZWdhdGlmKSwgYXRhdSB0ZXJzZWJhciBhY2FrICh0aWRhayBhZGEgaHVidW5nYW4pLiBPdXRsaWVyIGp1Z2EgcGVybHUgZGlwZXJoYXRpa2FuIGthcmVuYSBiaXNhIG1lbXBlbmdhcnVoaSBrZXNpbXB1bGFuLg0KICANCiMjIyMgS2VsZWJpaGFuIGRhbiBLZWt1cmFuZ2FuDQoNCiogKipLZWxlYmloYW46KioNCiAgKiBNZW51bmp1a2thbiBwb2xhIGh1YnVuZ2FuIGFudGFyYSBkdWEgdmFyaWFiZWwgZGVuZ2FuIGplbGFzLg0KICAqIE1lbXVkYWhrYW4gaWRlbnRpZmlrYXNpIGtvcmVsYXNpLCBrbGFzdGVyLCBhdGF1IHRyZW4gdGVydGVudHUuDQogICogRGFwYXQgbWVuZ3VuZ2thcCBvdXRsaWVyIGF0YXUgZGF0YSBla3N0cmVtLg0KICAqIFZpc3VhbCBzZWRlcmhhbmEgZGFuIG11ZGFoIGRpcGFoYW1pLCBiYWhrYW4gYmFnaSBwZW11bGEuDQogIA0KKiAqKktla3VyYW5nYW46KioNCiAgKiBIYW55YSBtZW5hbXBpbGthbiBodWJ1bmdhbiBkdWEgdmFyaWFiZWwgc2VrYWxpZ3VzLg0KICAqIFRpZGFrIGJpc2EgbWVudW5qdWtrYW4gc2ViYWItYWtpYmF0LCBoYW55YSBrb3JlbGFzaS4NCiAgKiBTZW5zaXRpZiB0ZXJoYWRhcCBvdXRsaWVyIHlhbmcgZGFwYXQgbWVueWVzYXRrYW4gaW50ZXJwcmV0YXNpLg0KICAqIEppa2EgZGF0YSB0ZXJsYWx1IHBhZGF0LCB0aXRpayBiaXNhIHNhbGluZyB0dW1wYW5nIHRpbmRpaCBkYW4gc3VsaXQgZGliYWNhLg0KDQpgYGB7ciBTY2F0dGVyIFBsb3QgLSBQcmljZSB2cyBTYWxlc30NCmdncGxvdChzaG9lcywgYWVzKHggPSBQcmljZSwgeSA9IFNvbGQsIGNvbG9yID0gUmF0aW5nLCBzaXplID0gUmF0aW5nKSkgKw0KZ2VvbV9wb2ludChhbHBoYSA9IDAuOCkgKw0KZ2VvbV9zbW9vdGgobWV0aG9kID0gImxtIiwgc2UgPSBGQUxTRSwgY29sb3IgPSAiZGFya2JsdWUiLCBsaW5ldHlwZSA9ICJkYXNoZWQiKSArDQpsYWJzKA0KdGl0bGUgPSAiUHJpY2UgdnMgU2FsZXMgb2YgVmVudGVsYSBTaG9lcyIsDQp4ID0gIlByaWNlIChScCBpbiB0aG91c2FuZHMpIiwNCnkgPSAiVW5pdHMgU29sZCIsDQpjb2xvciA9ICJSYXRpbmciLA0Kc2l6ZSA9ICJSYXRpbmciDQopICsNCnRoZW1lX21pbmltYWwoYmFzZV9zaXplID0gMTMpDQoNCmBgYA0KKiAqKmtlZ3VuYWFuIGtvZGU6KioNCiAgKiBjb2xvcj0id2hpdGUiIOKGkiBnYXJpcyB0ZXBpIHRpYXAgc2VrdG9yIHN1cGF5YSBqZWxhcy4NCiAgKiBnZ3Bsb3Qoc2hvZXMsIGFlcyh4ID0gUHJpY2UsIHkgPSBTb2xkLCBjb2xvciA9IFJhdGluZywgc2l6ZSA9IFJhdGluZykpIOKGkiBCdWF0IGthbnZhcyBzY2F0dGVyIHBsb3QgZGFyaSBkYXRhIHNob2VzLCBzdW1idSBYID0gaGFyZ2EgKFByaWNlKSwgc3VtYnUgWSA9IGp1bWxhaCB0ZXJqdWFsIChTb2xkKS4NCiAgKldhcm5hIGRhbiB1a3VyYW4gdGl0aWsgKGdlb21fcG9pbnQpIGRpdGVudHVrYW4gb2xlaCByYXRpbmcgdGlhcCBzZXBhdHUuDQogICogZ2VvbV9wb2ludChhbHBoYSA9IDAuOCkg4oaSIFRhbWJhaGthbiB0aXRpayBkZW5nYW4gdHJhbnNwYXJhbnNpIDAuOCBzdXBheWEgdGl0aWsgeWFuZyBzYWxpbmcgdHVtcGFuZyB0aW5kaWggdGV0YXAgdGVybGloYXQuDQogICogZ2VvbV9zbW9vdGgobWV0aG9kID0gImxtIiwgc2UgPSBGQUxTRSwgY29sb3IgPSAiZGFya2JsdWUiLCBsaW5ldHlwZSA9ICJkYXNoZWQiKSDihpIgVGFtYmFoa2FuIGdhcmlzIHRyZW4gbGluZWFyIChyZWdyZXNpKSBiZXJ3YXJuYSBiaXJ1IHR1YSBkYW4gcHV0dXMtcHV0dXMuIHNlID0gRkFMU0UgYXJ0aW55YSB0aWRhayBtZW5hbXBpbGthbiBjb25maWRlbmNlIGludGVydmFsLg0KICAqIGxhYnMoLi4uKSDihpIgTWVuYW1iYWhrYW4ganVkdWwgcGxvdCBkYW4gbGFiZWwgc3VtYnUsIHNlcnRhIGxhYmVsIGxlZ2VuZCB1bnR1ayB3YXJuYSBkYW4gdWt1cmFuIHRpdGlrLg0KICAqIHRoZW1lX21pbmltYWwoYmFzZV9zaXplID0gMTMpIOKGkiBNZW1iZXJpa2FuIHRlbWEgYmVyc2loIGRlbmdhbiB1a3VyYW4gZm9udCBkYXNhciAxMyB1bnR1ayB2aXN1YWwgeWFuZyByYXBpLg0KICANCg0KLS0tLS0tLS0tLS0tLS0tLS0tLS0tLS0tLS0tLS0tLS0tLS0tLS0tLS0tLS0tLS0tLS0tLS0tLS0tLS0tLS0tLS0tLS0tLS0tLS0tDQoNCiMjIyBMaW5lIFBsb3QgLSBTYWxlcyBQZXJmb3JtYW5jZQ0KDQojIyMjIERlZmluaXNpDQoNCkxpbmUgUGxvdCBkaWd1bmFrYW4gdW50dWsgbWVuYW1waWxrYW4gcGVydWJhaGFuIG5pbGFpIGFudGFyIGthdGVnb3JpIGF0YXUgZGFyaSB3YWt0dSBrZSB3YWt0dSBtZW5nZ3VuYWthbiBnYXJpcyBwZW5naHVidW5nIGFudGFyIHRpdGlrLiBEYWxhbSBrb250ZWtzIGluaSwgZ3JhZmlrIG1lbnVuanVra2FuIHBlcmZvcm1hIHBlbmp1YWxhbiB0aWFwIHRpcGUgc2VwYXR1IFZlbnRlbGEgYmVyZGFzYXJrYW4ganVtbGFoIHVuaXQgeWFuZyB0ZXJqdWFsLiBTZXRpYXAgdGl0aWsgbWV3YWtpbGkganVtbGFoIHBlbmp1YWxhbiB1bnR1ayBzYXR1IGplbmlzIHNlcGF0dSwgc2VkYW5na2FuIGdhcmlzIG1lbnVuanVra2FuIHBlcmdlcmFrYW4gbmlsYWkgYW50YXIgamVuaXMuDQoNCiMjIyMgQXR1cmFuIFBlbmdndW5hYW4NCg0KKioxLiBCdWF0IFN1bWJ1OioqDQogICogU3VtYnUgWCBtZW51bmp1a2thbiBrYXRlZ29yaSAodGlwZSBzZXBhdHUpLCBzZWRhbmdrYW4gc3VtYnUgWSBtZW51bmp1a2thbiBuaWxhaSBudW1lcmlrIChqdW1sYWggdGVyanVhbCkuDQoqKjIuIEdhcmlzIGRhbiBUaXRpazoqKg0KICAqIEd1bmFrYW4gZ2FyaXMgdW50dWsgbWVuZ2h1YnVuZ2thbiB0aXRpay10aXRpayBkYXRhIGFnYXIgcG9sYSBwZXJ1YmFoYW4gdGVybGloYXQgamVsYXMuDQoqKjMuIFVydXRhbiBEYXRhOioqDQogICogRGF0YSBoYXJ1cyBkaXVydXRrYW4gc2VjYXJhIGxvZ2lzIChtaXNhbG55YSBiZXJkYXNhcmthbiBrYXRlZ29yaSBhdGF1IHdha3R1KSBhZ2FyIHRyZW4gbXVkYWggZGlpa3V0aS4NCioqNC4gVGFtcGlsYW46KioNCiAgKiBUYW1iYWhrYW4gbGFiZWwgZGFuIHNlc3VhaWthbiB0YW1waWxhbiBhZ2FyIHRpdGlrIHNlcnRhIGdhcmlzIG11ZGFoIGRpYmFjYS4NCiAgDQojIyMjIEtlbGViaWhhbiBkYW4gS2VrdXJhbmdhbg0KDQoqICoqS2VsZWJpaGFuOioqDQogICogQ29jb2sgdW50dWsgbWVudW5qdWtrYW4gdHJlbiBhdGF1IHBlcnViYWhhbiBuaWxhaSBhbnRhciBrYXRlZ29yaS4NCiAgKiBNZW1iZXJpa2FuIGdhbWJhcmFuIGNlcGF0IHRlbnRhbmcga2VuYWlrYW4gYXRhdSBwZW51cnVuYW4gcGVyZm9ybWEuDQogICogTXVkYWggZGlwYWhhbWkgZGFuIGVmZWt0aWYgdW50dWsgZGF0YSB1cnV0IGF0YXUgYmVya2VsYW5qdXRhbi4NCiAgDQoqICoqS2VrdXJhbmdhbjoqKg0KICAqIFRpZGFrIGNvY29rIHVudHVrIGRhdGEga2F0ZWdvcmkgYWNhayB0YW5wYSB1cnV0YW4uDQogICogQmlzYSBtZW55ZXNhdGthbiBqaWthIGphcmFrIGFudGFyIGthdGVnb3JpIHRpZGFrIGtvbnNpc3Rlbi4NCiAgKiBTdWxpdCBkaWJhY2EgamlrYSB0ZXJsYWx1IGJhbnlhayB0aXRpayBhdGF1IGdhcmlzIHR1bXBhbmcgdGluZGloLg0KICANCiMjIyMgSW50ZXJwcmV0YXNpOg0KTGluZSBQbG90IG1lbnVuanVra2FuIHRyZW4gcGVuanVhbGFuIGFudGFyIHRpcGUgc2VwYXR1IFZlbnRlbGEuIERhcmkgZ3JhZmlrIGluaSB0ZXJsaWhhdCBtYW5hIHByb2R1ayBkZW5nYW4gcGVyZm9ybWEgdGVydGluZ2dpIGRhbiB0ZXJlbmRhaCwgc2VydGEgcGVydWJhaGFuIHBlbmp1YWxhbiBhbnRhciB0aXBlLiBNaXNhbG55YSwgdGlwZSB0ZXJ0ZW50dSBtZW1pbGlraSBwZW5pbmdrYXRhbiB0YWphbSwgbWVuYW5kYWthbiBwcm9kdWsgdGVyc2VidXQgbGViaWggZGltaW5hdGkgZGliYW5kaW5nIHRpcGUgbGFpbm55YS4NCg0KYGBge3J9DQpnZ3Bsb3Qoc2hvZXMsIGFlcyhUeXBlLCBTb2xkLCBncm91cCA9IDEpKSArDQogIGdlb21fbGluZShjb2xvciA9ICJibHVlIikgKw0KICBnZW9tX3BvaW50KHNpemUgPSAyKSArDQogIGxhYnModGl0bGUgPSAiU2FsZXMgUGVyZm9ybWFuY2UiLCB4ID0gIlNob2UgVHlwZSIsIHkgPSAiVW5pdHMgU29sZCIpICsNCiAgdGhlbWUoYXhpcy50ZXh0LnggPSBlbGVtZW50X3RleHQoYW5nbGUgPSA0NSwgaGp1c3QgPSAxKSkNCg0KYGBgDQoqICoqa2VndW5hYW4ga29kZToqKg0KICAqIGdncGxvdChzaG9lcywgYWVzKFR5cGUsIFNvbGQsIGdyb3VwID0gMSkpIOKGkiBCdWF0IGthbnZhcyBwbG90IGRhcmkgZGF0YSBzaG9lcywgc3VtYnUgWCA9IHRpcGUgc2VwYXR1IChUeXBlKSwgc3VtYnUgWSA9IGp1bWxhaCB0ZXJqdWFsIChTb2xkKS4NCiAgKiBncm91cCA9IDEgbWVtYXN0aWthbiBzZW11YSB0aXRpayBkaWh1YnVuZ2thbiBtZW5qYWRpIHNhdHUgZ2FyaXMuDQogICogZ2VvbV9saW5lKGNvbG9yID0gImJsdWUiKSDihpIgTWVuZ2dhbWJhciBnYXJpcyBiaXJ1IHlhbmcgbWVuZ2h1YnVuZ2thbiB0aXRpay10aXRpayBwZW5qdWFsYW4gdGlhcCB0aXBlIHNlcGF0dSwgbWVudW5qdWtrYW4gdHJlbiBwZW5qdWFsYW4uDQogICogZ2VvbV9wb2ludChzaXplID0gMikg4oaSIE1lbmFtYmFoa2FuIHRpdGlrIGRpIHRpYXAgdGlwZSBzZXBhdHUgdW50dWsgbWVuYW5kYWkganVtbGFoIHBlbmp1YWxhbiwgdWt1cmFuIHRpdGlrID0gMi4NCiAgKiBsYWJzKHRpdGxlID0gIlNhbGVzIFBlcmZvcm1hbmNlIiwgeCA9ICJTaG9lIFR5cGUiLCB5ID0gIlVuaXRzIFNvbGQiKSDihpIgTWVuYW1iYWhrYW4ganVkdWwgcGxvdCBkYW4gbGFiZWwgc3VtYnUgWCAmIFkuDQogICogdGhlbWUoYXhpcy50ZXh0LnggPSBlbGVtZW50X3RleHQoYW5nbGUgPSA0NSwgaGp1c3QgPSAxKSkg4oaSIE1lbWlyaW5na2FuIHRla3Mgc3VtYnUgWCA0NcKwIGFnYXIgbmFtYSB0aXBlIHNlcGF0dSBwYW5qYW5nIHRldGFwIHRlcmJhY2EgcmFwaQ0KdF9yZXBlbCgpIOKGkiBtZW5jZWdhaCBsYWJlbCB0dW1wYW5nIHRpbmRpaC4NCg0KICANCi0tLS0tLS0tLS0tLS0tLS0tLS0tLS0tLS0tLS0tLS0tLS0tLS0tLS0tLS0tLS0tLS0tLS0tLS0tLS0tLS0tLS0tLS0tLS0tLS0tLQ0KDQojIyMgRGVuc2l0eSBQbG90IOKAkyBEaXN0cmlidXNpIEhhcmdhIFNlcGF0dQ0KDQojIyMjIERlZmluaXNpDQoNCkRlbnNpdHkgUGxvdCAoYXRhdSBwbG90IGtlcGFkYXRhbikgYWRhbGFoIGdyYWZpayB5YW5nIG1lbmdnYW1iYXJrYW4gZGlzdHJpYnVzaSBwcm9iYWJpbGl0YXMgZGFyaSBzdWF0dSB2YXJpYWJlbCBudW1lcmlrIGtvbnRpbnUgZGFsYW0gYmVudHVrIGt1cnZhIGhhbHVzLg0KUGxvdCBpbmkgbWVudW5qdWtrYW4gc2ViYXJhbiBkYXRhIGRhbiBrZXBhZGF0YW4gcmVsYXRpZiBkYXJpIG5pbGFpLW5pbGFpIHlhbmcgZGlhbWF0aSwgZGkgbWFuYSBsdWFzIGRpIGJhd2FoIGt1cnZhIGJlcm5pbGFpIDEgKG1lcmVwcmVzZW50YXNpa2FuIHRvdGFsLHByb3BvcnNpLGRhdGEpLg0KDQojIyMjIEF0dXJhbiBQZW5nZ3VuYWFuDQoNCioqMS4gQnVhdCBTdW1idToqKg0KICAqIEJ1YXQgU3VtYnU6IFg6IHZhcmlhYmVsIG51bWVyaWsga29udGludSAobWlzYWw6IFByaWNlKSwgWTogYmlhc2FueWEgdGlkYWsgZGlndW5ha2FuIHNlY2FyYSBla3NwbGlzaXQgKGthcmVuYSBncmFmaWsgc2F0dSBkaW1lbnNpKQ0KKioyLiBBbHBoYSAoVHJhbnNwYXJhbnNpKToqKg0KICAqIE1lbmdhdHVyIHRpbmdrYXQgdHJhbnNwYXJhbnNpIGt1cnZhIGFnYXIgb3ZlcmxhcHBpbmcgdGV0YXAgdGVybGloYXQNCioqMy4gY29sb3I6KioNCiAgKiBNZW5lbnR1a2FuIHdhcm5hIGdhcmlzIHRlcGkga3VydmEgYWdhciBtYXNpbmctbWFzaW5nIGt1cnZhIG11ZGFoIGRpYmVkYWthbg0KKio0LiBUYXRhIExldGFrOioqDQogICogR3VuYWthbiB0ZW1hIGJlcnNpaCBzZXBlcnRpIHRoZW1lX21pbmltYWwoKQ0KKio1LiBKdWR1bCBwbG90OioqDQogICogZGkgdGVuZ2FoIGRhbiB0ZWJhbCBhZ2FyIGplbGFzDQoqKjYuIExlZ2VuZDoqKg0KICAqIHNlc3VhaWthbiBhdGF1IGhhcHVzIGp1ZHVsIGFnYXIgcmFwaQ0KKio3LiBGaWxsIC8gUGVuZ2Vsb21wb2thbjoqKg0KICAqIEd1bmFrYW4gZmlsbCB1bnR1ayBtZW1iZWRha2FuIGthdGVnb3JpIChtaXNhbDogdGlwZSBzZXBhdHUpDQogIA0KIyMjIyBLZWxlYmloYW4gZGFuIEtla3VyYW5nYW4NCg0KKiAqKktlbGViaWhhbjoqKg0KICAqIE1lbnVuanVra2FuIGRpc3RyaWJ1c2kgZGF0YSBzZWNhcmEgaGFsdXMgZGFuIHZpc3VhbC4NCiAgKiBNdWRhaCBtZW1iYW5kaW5na2FuIGJlYmVyYXBhIGtlbG9tcG9rIGF0YXUga2F0ZWdvcmkuDQogICogTWVuZGV0ZWtzaSBwb2xhIHNlcGVydGkgc2tld25lc3MsIHB1bmNhayBnYW5kYSwgYXRhdSBvdXRsaWVyLg0KICAqIEVzdGV0aXMgZGFuIGNvY29rIHVudHVrIHByZXNlbnRhc2kgdmlzdWFsLg0KICANCiogKipLZWt1cmFuZ2FuOioqDQogICogVGlkYWsgbWVuYW1waWxrYW4gbmlsYWkgaW5kaXZpZHUgc2VjYXJhIGRldGFpbC4NCiAgKiBIYXNpbCBiaXNhIGJlcmJlZGEgdGVyZ2FudHVuZyBwZW1pbGloYW4gYmFuZHdpZHRoIC8gc21vb3RoaW5nLg0KICAqIEt1cmFuZyBjb2NvayB1bnR1ayBkYXRhIGthdGVnb3JpOyBoYW55YSB1bnR1ayB2YXJpYWJlbCBudW1lcmlrIGtvbnRpbnUuDQogICogQmlzYSBtZW1iaW5ndW5na2FuIGppa2EgdGVybGFsdSBiYW55YWsga2Vsb21wb2sgc2VrYWxpZ3VzLg0KDQpgYGB7ciBEZW5zaXR5IFBsb3Q6IFByaWNlIERpc3RyaWJ1dGlvbiBieSBTaG9lIFR5cGV9DQpsaWJyYXJ5KGdncGxvdDIpDQojIEVuaGFuY2VkIERlbnNpdHkgUGxvdA0KZ2dwbG90KHNob2VzLCBhZXMoeCA9IFByaWNlLCBmaWxsID0gVHlwZSkpICsNCiAgZ2VvbV9kZW5zaXR5KGFscGhhID0gMC44LCBjb2xvciA9ICJibGFjayIsIHNpemUgPSAwLjcpICsgIA0KICBzY2FsZV9maWxsX2JyZXdlcihwYWxldHRlID0gIkRhcmsyIikgKyAgICAgICAgICAgICAgICAgICANCiAgbGFicygNCiAgICB0aXRsZSA9ICJQcmljZSBEaXN0cmlidXRpb24gb2YgVmVudGVsYSBTaG9lcyBieSBUeXBlIiwNCiAgICB4ID0gIlByaWNlIChScCBpbiB0aG91c2FuZHMpIiwNCiAgICB5ID0gIkRlbnNpdHkiLA0KICAgIGZpbGwgPSAiU2hvZSBUeXBlIg0KICApICsNCiAgZ2VvbV92bGluZShkYXRhID0gc2hvZXMsIGFlcyh4aW50ZXJjZXB0ID0gUHJpY2UsIGNvbG9yID0gVHlwZSksDQogICAgICAgICAgICAgbGluZXR5cGUgPSAiZGFzaGVkIiwgc2l6ZSA9IDAuNCwgYWxwaGEgPSAwLjUsIHNob3cubGVnZW5kID0gRkFMU0UpICsgICMgZ2FyaXMgdmVydGlrYWwgdGlhcCBoYXJnYQ0KICB0aGVtZV9taW5pbWFsKGJhc2Vfc2l6ZSA9IDEzKSArDQogIHRoZW1lKA0KICAgIHBsb3QudGl0bGUgPSBlbGVtZW50X3RleHQoZmFjZSA9ICJib2xkIiwgaGp1c3QgPSAwLjUpLA0KICAgIGxlZ2VuZC5wb3NpdGlvbiA9ICJyaWdodCIsDQogICAgbGVnZW5kLnRpdGxlID0gZWxlbWVudF90ZXh0KGZhY2UgPSAiYm9sZCIpDQogICkNCmBgYA0KDQoqICoqa2VndW5hYW4ga29kZToqKg0KICAqIGdlb21fZGVuc2l0eSgpIOKGkiBidWF0IGt1cnZhIGhhbHVzIHVudHVrIG1lbGloYXQgZGlzdHJpYnVzaSBoYXJnYSB0aWFwIHRpcGUgc2VwYXR1Lg0KICAqIGFscGhhID0gMC42IOKGkiBtZW1idWF0IHdhcm5hIHNlZGlraXQgdHJhbnNwYXJhbiBhZ2FyIG92ZXJsYXBwaW5nIGt1cnZhIHRldGFwIHRlcmxpaGF0Lg0KICAqIHNjYWxlX2ZpbGxfYnJld2VyKCkg4oaSIG1lbWJlcmlrYW4gd2FybmEgYmVyYmVkYSB1bnR1ayB0aWFwIHRpcGUgc2VwYXR1Lg0KICAqIGxhYnMoKSDihpIganVkdWwgZGFuIGxhYmVsIHN1bWJ1IGRhbGFtIGJhaGFzYSBJbmdncmlzIHNlZGVyaGFuYS4NCiAgKiB0aGVtZV9taW5pbWFsKCkgKyB0aGVtZSgpIOKGkiB0YW1waWxhbiBiZXJzaWgsIGp1ZHVsIHRlYmFsIGRhbiBkaSB0ZW5nYWgsIGxlZ2VuZCB0YW5wYSBqdWR1bC4NCg0KICANCiMjIyMgSW50ZXJwcmV0YXNpOg0KRGVuc2l0eSBQbG90IG1lbnVuanVra2FuIGJhaHdhIHNlYmFnaWFuIGJlc2FyIHRpcGUgc2VwYXR1IFZlbnRlbGEgYmVyYWRhIGRpIHJlbnRhbmcgaGFyZ2EgbWVuZW5nYWgsIGRlbmdhbiBiZWJlcmFwYSB0aXBlIG1lbWlsaWtpIHNlYmFyYW4gaGFyZ2EgbGViaWggbGViYXIsIG1lbmFuZGFrYW4gdmFyaWFzaSBtb2RlbCBhdGF1IGt1YWxpdGFzLiBQdW5jYWsga3VydmEgeWFuZyBsZWJpaCB0aW5nZ2kgbWVudW5qdWtrYW4gdGlwZSBkZW5nYW4ga29uc2VudHJhc2kgaGFyZ2EgdGVydGluZ2dpLCBzZWRhbmdrYW4gZWtvciBrdXJ2YSBtZW5hbmRha2FuIGFkYW55YSBoYXJnYSBla3N0cmVtLiBEZW5nYW4gbWVtYmFuZGluZ2thbiBrdXJ2YSB0aWFwIHRpcGUsIGtpdGEgZGFwYXQgbWVsaWhhdCBwZXJiZWRhYW4gcG9sYSBoYXJnYSBhbnRhciBzZXBhdHUgZGFuIG1lbmdpZGVudGlmaWthc2kgcHJvZHVrIHlhbmcgY2VuZGVydW5nIGxlYmloIG1haGFsIGF0YXUgbGViaWggbXVyYWguDQoNCiAgDQotLS0tLS0tLS0tLS0tLS0tLS0tLS0tLS0tLS0tLS0tLS0tLS0tLS0tLS0tLS0tLS0tLS0tLS0tLS0tLS0tLS0tLS0tLS0tLS0tLS0NCg0KDQojIyMgUmlkZ2VsaW5lIFBsb3QgLSBQcmljZSBkaXN0cmlidXRpb24gYnkgc2hvZSB0eXBlDQoNCiMjIyMgRGVmaW5pc2kNCg0KUmlkZ2VsaW5lIFBsb3QgZGlndW5ha2FuIHVudHVrIG1lbmFtcGlsa2FuIGRpc3RyaWJ1c2kgZGF0YSBudW1lcmlrIChzZXBlcnRpIGhhcmdhKSB1bnR1ayBiZWJlcmFwYSBrYXRlZ29yaSBzZWNhcmEgdHVtcGFuZyB0aW5kaWggZGVuZ2FuIGJlbnR1ayBrdXJ2YSBoYWx1cy4gR3JhZmlrIGluaSBtZW5hbXBpbGthbiBiYWdhaW1hbmEgc2ViYXJhbiBoYXJnYSB0aWFwIHRpcGUgc2VwYXR1IFZlbnRlbGEgYmVyYmVkYSBzYXR1IHNhbWEgbGFpbi4NCg0KIyMjIyBBdHVyYW4gUGVuZ2d1bmFhbg0KDQoqKjEuIEJ1YXQgU3VtYnU6KioNCiAgKiBTdW1idSBYIG1lbnVuanVra2FuIG5pbGFpIG51bWVyaWsgKGhhcmdhKSwgc2VkYW5na2FuIHN1bWJ1IFkgbWVudW5qdWtrYW4ga2F0ZWdvcmkgKHRpcGUgc2VwYXR1KS4NCioqMi4gRGlzdHJpYnVzaToqKg0KICAqIFNldGlhcCBrdXJ2YSBtZXdha2lsaSBkaXN0cmlidXNpIGhhcmdhIGRhcmkgc2F0dSB0aXBlIHNlcGF0dS4NCioqMy4gV2FybmEgZGFuIExhYmVsOioqDQogICogR3VuYWthbiB3YXJuYSBiZXJiZWRhIHVudHVrIHRpYXAga2F0ZWdvcmkgYWdhciB2aXN1YWwgbXVkYWggZGliZWRha2FuLg0KKio0LiBUYXRhIExldGFrOioqDQogICogUGFzdGlrYW4ga3VydmEgdGlkYWsgdGVybGFsdSBiYW55YWsgYWdhciB2aXN1YWwgdGV0YXAgamVsYXMgZGFuIGluZm9ybWF0aWYuDQogIA0KIyMjIyBLZWxlYmloYW4gZGFuIEtla3VyYW5nYW4NCg0KKiAqKktlbGViaWhhbjoqKg0KICAqIE1lbWJlcmlrYW4gdmlzdWFsIG1lbmFyaWsgZGFuIGluZm9ybWF0aWYgdW50dWsgbWVtYmFuZGluZ2thbiBkaXN0cmlidXNpIGFudGFyIGtlbG9tcG9rLg0KICAqIEVmZWt0aWYgdW50dWsgbWVudW5qdWtrYW4gdmFyaWFzaSwgcmVudGFuZywgZGFuIHBvbGEgc2ViYXJhbiBkYXRhLg0KICAqIE1lbmFyaWsgc2VjYXJhIGVzdGV0aWthIGRhbiBtdWRhaCBtZW5hcmlrIHBlcmhhdGlhbiBhdWRpZW5zLg0KICANCiogKipLZWt1cmFuZ2FuOioqDQogICogS3VyYW5nIGVmZWt0aWYgamlrYSBqdW1sYWgga2F0ZWdvcmkgdGVybGFsdSBiYW55YWsga2FyZW5hIGt1cnZhIGJpc2Egc2FsaW5nIHR1bXBhbmcgdGluZGloLg0KICAqIFRpZGFrIG1lbnVuanVra2FuIG5pbGFpIHNwZXNpZmlrLCBoYW55YSBwb2xhIHNlYmFyYW4gdW11bS4NCiAgKiBQZXJsdSBpbnRlcnByZXRhc2kgaGF0aS1oYXRpIGthcmVuYSB0YW1waWxhbiB0dW1wYW5nIHRpbmRpaCBiaXNhIG1lbWJpbmd1bmdrYW4uDQogIA0KIyMjIyBJbnRlcnByZXRhc2k6DQpSaWRnZWxpbmUgUGxvdCBtZW1wZXJsaWhhdGthbiBiYWdhaW1hbmEgaGFyZ2EgdGlhcCB0aXBlIHNlcGF0dSBWZW50ZWxhIHRlcnNlYmFyIOKAlCBtdWxhaSBkYXJpIHRpcGUgZGVuZ2FuIGhhcmdhIHJlbmRhaCBoaW5nZ2EgeWFuZyBwcmVtaXVtLiBEYXJpIGdyYWZpayBpbmkgZGFwYXQgZGlsaWhhdCBiYWh3YSBzZWJhZ2lhbiBiZXNhciBoYXJnYSBiZXJhZGEgZGkgcmVudGFuZyBtZW5lbmdhaCwgc2VtZW50YXJhIGJlYmVyYXBhIHRpcGUgbWVtaWxpa2kgc2ViYXJhbiBoYXJnYSB5YW5nIGxlYmloIGxlYmFyLCBtZW51bmp1a2thbiB2YXJpYXNpIG1vZGVsIGF0YXUga3VhbGl0YXMgeWFuZyBiZXJiZWRhLg0KDQojIyMgUmlkZ2VsaW5lIFBsb3QgLSBQcmljZSBkaXN0cmlidXRpb24gYnkgc2hvZSB0eXBlfQ0KDQpgYGB7ciBSaWRnZWxpbmVfUGxvdF9FbmhhbmNlZH0NCmxpYnJhcnkoZ2dwbG90MikNCmxpYnJhcnkoZ2dyaWRnZXMpDQpsaWJyYXJ5KGRwbHlyKQ0KDQojIEJ1YXQgZGF0YSB1bnR1ayBsYWJlbDogYW1iaWwgaGFyZ2EgdGVydGluZ2dpIHRpYXAgdGlwZSAoZGkgc2luaSBzYXR1IGhhcmdhIHBlciB0aXBlKQ0KbGFiZWxzIDwtIHNob2VzICU+JQ0KICBzZWxlY3QoVHlwZSwgUHJpY2UpDQoNCiMgUmlkZ2VsaW5lIFBsb3QgZGVuZ2FuIGxhYmVsIGhhcmdhDQpnZ3Bsb3Qoc2hvZXMsIGFlcyh4ID0gUHJpY2UsIHkgPSByZW9yZGVyKFR5cGUsIFByaWNlKSwgZmlsbCA9IFR5cGUpKSArDQogIGdlb21fZGVuc2l0eV9yaWRnZXMoDQogICAgYWxwaGEgPSAwLjgsDQogICAgY29sb3IgPSAiYmxhY2siLA0KICAgIHNjYWxlID0gMi41LA0KICAgIHJlbF9taW5faGVpZ2h0ID0gMC4wMQ0KICApICsNCiAgZ2VvbV90ZXh0KA0KICAgIGRhdGEgPSBsYWJlbHMsDQogICAgYWVzKHggPSBQcmljZSwgeSA9IHJlb3JkZXIoVHlwZSwgUHJpY2UpLCBsYWJlbCA9IHBhc3RlMCgiUnAiLCByb3VuZChQcmljZSwgMCksICJrIikpLA0KICAgIGhqdXN0ID0gLTAuMSwgICMgc2VkaWtpdCBkaSBrYW5hbiBwdW5jYWsNCiAgICBzaXplID0gMy41LA0KICAgIGNvbG9yID0gImJsYWNrIiwNCiAgICBmb250ZmFjZSA9ICJib2xkIg0KICApICsNCiAgc2NhbGVfZmlsbF9icmV3ZXIocGFsZXR0ZSA9ICJTZXQyIikgKw0KICBsYWJzKA0KICAgIHRpdGxlID0gIlJpZGdlbGluZSBQbG90OiBQcmljZSBEaXN0cmlidXRpb24gYnkgU2hvZSBUeXBlIiwNCiAgICB4ID0gIlByaWNlIChScCBpbiB0aG91c2FuZHMpIiwNCiAgICB5ID0gIlNob2UgVHlwZSINCiAgKSArDQogIHRoZW1lX21pbmltYWwoYmFzZV9zaXplID0gMTMpICsNCiAgdGhlbWUoDQogICAgbGVnZW5kLnBvc2l0aW9uID0gIm5vbmUiLA0KICAgIHBsb3QudGl0bGUgPSBlbGVtZW50X3RleHQoZmFjZSA9ICJib2xkIiwgaGp1c3QgPSAwLjUpLA0KICAgIGF4aXMudGV4dC55ID0gZWxlbWVudF90ZXh0KGZhY2UgPSAiYm9sZCIpDQogICkNCmBgYA0KDQoNCiMjIyMga2VzaW1wdWxhbjoNCioqMS4gUGVuanVhbGFuIGJlcmJlZGEtYmVkYSB0aWFwIHNlcGF0dToqKg0KICAgQmViZXJhcGEgc2VwYXR1LCBtaXNhbG55YSBQdWJsaWMgTG93IEFsbCBCbGFjayBLYW52YXMgZGFuIEV0aG5pYyBIaWdoIEFsbCBCbGFjayBLYW52YXMsIGxhcmlzIGJhbmdldCBkaWJhbmRpbmcgc2VwYXR1IGxhaW4uIEFkYSBqdWdhIHlhbmcgc2VwaSBwZW1pbmF0LCBzZXBlcnRpIEV2byBMb3cgQmxhY2sgTmF0dXJhbCBhdGF1IFZpY3RvcnkgTG93IEFsbCBCbGFjay4gSmFkaSBqZWxhcyBhZGEgc2VwYXR1IGZhdm9yaXQga29uc3VtZW4uDQoNCioqMi4gSGFyZ2EgdGlkYWsgc2VsYWx1IG1lbmVudHVrYW4gbGFrdSBhdGF1IHRpZGFrbnlhIHNlcGF0dToqKg0KICAgRGFyaSBzY2F0dGVyIHBsb3QgdGVybGloYXQgYmViZXJhcGEgc2VwYXR1IG1haGFsIHRldGFwIGxha3UsIGRhbiBhZGEgeWFuZyBtdXJhaCB0YXBpIHRpZGFrIGJhbnlhayB0ZXJqdWFsLiBKYWRpIGZha3RvciBzZWxhaW4gaGFyZ2EsIHNlcGVydGkgbW9kZWwgYXRhdSBwb3B1bGFyaXRhcywgaWt1dCBtZW5lbnR1a2FuLg0KDQoqKjMuIFNlYmFyYW4gaGFyZ2EgdGlhcCB0aXBlIHNlcGF0dSBiZXJiZWRhLWJlZGE6KioNCiAgIFNlYmFnaWFuIGJlc2FyIHNlcGF0dSBiZXJhZGEgZGkgaGFyZ2EgbWVuZW5nYWgsIHRhcGkgYWRhIHRpcGUgcHJlbWl1bSBkYW4gdGlwZSBtdXJhaC4gQmViZXJhcGEgdGlwZSBwdW55YSBoYXJnYSB5YW5nIGJlcnZhcmlhc2ksIGtlbXVuZ2tpbmFuIGthcmVuYSBhZGEgYmViZXJhcGEgbW9kZWwgYXRhdSBrdWFsaXRhcyBkYWxhbSBzYXR1IHRpcGUuDQoNCioqNC4gQWRhIHNlcGF0dSB5YW5nIG1lbmRvbWluYXNpIHBlbmp1YWxhbjoqKg0KICAgUGllIGNoYXJ0IG1lbnVuanVra2FuIGthbGF1IHNlYmFnaWFuIGtlY2lsIHRpcGUgc2VwYXR1IG1lbnl1bWJhbmcgcGVuanVhbGFuIHBhbGluZyBiYW55YWsuIEFydGlueWEsIGFkYSBwcm9kdWsgYW5kYWxhbiB5YW5nIGJlbmFyLWJlbmFyIGphZGkgZmF2b3JpdCBwYXNhci4NCg0KKio1LiBLZXNpbXB1bGFuIHNlZGVyaGFuYToqKg0KS2FsYXUgaW5naW4ganVhbGFuIGxlYmloIHN1a3NlcywgZm9rdXMgcGFkYSB0aXBlIHNlcGF0dSB5YW5nIGxhcmlzIGRhbiBwb3B1bGVyLiBVbnR1ayB5YW5nIGt1cmFuZyBsYWt1LCBiaXNhIGRpcGVydGltYmFuZ2thbiBzdHJhdGVnaSBoYXJnYSwgcHJvbW9zaSwgYXRhdSBtb2RlbCBiYXJ1IHN1cGF5YSBsZWJpaCBtZW5hcmlrIGJhZ2kga29uc3VtZW4uDQoNCg0K