File indexing completed on 2024-04-28 09:45:44

0001 # !/bin/bash
0002 # This program shows how curconvd answers to D-Bus requests
0003 
0004 SERVICE="org.kde.curconvd"
0005 
0006 echo "------- Methods --------------------------------"
0007 qdbus $SERVICE /CurrencyConverter
0008 echo
0009 
0010 echo "------- Data sources ---------------------------"
0011 qdbus $SERVICE /CurrencyConverter DataSources
0012 echo
0013 
0014 echo "------- Rounding methods -----------------------"
0015 qdbus $SERVICE /CurrencyConverter RoundingMethods
0016 echo
0017 
0018 echo "------- Fixed rates ----------------------------"
0019 qdbus $SERVICE /CurrencyConverter ReferenceCurrency    "(fixed)"
0020 TABLE=$(qdbus $SERVICE /CurrencyConverter LoadSource           "(fixed)" "none")
0021 echo $TABLE
0022 sleep 2
0023 qdbus $SERVICE $TABLE             AvailableCurrencies
0024 echo
0025 qdbus $SERVICE $TABLE             Symbol               FRF
0026 qdbus $SERVICE $TABLE             Name                 FRF
0027 echo "10 euro in French franc"
0028 qdbus $SERVICE $TABLE             ConvertFromReference FRF 10.0
0029 echo "10 French franc in euro"
0030 qdbus $SERVICE $TABLE             ConvertToReference   FRF 10.0
0031 qdbus $SERVICE $TABLE             Unload
0032 echo
0033 
0034 echo "------- European Commerce Bank -----------------"
0035 qdbus $SERVICE /CurrencyConverter ReferenceCurrency    "http://www.ecb.int"
0036 TABLE=$(qdbus $SERVICE /CurrencyConverter LoadSource           "http://www.ecb.int" "official rules")
0037 echo $TABLE
0038 sleep 2
0039 qdbus $SERVICE $TABLE             AvailableCurrencies
0040 echo
0041 qdbus $SERVICE $TABLE             Symbol               RUB
0042 qdbus $SERVICE $TABLE             Name                 RUB
0043 echo "10 euro in Russian rouble"
0044 qdbus $SERVICE $TABLE             ConvertFromReference RUB 10.0
0045 echo "10 Russian rouble in euro"
0046 qdbus $SERVICE $TABLE             ConvertToReference   RUB 10.0
0047 qdbus $SERVICE $TABLE             Unload
0048 echo
0049 
0050 echo "------- Time Genie -----------------------------"
0051 qdbus $SERVICE /CurrencyConverter ReferenceCurrency    "http://rss.timegenie.com"
0052 TABLE=$(qdbus $SERVICE /CurrencyConverter LoadSource           "http://rss.timegenie.com" "smallest coin")
0053 echo $TABLE
0054 sleep 2
0055 qdbus $SERVICE $TABLE             AvailableCurrencies
0056 echo
0057 qdbus $SERVICE $TABLE             Symbol               CAD
0058 qdbus $SERVICE $TABLE             Name                 CAD
0059 echo "10 US dollars in Canadian dollars"
0060 qdbus $SERVICE $TABLE             ConvertFromReference CAD 10.0
0061 echo "10 Canadian dollars in US dollars"
0062 qdbus $SERVICE $TABLE             ConvertToReference   CAD 10.0
0063 qdbus $SERVICE $TABLE             Unload
0064 echo