1 | <?xml version="1.0" encoding="iso-8859-1"?>
|
---|
2 | <!DOCTYPE html
|
---|
3 | PUBLIC "-//W3C//DTD XHTML 1.0 Transitional//EN"
|
---|
4 | "http://www.w3.org/TR/xhtml1/DTD/xhtml1-transitional.dtd">
|
---|
5 |
|
---|
6 | <html>
|
---|
7 | <head>
|
---|
8 | <title>doCrudeObexAppComm (m2a.rb)</title>
|
---|
9 | <meta http-equiv="Content-Type" content="text/html; charset=iso-8859-1" />
|
---|
10 | <link rel="stylesheet" href="../.././rdoc-style.css" type="text/css" media="screen" />
|
---|
11 | </head>
|
---|
12 | <body class="standalone-code">
|
---|
13 | <pre><span class="ruby-comment cmt"># File m2a.rb, line 24</span>
|
---|
14 | <span class="ruby-keyword kw">def</span> <span class="ruby-identifier">doCrudeObexAppComm</span>
|
---|
15 | <span class="ruby-keyword kw">begin</span>
|
---|
16 | <span class="ruby-identifier">cam</span> = <span class="ruby-identifier">getObexIOObject</span>
|
---|
17 | <span class="ruby-identifier">cam</span>.<span class="ruby-identifier">puts</span> <span class="ruby-value str">"ls"</span>
|
---|
18 | <span class="ruby-identifier">cam</span>.<span class="ruby-identifier">close_write</span>
|
---|
19 | <span class="ruby-identifier">lines</span> = <span class="ruby-identifier">cam</span>.<span class="ruby-identifier">readlines</span>
|
---|
20 | <span class="ruby-identifier">cam</span> = <span class="ruby-identifier">getObexIOObject</span>
|
---|
21 | <span class="ruby-identifier">lines</span>.<span class="ruby-identifier">each</span> <span class="ruby-keyword kw">do</span> <span class="ruby-operator">|</span><span class="ruby-identifier">line</span><span class="ruby-operator">|</span>
|
---|
22 | <span class="ruby-identifier">line</span> <span class="ruby-operator">=~</span> <span class="ruby-regexp re">/Bild\(\d+\).jpg/</span>
|
---|
23 | <span class="ruby-comment cmt">#black-magic-ruby $& holds the match</span>
|
---|
24 | <span class="ruby-keyword kw">if</span> <span class="ruby-operator">!</span><span class="ruby-identifier">$&</span>.<span class="ruby-identifier">nil?</span>
|
---|
25 | <span class="ruby-identifier">cam</span>.<span class="ruby-identifier">puts</span> <span class="ruby-value str">"get"</span>
|
---|
26 | <span class="ruby-identifier">cam</span>.<span class="ruby-identifier">puts</span> <span class="ruby-identifier">$&</span>
|
---|
27 | <span class="ruby-identifier">cam</span>.<span class="ruby-identifier">puts</span> <span class="ruby-identifier">$destination</span><span class="ruby-operator">+</span><span class="ruby-value str">'/'</span><span class="ruby-operator">+</span><span class="ruby-identifier">$&</span>
|
---|
28 | <span class="ruby-identifier">puts</span> <span class="ruby-value str">"copy picture "</span><span class="ruby-operator">+</span><span class="ruby-identifier">$&</span><span class="ruby-operator">+</span><span class="ruby-value str">" to to "</span><span class="ruby-operator">+</span><span class="ruby-identifier">$destination</span>
|
---|
29 | <span class="ruby-comment cmt">#delete picturea after copying? uncomment...</span>
|
---|
30 | <span class="ruby-comment cmt">#doesn't work on my phone:(</span>
|
---|
31 | <span class="ruby-comment cmt">#cam.puts "delete"</span>
|
---|
32 | <span class="ruby-comment cmt">#cam.puts $&</span>
|
---|
33 | <span class="ruby-keyword kw">end</span>
|
---|
34 | <span class="ruby-keyword kw">end</span>
|
---|
35 | <span class="ruby-keyword kw">rescue</span> <span class="ruby-constant">Exception</span> =<span class="ruby-operator">></span> <span class="ruby-identifier">ex</span>
|
---|
36 | <span class="ruby-identifier">puts</span>(<span class="ruby-identifier">ex</span>.<span class="ruby-identifier">to_s</span>)
|
---|
37 | <span class="ruby-keyword kw">ensure</span>
|
---|
38 | <span class="ruby-comment cmt"># TODO: ensure connection is closed</span>
|
---|
39 | <span class="ruby-identifier">cam</span>.<span class="ruby-identifier">puts</span> <span class="ruby-value str">"disconnect"</span>
|
---|
40 | <span class="ruby-identifier">cam</span>.<span class="ruby-identifier">close</span>
|
---|
41 | <span class="ruby-keyword kw">end</span>
|
---|
42 | <span class="ruby-keyword kw">end</span></pre>
|
---|
43 | </body>
|
---|
44 | </html>
|
---|