blog/archive/2009/02/02.rss

   1 <?xml version="1.0" encoding="ISO-8859-1"?>
   2 <rss version='2.0' xmlns:lj='http://www.livejournal.org/rss/lj/1.0/'>
   3         <channel>
   4                 <title>Petter Reinholdtsen - Entries from February 2009</title>
   5                 <description>Entries from February 2009</description>
   6                 <link>http://people.skolelinux.org/pere/blog/</link>
   7
   8
   9         <item>
  10                 <title>Intellektuelt privilegium - et bedre IP-begrep</title>
  11                 <link>http://people.skolelinux.org/pere/blog/Intellektuelt_privilegium___et_bedre_IP_begrep.html</link>
  12                 <guid isPermaLink="true">http://people.skolelinux.org/pere/blog/Intellektuelt_privilegium___et_bedre_IP_begrep.html</guid>
  13                 <pubDate>Sun, 1 Feb 2009 15:06:00 +0100</pubDate>
  14                 <description>&lt;p&gt;Ofte brukes intellektuell eiendom som samlebegrep for opphavsrett,
  15 patenter, varemerker og forretningshemmeligheter.  Problemet med dette
  16 begrepet er at det er svært misvisende.  For det første er ingen av de
  17 begrensede monopolene det her er snakk om som kan kalles eiendom, og
  18 for det andre er egenskapene til de ulike monopolene så forskjellige
  19 at det er mer tilslørende enn opplysende å gruppere dem sammen i et
  20 sekkebegrep.  Blant annet Richard Stallman har
  21 &lt;a href=&quot;http://www.gnu.org/philosophy/not-ipr.html&quot;&gt;skrevet litt om dette&lt;/a&gt;.&lt;/p&gt;
  22
  23 &lt;p&gt;I dag kom jeg over
  24 &lt;a href=&quot;http://blogs.sun.com/webmink/entry/intellectual_privilege&quot;&gt;en
  25 bloggpost fra Simon Phipps&lt;/a&gt; som foreslår å bruke intellektuelt
  26 privilegium som begrep i stedet, da det gjør det klarere at det ikke
  27 er snakk om eiendom, men et tidsbegrenset monopol.  Simon Phipps
  28 forteller videre at noen jobber med å skrive
  29 &lt;a href=&quot;http://www.intellectualprivilege.com/book.html&quot;&gt;en bok med
  30 tittel Intellectual Privilege&lt;/a&gt;, og at boken er anbefalt av Lawrence
  31 Lessig.  Jeg tror jeg skal begynne å bruke begrepet intellektuelt
  32 privilegium når jeg snakker om opphavsrett, patenter, varemerker og
  33 forretningshemmeligheter framover.&lt;/p&gt;
  34 </description>
  35         </item>
  36
  37         <item>
  38                 <title>Norge trenger en personvernforening</title>
  39                 <link>http://people.skolelinux.org/pere/blog/Norge_trenger_en_personvernforening.html</link>
  40                 <guid isPermaLink="true">http://people.skolelinux.org/pere/blog/Norge_trenger_en_personvernforening.html</guid>
  41                 <pubDate>Sun, 1 Feb 2009 18:35:00 +0100</pubDate>
  42                 <description>&lt;p&gt;De siste årene har jeg forsøkt å få liv i
  43 &lt;a href=&quot;http://www.personvern.no/&quot;&gt;foreningen Personvern i Norge&lt;/a&gt;.  Norge
  44 trenger en organisasjon som jobber med å sette personvern på agendaen
  45 og som kan være en motvekt til de mange som gjerne raderer bort
  46 personvernet av behagelighetshensyn eller ut fra villfarelsen om at en
  47 får økt sikkerhet av å redusere personvernet.  Foreløbig har det ikke
  48 lykkes å få på plass kritisk masse av interesserte på epostlisten, og
  49 nå tror jeg det er på tide å endre tilnærming.  I stedet for å forsøke
  50 å rekruttere folk til epostlisten og håpe at når nok folk er samlet
  51 vil noen ta initiativ og sørge for at det begynner å skje ting, så
  52 tror jeg det er en ide å ta utgangspunkt i de som er der i dag og
  53 sette sammen et interrimstyre.  Forslaget er sendt til epostlisten, så
  54 nå får vi se om noen er enig.&lt;/p&gt;
  55 </description>
  56         </item>
  57
  58         <item>
  59                 <title>Min reprap tar sakte form</title>
  60                 <link>http://people.skolelinux.org/pere/blog/Min_reprap_tar_sakte_form.html</link>
  61                 <guid isPermaLink="true">http://people.skolelinux.org/pere/blog/Min_reprap_tar_sakte_form.html</guid>
  62                 <pubDate>Tue, 3 Feb 2009 13:30:00 +0100</pubDate>
  63                 <description>&lt;p&gt;Min reprap begynner å ta form.  Den er nå kommet så langt at den er
  64 blitt en kubisk ramme.  Z-aksen er montert men ikke kalibrert, og det
  65 hele er klart for litt enkel testing.  Har møtt på to problemer som
  66 blokkerer videre montering, men har oppnått kontakt med Audun Vaaler
  67 ved Høgskolen i Østfold som forteller at de er nesten ferdig med et
  68 tilsvarende byggesett som det jeg tar utgangspunkt i, og håper de kan
  69 forklare hvordan de kom rundt problemene.  De to problemene er
  70 relatert til Z-aksen og Y-aksen.  &lt;/p&gt;
  71
  72 &lt;p&gt;For Z-aksen, er det et stjernehjul som festes på motoraksen ved
  73 tannjulet som driver z-aksebåndet og som skal holde båndet på plass.
  74 Problemet med det nederste stjernejulet er at det er helt løst, og
  75 blir liggende på motoren 5 mm nedenfor tannjulet, i stedet for å ligge
  76 inntil tannjulet slik det skal.  Mulig løsningen er å borre i
  77 stjernehjulet, eller lime det fast.&lt;/p&gt;
  78
  79 &lt;p&gt;For Y-aksen, er det en plastdel som ser ut til å mangle som skulle
  80 dekket to skruver som kommer i veien for kraftoverføringsmekanismen
  81 fra motoren til selve aksen, slik at mekanismen kan snurre fritt.&lt;/p&gt;
  82
  83 &lt;p&gt;Når det gjelder elektronikken til min reprap, så er min gode venn
  84 Anders Rosnes igang med å lodde sammen delene og han forteller at
  85 koblingsbordet for Arduino er klart, og en temperatursensor og en
  86 optoswitch er også klar.  Gleder meg til å teste dem.  Må bare finne
  87 ut hvordan jeg laster opp firmware i Arduino-en. :)&lt;/p&gt;
  88
  89 &lt;p&gt;Når det gjelder NUUGs reprap-prosjekt, så er det framgang og Ole
  90 Kristian, Tollef og Ketil besøke IFI for å få fortgang i produksjon av
  91 plastdeler, og Ole Kristian forteller at han har funnet en kilde til
  92 de fleste metalldelene.  Gleder meg til å se resultaten av det
  93 arbeidet.&lt;/p&gt;
  94 </description>
  95         </item>
  96
  97         <item>
  98                 <title>Første vellykkede videostrøm fra NUUG</title>
  99                 <link>http://people.skolelinux.org/pere/blog/F_rste_vellykkede_videostr_m_fra_NUUG.html</link>
 100                 <guid isPermaLink="true">http://people.skolelinux.org/pere/blog/F_rste_vellykkede_videostr_m_fra_NUUG.html</guid>
 101                 <pubDate>Wed, 11 Feb 2009 06:30:00 +0100</pubDate>
 102                 <description>&lt;p&gt;Jeg ble glad for å se under
 103 &lt;a href=&quot;http://www.nuug.no/aktiviteter/20090210-compiz/&quot;&gt;gårdagens
 104 medlemsmøte&lt;/a&gt; i NUUG Oslo at utsending av live-video fra møtet
 105 fungerte for første gang.  Forrige gang ble det ved en teknisk tabbe
 106 sendt video uten lyd.  Vi kan takke Ole Kristian Lien og resten av
 107 videogruppen i NUUG for at nå NUUG-medlemmer over det ganske land
 108 kunne se foredraget samtidig med oss i Oslo.  Vi opplevde til og med
 109 under møtet å motta spørsmål via IRC som ble besvart der og da.
 110 Opptaket publiseres så snart det er kopiert over til NUUGs
 111 webserver og komprimert.&lt;/p&gt;
 112 </description>
 113         </item>
 114
 115         <item>
 116                 <title>Endelig er Debian Lenny gitt ut</title>
 117                 <link>http://people.skolelinux.org/pere/blog/Endelig_er_Debian_Lenny_gitt_ut.html</link>
 118                 <guid isPermaLink="true">http://people.skolelinux.org/pere/blog/Endelig_er_Debian_Lenny_gitt_ut.html</guid>
 119                 <pubDate>Sun, 15 Feb 2009 11:50:00 +0100</pubDate>
 120                 <description>&lt;p&gt;Endelig er &lt;a href=&quot;http://www.debian.org/&quot;&gt;Debian&lt;/a&gt;
 121 &lt;a href=&quot;http://www.debian.org/News/2009/20090214&quot;&gt;Lenny&lt;/a&gt; gitt ut.
 122 Et langt steg videre for Debian-prosjektet, og en rekke nye
 123 programpakker blir nå tilgjengelig for de av oss som bruker den
 124 stabile utgaven av Debian.  Neste steg er nå å få
 125 &lt;a href=&quot;http://www.skolelinux.org/&quot;&gt;Skolelinux&lt;/a&gt; /
 126 &lt;a href=&quot;http://wiki.debian.org/DebianEdu/&quot;&gt;Debian Edu&lt;/a&gt; ferdig
 127 oppdatert for den nye utgaven, slik at en oppdatert versjon kan
 128 slippes løs på skolene.  Takk til alle debian-utviklerne som har
 129 gjort dette mulig.  Endelig er f.eks. fungerende avhengighetsstyrt
 130 bootsekvens tilgjengelig i stabil utgave, vha pakken
 131 &lt;tt&gt;insserv&lt;/tt&gt;.&lt;/p&gt;
 132 </description>
 133         </item>
 134
 135         <item>
 136                 <title>Kart over overvåkningskamera i Norge</title>
 137                 <link>http://people.skolelinux.org/pere/blog/Kart_over_overv_kningskamera_i_Norge.html</link>
 138                 <guid isPermaLink="true">http://people.skolelinux.org/pere/blog/Kart_over_overv_kningskamera_i_Norge.html</guid>
 139                 <pubDate>Sun, 15 Feb 2009 22:30:00 +0100</pubDate>
 140                 <description>&lt;p&gt;I regi av
 141 &lt;a href=&quot;http://www.personvern.no/&quot;&gt;personvernforeningen&lt;/a&gt; har jeg
 142 startet på
 143 &lt;a href=&quot;http://personvern.no/wiki/index.php/Kameraovervåkning&quot;&gt;et
 144 kart over overvåkningskamera i Norge&lt;/a&gt;.  Bakgrunnen er at det etter
 145 min mening bærer galt avsted med den massive overvåkningen som
 146 finner sted i Norge i dag, og at flere og flere overvåkningskamera
 147 gjør det vanskeligere og vanskeligere å gå igjennom livet uten at
 148 små og store brødre trenger inn i ens private sfære.  Datatilsynet
 149 har et register over kameraovervåkning, men det viser seg å være
 150 ubrukelig både til å finne ut hvor det er kamera plassert, og til å
 151 sjekke om et kamera en kommer over er registrert.  Dette nye kartet
 152 fikser en av disse manglene, men det vil fortsatt være umulig å vite
 153 om et kamera er registrert etter lovens krav eller ikke.  Pr. nå er
 154 22 kamera i Oslo registrert, og det trengs flere til å registrere
 155 alle.  Informasjonen registreres direkte inn i &lt;a
 156 href=&quot;http://www.openstreetmap.org/&quot;&gt;OpenStreetmap&lt;/a&gt;, så hentes det
 157 automatisk over i spesialkartet.&lt;/p&gt;
 158 </description>
 159         </item>
 160
 161         <item>
 162                 <title>Using bar codes at a computing center</title>
 163                 <link>http://people.skolelinux.org/pere/blog/Using_bar_codes_at_a_computing_center.html</link>
 164                 <guid isPermaLink="true">http://people.skolelinux.org/pere/blog/Using_bar_codes_at_a_computing_center.html</guid>
 165                 <pubDate>Fri, 20 Feb 2009 08:50:00 +0100</pubDate>
 166                 <description>&lt;p&gt;At work with the University of Oslo, we have several hundred computers
 167 in our computing center.  This give us a challenge in tracking the
 168 location and cabling of the computers, when they are added, moved and
 169 removed.  Some times the location register is not updated when a
 170 computer is inserted or moved and we then have to search the room for
 171 the &quot;missing&quot; computer.&lt;/p&gt;
 172
 173 &lt;p&gt;In the last issue of Linux Journal, I came across a project
 174 &lt;a href=&quot;http://www.libdmtx.org/&quot;&gt;libdmtx&lt;/a&gt; to write and read bar
 175 code blocks as defined in the
 176 &lt;a href=&quot;http://en.wikipedia.org/wiki/Data_Matrix&quot;&gt;The Data Matrix
 177 Standard&lt;/a&gt;.  This is bar codes that can be read with a normal
 178 digital camera, for example that on a cell phone, and several such bar
 179 codes can be read by libdmtx from one picture.  The bar code standard
 180 allow up to 2 KiB to be written in the tag.  There is another project
 181 with &lt;a href=&quot;http://www.terryburton.co.uk/barcodewriter/&quot;&gt;a bar code
 182 writer written in postscript&lt;/a&gt; capable of creating such bar codes,
 183 but this was the first time I found a tool to read these bar
 184 codes.&lt;/p&gt;
 185
 186 &lt;p&gt;It occurred to me that this could be used to tag and track the
 187 machines in our computing center.  If both racks and computers are
 188 tagged this way, we can use a picture of the rack and all its
 189 computers to detect the rack location of any computer in that rack.
 190 If we do this regularly for the entire room, we will find all
 191 locations, and can detect movements and removals.&lt;/p&gt;
 192
 193 &lt;p&gt;I decided to test if this would work in practice, and picked a
 194 random rack and tagged all the machines with their names.  Next, I
 195 took pictures with my digital camera, and gave the dmtxread program
 196 these JPEG pictures to see how many tags it could read.  This worked
 197 fairly well.  If the pictures was well focused and not taken from the
 198 side, all tags in the image could be read.  Because of limited space
 199 between the racks, I was unable to get a good picture of the entire
 200 rack, but could without problem read all tags from a picture covering
 201 about half the rack.  I had to limit the search time used by dmtxread
 202 to 60000 ms to make sure it terminated in a reasonable time frame.&lt;/p&gt;
 203
 204 &lt;p&gt;My conclusion is that this could work, and we should probably look
 205 at adjusting our computer tagging procedures to use bar codes for
 206 easier automatic tracking of computers.&lt;/p&gt;
 207 </description>
 208         </item>
 209
 210         <item>
 211                 <title>Checking server hardware support status for Dell, HP and IBM servers</title>
 212                 <link>http://people.skolelinux.org/pere/blog/Checking_server_hardware_support_status_for_Dell__HP_and_IBM_servers.html</link>
 213                 <guid isPermaLink="true">http://people.skolelinux.org/pere/blog/Checking_server_hardware_support_status_for_Dell__HP_and_IBM_servers.html</guid>
 214                 <pubDate>Sat, 28 Feb 2009 23:50:00 +0100</pubDate>
 215                 <description>&lt;p&gt;At work, we have a few hundred Linux servers, and with that amount
 216 of hardware it is important to keep track of when the hardware support
 217 contract expire for each server.  We have a machine (and service)
 218 register, which until recently did not contain much useful besides the
 219 machine room location and contact information for the system owner for
 220 each machine.  To make it easier for us to track support contract
 221 status, I&#39;ve recently spent time on extending the machine register to
 222 include information about when the support contract expire, and to tag
 223 machines with expired contracts to make it easy to get a list of such
 224 machines.  I extended a perl script already being used to import
 225 information about machines into the register, to also do some screen
 226 scraping off the sites of Dell, HP and IBM (our majority of machines
 227 are from these vendors), and automatically check the support status
 228 for the relevant machines.  This make the support status information
 229 easily available and I hope it will make it easier for the computer
 230 owner to know when to get new hardware or renew the support contract.
 231 The result of this work documented that 27% of the machines in the
 232 registry is without a support contract, and made it very easy to find
 233 them.  27% might seem like a lot, but I see it more as the case of us
 234 using machines a bit longer than the 3 years a normal support contract
 235 last, to have test machines and a platform for less important
 236 services.  After all, the machines without a contract are working fine
 237 at the moment and the lack of contract is only a problem if any of
 238 them break down.  When that happen, we can either fix it using spare
 239 parts from other machines or move the service to another old
 240 machine.&lt;/p&gt;
 241
 242 &lt;p&gt;I believe the code for screen scraping the Dell site was originally
 243 written by Trond Hasle Amundsen, and later adjusted by me and Morten
 244 Werner Forsbring.  The HP scraping was written by me after reading a
 245 nice article in ;login: about how to use WWW::Mechanize, and the IBM
 246 scraping was written by me based on the Dell code.  I know the HTML
 247 parsing could be done using nice libraries, but did not want to
 248 introduce more dependencies.  This is the current incarnation:&lt;/p&gt;
 249
 250 &lt;pre&gt;
 251 use LWP::Simple;
 252 use POSIX;
 253 use WWW::Mechanize;
 254 use Date::Parse;
 255 [...]
 256 sub get_support_info {
 257     my ($machine, $model, $serial, $productnumber) = @_;
 258     my $str;
 259
 260     if ( $model =~ m/^Dell / ) {
 261         # fetch website from Dell support
 262         my $url = &quot;http://support.euro.dell.com/support/topics/topic.aspx/emea/shared/support/my_systems_info/no/details?c=no&amp;amp;cs=nodhs1&amp;amp;l=no&amp;amp;s=dhs&amp;amp;ServiceTag=$serial&quot;;
 263         my $webpage = get($url);
 264         return undef unless ($webpage);
 265
 266         my $daysleft = -1;
 267         my @lines = split(/\n/, $webpage);
 268         foreach my $line (@lines) {
 269             next unless ($line =~ m/Beskrivelse/);
 270             $line =~ s/&amp;lt;[^&gt;]+?&gt;/;/gm;
 271             $line =~ s/^.+?;(Beskrivelse;)/$1/;
 272
 273             my @f = split(/\;/, $line);
 274             @f = @f[13 .. $#f];
 275             my $lastend = &quot;&quot;;
 276             while ($f[3] eq &quot;DELL&quot;) {
 277                 my ($type, $startstr, $endstr, $days) = @f[0, 5, 7, 10];
 278
 279                 my $start = POSIX::strftime(&quot;%Y-%m-%d&quot;,
 280                                             localtime(str2time($startstr)));
 281                 my $end = POSIX::strftime(&quot;%Y-%m-%d&quot;,
 282                                           localtime(str2time($endstr)));
 283                 $str .= &quot;$type $start -&gt; $end &quot;;
 284                 @f = @f[14 .. $#f];
 285                 $lastend = $end if ($end gt $lastend);
 286             }
 287             my $today = POSIX::strftime(&quot;%Y-%m-%d&quot;, localtime(time));
 288             tag_machine_unsupported($machine)
 289                 if ($lastend lt $today);
 290         }
 291     } elsif ( $model =~ m/^HP / ) {
 292         my $mech = WWW::Mechanize-&gt;new();
 293         my $url =
 294             &#39;http://www1.itrc.hp.com/service/ewarranty/warrantyInput.do&#39;;
 295         $mech-&gt;get($url);
 296         my $fields = {
 297             &#39;BODServiceID&#39; =&gt; &#39;NA&#39;,
 298             &#39;RegisteredPurchaseDate&#39; =&gt; &#39;&#39;,
 299             &#39;country&#39; =&gt; &#39;NO&#39;,
 300             &#39;productNumber&#39; =&gt; $productnumber,
 301             &#39;serialNumber1&#39; =&gt; $serial,
 302         };
 303         $mech-&gt;submit_form( form_number =&gt; 2,
 304                             fields      =&gt; $fields );
 305         # Next step is screen scraping
 306         my $content = $mech-&gt;content();
 307
 308         $content =~ s/&amp;lt;[^&gt;]+?&gt;/;/gm;
 309         $content =~ s/\s+/ /gm;
 310         $content =~ s/;\s*;/;;/gm;
 311         $content =~ s/;[\s;]+/;/gm;
 312
 313         my $today = POSIX::strftime(&quot;%Y-%m-%d&quot;, localtime(time));
 314
 315         while ($content =~ m/;Warranty Type;/) {
 316             my ($type, $status, $startstr, $stopstr) = $content =~
 317                 m/;Warranty Type;([^;]+);.+?;Status;(\w+);Start Date;([^;]+);End Date;([^;]+);/;
 318             $content =~ s/^.+?;Warranty Type;//;
 319             my $start = POSIX::strftime(&quot;%Y-%m-%d&quot;,
 320                                         localtime(str2time($startstr)));
 321             my $end = POSIX::strftime(&quot;%Y-%m-%d&quot;,
 322                                       localtime(str2time($stopstr)));
 323
 324             $str .= &quot;$type ($status) $start -&gt; $end &quot;;
 325
 326             tag_machine_unsupported($machine)
 327                 if ($end lt $today);
 328         }
 329     } elsif ( $model =~ m/^IBM / ) {
 330         # This code ignore extended support contracts.
 331         my ($producttype) = $model =~ m/.*-\[(.{4}).+\]-/;
 332         if ($producttype &amp;amp;&amp;amp; $serial) {
 333             my $content =
 334                 get(&quot;http://www-947.ibm.com/systems/support/supportsite.wss/warranty?action=warranty&amp;amp;brandind=5000008&amp;amp;Submit=Submit&amp;amp;type=$producttype&amp;amp;serial=$serial&quot;);
 335             if ($content) {
 336                 $content =~ s/&amp;lt;[^&gt;]+?&gt;/;/gm;
 337                 $content =~ s/\s+/ /gm;
 338                 $content =~ s/;\s*;/;;/gm;
 339                 $content =~ s/;[\s;]+/;/gm;
 340
 341                 $content =~ s/^.+?;Warranty status;//;
 342                 my ($status, $end) = $content =~ m/;Warranty status;([^;]+)\s*;Expiration date;(\S+) ;/;
 343
 344                 $str .= &quot;($status) -&gt; $end &quot;;
 345
 346                 my $today = POSIX::strftime(&quot;%Y-%m-%d&quot;, localtime(time));
 347                 tag_machine_unsupported($machine)
 348                     if ($end lt $today);
 349             }
 350         }
 351     }
 352     return $str;
 353 }
 354 &lt;/pre&gt;
 355
 356 &lt;p&gt;Here are some examples on how to use the function, using fake
 357 serial numbers.  The information passed in as arguments are fetched
 358 from dmidecode.&lt;/p&gt;
 359
 360 &lt;pre&gt;
 361 print get_support_info(&quot;hp.host&quot;, &quot;HP ProLiant BL460c G1&quot;, &quot;1234567890&quot;
 362                        &quot;447707-B21&quot;);
 363 print get_support_info(&quot;dell.host&quot;, &quot;Dell Inc. PowerEdge 2950&quot;, &quot;1234567&quot;);
 364 print get_support_info(&quot;ibm.host&quot;, &quot;IBM eserver xSeries 345 -[867061X]-&quot;,
 365                        &quot;1234567&quot;);
 366 &lt;/pre&gt;
 367
 368 &lt;p&gt;I would recommend this approach for tracking support contracts for
 369 everyone with more than a few computers to administer. :)&lt;/p&gt;
 370
 371 &lt;p&gt;Update 2009-03-06: The IBM page do not include extended support
 372 contracts, so it is useless in that case.  The original Dell code do
 373 not handle extended support contracts either, but has been updated to
 374 do so.&lt;/p&gt;
 375 </description>
 376         </item>
 377
 378         </channel>
 379 </rss>