Plug in, Select Device USB
==========================
NetduinoPlus2_Netduino
Pinging... TinyCLR
Target --> Device capabilities
==============================
HalSystemInfo.halVersion: 4.2.0.0
HalSystemInfo.halVendorInfo: Netduino Plus 2 (v4.2.1.0) by Secret Labs LLC
HalSystemInfo.oemCode: 34
HalSystemInfo.modelCode: 177
HalSystemInfo.skuCode: 4102
HalSystemInfo.moduleSerialNumber: 00000000000000000000000000000000
HalSystemInfo.systemSerialNumber: 0000000000000000
ClrInfo.clrVersion: 4.2.0.0
ClrInfo.clrVendorInfo: Netduino Plus 2 (v4.2.1.0) by Secret Labs LLC
ClrInfo.targetFrameworkVersion: 4.2.0.0
SolutionReleaseInfo.solutionVersion: 4.2.0.3
SolutionReleaseInfo.solutionVendorInfo: Netduino Plus 2 (v4.2.1.0) by Secret Labs LLC
SoftwareVersion.BuildDate: Oct 28 2012
SoftwareVersion.CompilerVersion: 410894
FloatingPoint: True
SourceLevelDebugging: True
ThreadCreateEx: True
LCD.Width: 0
LCD.Height: 0
LCD.BitsPerPixel: 0
AppDomains: True
ExceptionFilters: True
IncrementalDeployment: True
SoftReboot: True
Profiling: False
ProfilingAllocations: False
ProfilingCalls: False
IsUnknown: False
Restart MFDeploy TinyBootLoader Mode
=====================================
No response from device <--- WHY
Start MFDeploy normally (Target --> Configuration --> Network)
==============================================================
MAC address discovered by MFDeploy.
set DNS addresses and enabled DHCP
Joined network, Ping OK
=======================
loaded a program that was running just fine on the Plus
=======================================================
Output from main below
---------------------
GC: 102300
IP Address 192.168.0.131
GatewayAddress 192.168.0.1
PhysicalAddress 00 04 A3 00 00 00 <---- WRONG MAC
dnsAddress 0 192.168.0.1
IsDhcpEnabled True
Clock set: True
Server used: utcnist2.colorado.edu
Time from NIST
56241 12-11-10 02:53:31 00 0 0 857.9 UTC(NIST) *
Current time set from DayTimeNIST: 11/09/2012 18:53:31
disposing Daytime Client
GC: 106620
GC: 107028
hello from timer:Duration 00:00:00.4360500
hello from timer:Duration 00:01:40.0009920
hello from timer:Duration 00:03:20.0003970
Press Button(generate interrupt, see program)
=============================================
No output <---- WHY NOT
Changed to static IP address, 192.168.0.52 (outside of router DHCP range, 100-150)
============================
No ping response from 192.168.0.52 <---
Cleared arp cache, waited awhile
No ping response <---
Deleted the DHCP entry from the router
* 192.168.0.131 00:04:A3:00:00:00 1 day 00:00:00
re-ran the program, output showed the same IP address, 192.168.0.131 with wrong MAC
192.168.0.131 shows up again in the router and arp cache with wrong MAC
So, it seems we have two problems, (1) the button mapping has changed and (2) MFDeploy can't update the network configuration properly.
Baxter
Sub Main()
PrintNetwork()
Try
Using NIST_Time As DayTimeNIST = New DayTimeNIST("utcnist2.colorado.edu", -8)
NIST_Time.UTC_offset = -8
NIST_Time.GetTimeFromNIST()
Debug.Print("Clock set: " & NIST_Time.successful)
Debug.Print("Server used: " & NIST_Time.TimeServer)
Debug.Print("Time from NIST " & NIST_Time.networkDateTime)
Debug.Print("Current time set from DayTimeNIST: " & DateTime.Now.ToString)
End Using
Catch
Debug.Print("no IP Address")
Microsoft.SPOT.Hardware.PowerState.RebootDevice(True)
End Try
Debug.Print("GC: " & Debug.GC(True).ToString)
_onBoardLED = New OutputPort(Pins.ONBOARD_LED, False)
_onBoardButton = New InterruptPort(Pins.ONBOARD_SW1, False,
Port.ResistorMode.Disabled,
Port.InterruptMode.InterruptEdgeBoth)
AddHandler _onBoardButton.OnInterrupt, AddressOf onBoardButton_OnInterrupt
'Start timer
StartTime = DateTime.Now
Dim timer As New Timer(New TimerCallback(AddressOf OnTimer), Nothing, 0, 100000) '100 sec
'Start web server
_webServer = New WebServer(WEB_ROOT, WebServer.HTTP_PORT)
Thread.Sleep(Timeout.Infinite)
End Sub
Public Sub PrintNetwork()
Dim NetInfo As NetworkInterface = NetworkInterface.GetAllNetworkInterfaces()(0)
Dim IPaddress As String = NetInfo.IPAddress
Dim DnsAddresses() As String = NetInfo.DnsAddresses
Dim GatewayAddress As String = NetInfo.GatewayAddress
Dim PhysicalAddress As Byte() = NetInfo.PhysicalAddress
Dim IsDhcpEnabled As Boolean = NetInfo.IsDhcpEnabled
Debug.Print("IP Address " & IPaddress)
Debug.Print("GatewayAddress " & GatewayAddress)
Debug.Print("PhysicalAddress " & bytesToHexString(PhysicalAddress, True))
For i As Integer = 0 To DnsAddresses.Length - 1
Debug.Print("dnsAddress " & i.ToString & " " & DnsAddresses(i))
Next
Debug.Print("IsDhcpEnabled " & IsDhcpEnabled.ToString)
Debug.Print("")
End Sub
#Region "Events"
Public Sub OnTimer(state As Object)
Dim delta As System.TimeSpan = (DateTime.Now - StartTime)
Debug.Print("hello from timer:Duration " & delta.ToString)
DebugPrint.Print("Hello from debugS.print : ")
End Sub
Private Sub onBoardButton_OnInterrupt(data1 As UInt32, data2 As UInt32, time As DateTime)
If (data2 = 0) Then
_onBoardLED.Write(True)
Thread.Sleep(250)
_onBoardLED.Write(False)
Thread.Sleep(250)
_onBoardLED.Write(True)
Thread.Sleep(250)
_onBoardLED.Write(False)
End If
PrintNetwork()
Debug.Print("freemem: " & Debug.GC(True))
End Sub
#End Region
End Module
Chris
