p2pool-installer/installer.vb at master · Crypto-Expert/p2pool-installer · GitHub

1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
Imports System.IO
Imports System.IO.Compression

Sub Main()

#Region "Dependencies"

' P2Pool
Dim P2Pool_Location as String = "C:\P2Pool"
My.Computer.Network.DownloadFile("https://github.com/Rav3nPL/p2pool-rav/archive/master.zip",P2Pool_Location)
ZipFile.ExtractToDirectory(P2Pool_Location & "master.zip", P2Pool_Location)

' Python
Dim Python_Location as String = "C:\Python"
My.Computer.Network.DownloadFile("https://www.python.org/ftp/python/2.7.6/python-2.7.6.msi",Python_Location)
Process.Start(Python_Location & "python-2.7.6.msi")

' Twisted
Dim Twisted_Location as String = "C:\Twisted"
My.Computer.Network.DownloadFile("http://twistedmatrix.com/Releases/Twisted/13.2/Twisted-13.2.0.win32-py2.7.msi", Twisted_Location)
Process.Start(Twisted_Location & "Twisted-13.2.0.win32-py2.7.msi")

' Zope Interface
Dim Zope_Location as String = "C:\Zope"
My.Computer.Network.DownloadFile("https://pypi.python.org/packages/2.7/z/zope.interface/zope.interface-3.8.0.win32-py2.7.exe", Zope_Location)
Process.Start(Zope_Location & "zope.interface-3.8.0.win32-py2.7.exe")

' WMI
Dim WMI_Location as String = "C:\WMI"
My.Computer.Network.DownloadFile("https://pypi.python.org/packages/source/W/WMI/WMI-1.4.9.zip", WMI_Location)
ZipFile.ExtractToDirectory(WMI_Location & "WMI-1.4.9.zip)
Process.Start(WMI_Location & "WMI-1.4.9.exe)

' GCC
Dim GCC_Location as String = "C:\GCC"
My.Computer.DownloadFile("https://github.com/develersrl/gccwinbinaries/releases/download/v1.1/gcc-mingw-4.3.3-setup.exe", GCC_Location)
Process.Start(GCC_Location & "gcc-mingw-4.3.3-setup.exe")
Console.WriteLine("Please Select the Radio Button asking to link with MSVCR90.DLL")

' Bitcoin QT
Dim Bitcoin_Location as String = "C:\Bitcoin"
My.Computer.DownloadFile("https://bitcoin.org/bin/0.9.0/bitcoin-0.9.0-win32-setup.exe",Bitcoin_Location)
Process.start(Bitcoin_Location & "bitcoin-0.9.0-win32-setup.exe")

#End Region
#Region "Setup"
Process.Start(P2Pool_Location & "\litecoin_scrypt\setup.py build --compile=mingw install")

Dim objWriter As New System.IO.StreamWriter("%APPDATA%/bitcoin/bitcoin.conf")
objWriter.write("rpcuser=username \n")
objWriter.write("rpcpassword=password \n")
objWriter.write("server=1 \n")
objWriter.write("daemon=1 \n")
objWriter.Close()

Process.start(P2Pool_Location & "run_p2pool.py --net bitcoin")
Console.Write("Bitcoin QT and P2Pool Should be Listening")