System.Data.SQLite
Check-in [ad0a7d4f73]
Not logged in

Many hyperlinks are disabled.
Use anonymous login to enable hyperlinks.

Overview
Comment:Update Windows CE 200x testing tool to improve SmartDevice connectivity assembly name handling.
Downloads: Tarball | ZIP archive | SQL archive
Timelines: family | ancestors | descendants | both | trunk
Files: files | file ages | folders
SHA1: ad0a7d4f7344110fd4f079081c571db2fbd30488
User & Date: mistachkin 2014-06-03 18:57:13
Context
2014-06-03
19:02
Update SQLite core library to the latest trunk code. check-in: 4de915832b user: mistachkin tags: trunk
18:57
Update Windows CE 200x testing tool to improve SmartDevice connectivity assembly name handling. check-in: ad0a7d4f73 user: mistachkin tags: trunk
2014-06-02
17:34
Update the legacy download link. check-in: 1c26d1d34c user: mistachkin tags: trunk
Changes
Hide Diffs Unified Diffs Ignore Whitespace Patch

Changes to Setup/deployAndTestCe200x.eagle.

30
31
32
33
34
35
36












37
38
39
40
41
42
43
...
248
249
250
251
252
253
254





255






256
257
258
259
260
261
262
#
proc qputs { args } {
  if {![info exists ::quiet] || !$::quiet} then {
    eval puts $args; flush stdout
  }
}
 












#
# NOTE: This procedure looks up and returns the target device based on the
#       locale, platform Id, and device Id.
#
proc getDevice { cultureInfo platformId deviceId } {
  set datastoreManager [object create -alias \
      Microsoft.SmartDevice.Connectivity.DatastoreManager \
................................................................................
  }

  #
  # NOTE: Load the managed assembly that allows us to communicate with the
  #       target device.  If this fails, the necessary SDK components are
  #       probably not available on this system.
  #





  object load Microsoft.Smartdevice.Connectivity







  #
  # NOTE: Lookup the necessary device based on the platform and device Ids.
  #
  set device [getDevice $cultureInfo $platformId $deviceId]

  #







>
>
>
>
>
>
>
>
>
>
>
>







 







>
>
>
>
>
|
>
>
>
>
>
>







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
...
260
261
262
263
264
265
266
267
268
269
270
271
272
273
274
275
276
277
278
279
280
281
282
283
284
285
#
proc qputs { args } {
  if {![info exists ::quiet] || !$::quiet} then {
    eval puts $args; flush stdout
  }
}
 
proc showPlatforms { cultureInfo } {
  set datastoreManager [object create -alias \
      Microsoft.SmartDevice.Connectivity.DatastoreManager \
      [$cultureInfo LCID]]

  object foreach -alias platform [$datastoreManager GetPlatforms] {
    qputs stdout [appendArgs \
        "found platform \"" [$platform Id.ToString] "\" with name \"" \
        [$platform Name] \"...]
  }
}
 
#
# NOTE: This procedure looks up and returns the target device based on the
#       locale, platform Id, and device Id.
#
proc getDevice { cultureInfo platformId deviceId } {
  set datastoreManager [object create -alias \
      Microsoft.SmartDevice.Connectivity.DatastoreManager \
................................................................................
  }

  #
  # NOTE: Load the managed assembly that allows us to communicate with the
  #       target device.  If this fails, the necessary SDK components are
  #       probably not available on this system.
  #
  # NOTE: As of Visual Studio 2013 Update 2 (?), this must specify the full
  #       (versioned) assembly name here in order to make sure the assembly
  #       associated with the Pocket PC 2003 platform(s) gets loaded.
  #
  object load [appendArgs \
      "Microsoft.Smartdevice.Connectivity, Version=9.0.0.0, " \
      "Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a"]

  #
  # NOTE: Show the full list of available platforms.
  #
  showPlatforms $cultureInfo

  #
  # NOTE: Lookup the necessary device based on the platform and device Ids.
  #
  set device [getDevice $cultureInfo $platformId $deviceId]

  #