Topic: ¿Cual es la mejor forma de aceptar bitcoins en una tienda física? (Read 3270 times)

!/usr/bin/perl -W
#DOC
#https://en.bitcoin.it/wiki/MtGox/API/Streaming
#https://en.bitcoin.it/wiki/MtGox
#https://en.bitcoin.it/wiki/MtGox/API
 
use strict;
use warnings;
 
use Time::HiRes qw(gettimeofday);
use MIME::Base64;
use Digest::SHA qw(hmac_sha512);
 
use JSON;
use LWP::UserAgent;
 
use Data::Dumper;
 
my $lwp = LWP::UserAgent->new;
$lwp->agent("perl $]");
 
my $json = JSON->new->allow_nonref;
 
my $secret = 'mtgox.secret';
my $key = 'mtgox.key';
 
 
#my $request = genReq('/1/generic/private/info');
my $request = genReq('/0/data/ticker.php?Currency=EUR');
my $res = $lwp->request($request);
 
# Check the outcome of the response
if ($res->is_success) {
        print Dumper($json->decode( $res->content ))."\n";
	print $json->decode( $res->content )->{'ticker'}->{'avg'} . "\n";
}
else { print $res->status_line, "\n"; }
 
exit 0;
 
 
## sub routines and helpers
 
sub genReq {
        my ($uri) = shift;
 
        my $req = HTTP::Request->new(POST => 'https://data.mtgox.com/api/'.$uri);
        $req->content_type('application/x-www-form-urlencoded');
        $req->content("nonce=".microtime());
	$req->header('Rest-Key' => $key);
	$req->header('Rest-Sign' => signReq($req->content(),$secret));
 
        return $req;
};
 
sub signReq {
        my ($content,$secret) = @_;
        return encode_base64(hmac_sha512($content,decode_base64($secret)));
}
 
sub microtime { return sprintf "%d%06d", gettimeofday; }

Bitcoin-Qt versión v0.8.1.0-g34d62a8-beta

Uso:
  bitcoin-qt [opciones de la línea de órdenes]


Opciones:

  -?                     Este mensaje de ayuda

  -conf=           Especificar archivo de configuración (predeterminado: bitcoin.conf)

  -pid=            Especificar archivo pid (predeterminado: bitcoin.pid)

  -gen                   Generar monedas
  -gen=0                 No generar monedas
  -datadir=         Especificar directorio para los datos
  -dbcache=           Establecer el tamaño de caché de la base de datos en megabytes (predeterminado: 25)
  -timeout=           Especificar el tiempo máximo de conexión en milisegundos (predeterminado: 5000)
  -proxy=       Conectar mediante proxy socks
  -socks=             Elija la versión del proxy socks a usar (4-5, predetermiando: 5)
  -tor=         Utilizar proxy para conectar a servicios ocultos (predeterminado: igual que -proxy)
  -dns                   Permitir búsquedas DNS para -addnode, -seednode y -connect
  -port=           Escuchar conexiones en  (predeterminado: 8333 o testnet: 18333)
  -maxconnections=    Mantener como máximo  conexiones a pares (predeterminado: 125)
  -addnode=          Añadir un nodo al que conectarse y tratar de mantener la conexión abierta
  -connect=          Conectar sólo a los nodos (o nodo) especificados
  -seednode=         Conectar a un nodo para obtener direcciones de pares y desconectar
  -externalip=       Especifique su propia dirección pública
  -onlynet=         Conectarse solo a nodos de la red  (IPv4, IPv6 o Tor)
  -discover              Descubrir dirección IP propia (predeterminado: 1 al escuchar sin -externalip)
  -irc                   Encontrar los pares utilizando Internet Relay Chat (predeterminado: 0)
  -checkpoints           Aceptar solamente cadena de bloques que concuerde con los puntos de control internos (predeterminado: 1)
  -listen                Aceptar conexiones desde el exterior (predeterminado: 1 si no -proxy o -connect)
  -bind=           Vincular a la dirección dada y escuchar siempre en ella. Utilice la notación [host]:port para IPv6
  -dnsseed               Encontrar pares mediante búsqueda de DNS (predeterminado: 1 salvo con -connect)
  -banscore=          Umbral para la desconexión de pares con mal comportamiento (predeterminado: 100)
  -bantime=           Número de segundos en que se evita la reconexión de pares con mal comportamiento (predeterminado: 86400)
  -maxreceivebuffer=  Búfer de recepción máximo por conexión, *1000 bytes (predeterminado: 5000)
  -maxsendbuffer=     Búfer de recepción máximo por conexión, , *1000 bytes (predeterminado: 1000)
  -upnp                  Usar UPnP para asignar el puerto de escucha (predeterminado: 1 al escuchar)
  -paytxfee=        Tarifa por KB que añadir a las transacciones que envíe
  -server                Aceptar comandos consola y JSON-RPC

  -testnet               Usar la red de pruebas

  -debug                 Mostrar información de depuración adicional. Abarca todas las demás opciones -debug*
  -debugnet              Mostrar información de depuración adicional
  -logtimestamps         Anteponer marca temporal a la información de depuración
  -shrinkdebugfile       Reducir el archivo debug.log al iniciar el cliente (predeterminado: 1 sin -debug)
  -printtoconsole        Enviar información de trazas/depuración a la consola en lugar de al archivo debug.log
  -rpcuser=        Nombre de usuario para las conexiones JSON-RPC

  -rpcpassword=      Contraseña para las conexiones JSON-RPC

  -rpcport=        Escuchar conexiones JSON-RPC en  (predeterminado: 8332 o testnet:18332)
  -rpcallowip=       Permitir conexiones JSON-RPC desde la dirección IP especificada

  -rpcconnect=       Enviar comando al nodo situado en  (predeterminado: 127.0.0.1)

  -blocknotify=     Ejecutar un comando cuando cambia el mejor bloque (%s en cmd se sustituye por el hash de bloque)
  -upgradewallet         Actualizar el monedero al último formato
  -keypool=           Ajustar el número de claves en reserva  (predeterminado: 100)

  -rescan                Volver a examinar la cadena de bloques en busca de transacciones del monedero perdidas
  -salvagewallet         Intento de recuperar claves privadas de un wallet.dat corrupto
  -checkblocks=       How many blocks to check at startup (default: 288, 0 = all)
  -checklevel=        Como es de exhaustiva la verificació de bloques (0-4, por defecto 3)
  -txindex               Maintain a full transaction index (default: 0)
  -loadblock=      Importa los bloques desde un archivo blk000??.dat externo
  -reindex               Reconstruir el índice de la cadena de bloques a partir de los archivos blk000??.dat actuales
  -par=N                 Set the number of script verification threads (1-16, 0=auto, default: 0)

Opciones de creación de bloques:
  -blockminsize=      Establecer tamaño mínimo de bloque en bytes (predeterminado: 0)
  -blockmaxsize=      Establecer tamaño máximo de bloque en bytes (predeterminado: 250000)
  -blockprioritysize= Establecer el tamaño máximo de las transacciones de alta prioridad/comisión baja en bytes (predeterminado:27000)

Opciones SSL: (ver la Bitcoin Wiki para instrucciones de configuración SSL)
  -rpcssl                                  Usar OpenSSL (https) para las conexiones JSON-RPC

  -rpcsslcertificatechainfile=  Certificado del servidor (predeterminado: server.cert)

  -rpcsslprivatekeyfile=         Clave privada del servidor (predeterminado: server.pem)

  -rpcsslciphers=                 Cifrados aceptados (predeterminado: TLSv1+HIGH:!SSLv2:!aNULL:!eNULL:!AH:!3DES:@STRENGTH)


Opciones GUI:
  -lang=           Establecer el idioma, por ejemplo, "es_ES" (predeterminado: configuración regional del sistema)
  -min                   Arrancar minimizado
  -splash                Mostrar pantalla de bienvenida en el inicio (predeterminado: 1)

Bienvenido a la consola RPC de Bitcoin
Use las flechas arriba y abajo para navegar por el historial y Control+L para limpiar la pantalla.
Escriba help para ver un resumen de los comandos disponibles.

help

addmultisigaddress  <'["key","key"]'> [account]
addnode  
backupwallet 
createmultisig  <'["key","key"]'>
createrawtransaction [{"txid":txid,"vout":n},...] {address:amount,...}
decoderawtransaction 
dumpprivkey 
getaccount 
getaccountaddress 
getaddednodeinfo  [node]
getaddressesbyaccount 
getbalance [account] [minconf=1]
getblock 
getblockcount
getblockhash 
getblocktemplate [params]
getconnectioncount
getdifficulty
getgenerate
gethashespersec
getinfo
getmininginfo
getnewaddress [account]
getpeerinfo
getrawmempool
getrawtransaction  [verbose=0]
getreceivedbyaccount  [minconf=1]
getreceivedbyaddress  [minconf=1]
gettransaction 
gettxout   [includemempool=true]
gettxoutsetinfo
getwork [data]
help [command]
importprivkey  [label] [rescan=true]
keypoolrefill
listaccounts [minconf=1]
listaddressgroupings
listlockunspent
listreceivedbyaccount [minconf=1] [includeempty=false]
listreceivedbyaddress [minconf=1] [includeempty=false]
listsinceblock [blockhash] [target-confirmations]
listtransactions [account] [count=10] [from=0]
listunspent [minconf=1] [maxconf=9999999] ["address",...]
lockunspent unlock? [array-of-Objects]
move    [minconf=1] [comment]
sendfrom    [minconf=1] [comment] [comment-to]
sendmany  {address:amount,...} [minconf=1] [comment]
sendrawtransaction 
sendtoaddress   [comment] [comment-to]
setaccount  
setgenerate  [genproclimit]
settxfee 
signmessage  
signrawtransaction  [{"txid":txid,"vout":n,"scriptPubKey":hex,"redeemScript":hex},...] [,...] [sighashtype="ALL"]
stop
submitblock  [optional-params-obj]
validateaddress 
verifymessage   
walletlock
walletpassphrase  
walletpassphrasechange