blog/index.html

   1 <!DOCTYPE html PUBLIC "-//W3C//DTD XHTML 1.0 Strict//EN"
   2         "http://www.w3.org/TR/xhtml1/DTD/xhtml1-strict.dtd">
   3 <html>
   4  <head>
   5   <title>Petter Reinholdtsen</title>
   6   <link rel="stylesheet" type="text/css" media="screen" href="style.css">
   7   <link rel="alternate" title="RSS Feed" href="index.rss" type="application/rss+xml">
   8
   9  </head>
  10  <body>
  11
  12  <div class="title">
  13   <h1>
  14        <a href="">Petter Reinholdtsen</a>
  15
  16   </h1>
  17
  18  </div>
  19
  20
  21
  22  <div class="entry">
  23   <div class="title"><a href="Vitenskapens_dogmer___.html">Vitenskapens dogmer...</a></div>
  24   <div class="date">2009-03-27 11:30</div>
  25   <div class="body">
  26 <p>Handspåleggere og andre tilhengere av ikke-etterprøvbar medisin,
  27 samt de som mener at verden ikke utviklet seg i henhold til
  28 evolusjonsteorien, hevder ofte at vitenskapen er dogmatisk og at
  29 vitenskapsfolk velger å ignorere alt vitenskapsfolk ikke kan
  30 forklare.  Intet kunne være lenger fra sannheten.  En interessant
  31 observasjon dog, er hvilke "dogmer" som ligger til grunn for
  32 vitenskapen.  Her er et forsøk på å nevne noen av de grunnleggende
  33 antagelsene som legges til grunn.</p>
  34
  35 <p>Først og fremst ligger det til grunn en tro om at verden,
  36 verdensrommet og universet har de samme egenskapene overalt.  Dvs. at
  37 en ikke tror at virkeligheten oppfører seg forskjellig f.eks. på
  38 jorden og i verdensrommet.  Dette er ingen selvfølgelig antagelse, da
  39 f.eks. de gamle grekerne antok at virkeligheten var forskjellig på
  40 jorden og i himmelen.  Antagelsen om at virkeligheten oppfører seg
  41 etter de samme "reglene" overalt skjøt først fart etter
  42 middelalderen.</p>
  43
  44 <p>Når en så har begynt å tro at virkeligheten oppfører seg likt
  45 overalt, så kan en begynne å tro at det er mulig å observere
  46 virkeligheten, og ut fra observasjoner kunne finne en forklaring, et
  47 sett med "regler", som kan brukes til å forutse hva som kommer til å
  48 skje i fremtiden basert på observasjoner gjort i fortiden.  Eksempler
  49 på dette er at en kan beregne hvor lang tid en sten som er sluppet
  50 ned fra et hus vil bruke før den treffer bakken (og ikke tror at den
  51 i noen tilfeller vil fly oppover i stedet for nedover).  En kan altså
  52 lage en mental modell over sammenhenger i virkeligheten, og bruke
  53 denne modellen til å, enten ved hjelp av logiske argumentasjonsrekker
  54 eller matematiske beregninger, forklare hva som kommer til å skje.
  55 Hvis modellen viser seg å fungere bra for observasjoner i dag, så
  56 kan en på tilsvarende vis beregne eller logisk sette sammen hva som
  57 har foregått i fortiden som ledet frem til det vi kan observere i
  58 dag.</p>
  59
  60 <p>Sist, men ikke minst, så tror vitenskapsfolk på at det er mulig
  61 å observere virkeligheten, og å tro på disse observasjonene
  62 (innenfor rimelig feilmargin som følger av måten observasjonen er
  63 gjort på).  En tror altså ikke på at noen bakenfor virkeligheten
  64 forsøker å lure oss til å observere noe som ikke eksisterer.  Det
  65 er naturligvis umulig (eller kanskje til nød svært vanskelig) å
  66 motbevise at vi lever i Matrix-aktige omgivelser, der vi observerer
  67 noe som eksisterer kun som en simulering i datamaskiner.  Det at noe
  68 er umulig å motbevise gjør dog ikke at det blir spesielt interessant
  69 å ta utgangspunkt i.  Det er antagelig ikke grenser for hvor mange
  70 måter det er mulig å tenke seg at vi blir lurt til å oppleve en
  71 virkelighet som "egentlig" ikke eksisterer, men i og med at den
  72 eksisterer for oss, så er det i hovedsak et filosofisk spørsmål om
  73 hva det betyr å eksistere.  Det er ikke spesielt relevant for
  74 vitenskapen, som altså tar utgangspunkt i at den virkeligheten vi
  75 observerer eksisterer, virker likt overalt, og kan forstås med logikk
  76 og matematikk.</p>
  77
  78 <p>Det kan virke som om de som hevder at vitenskapen er ute av stand
  79 til å ta inn over seg Snåsamannens evner, homeopatiske
  80 forklaringsmodeller og en skapende gud, ikke tror på det samme som
  81 vitenskapsfolk.  De kan ikke tro at den virkeligheten vi observerer
  82 eksisterer, virker likt overalt, og kan forstås med logikk og
  83 matematikk.  Mitt problem med å tro på på det samme, er at hvis
  84 disse forutsetningene ikke ligger til grunn, så er det ingen grenser
  85 for hva en kan komme opp med av ideer til hvordan virkeligheten
  86 fungerer.  Både Harry Potters magi, kreasjonistenes allmektige
  87 skaper, det flygende spagettimonsteret, Snåsamannens helbredelser,
  88 Haitis voodo, samenes ganding og middelalderens hekserier blir like
  89 gyldige.  Jeg tror ikke noen av disse er spesielt sannsynlige, og
  90 velger derfor å ta utgangspunkt i vitenskapens rammer for hvordan
  91 virkeligheten skal forstås.  For å sitere en reklamekampanje fra
  92 England: Vitenskap sender deg til månen.  Religion sender deg inn i
  93 skyskrapere.  Takke meg til en tur til månen.</p>
  94 </div>
  95   <div class="tags">
  96
  97
  98
  99    Tags: <a href="tags/norsk">norsk</a>, <a href="tags/vitenskap">vitenskap</a>.
 100
 101   </div>
 102  </div>
 103  <div class="padding"></div>
 104
 105  <div class="entry">
 106   <div class="title"><a href="F__rste_reprap_integreringsfors__k___Z_aksen_beveger_seg.html">Første reprap-integreringsforsøk - Z-aksen beveger seg</a></div>
 107   <div class="date">2009-03-19 22:15</div>
 108   <div class="body">
 109 <p>I går tok jeg mot til meg, og løste problemet med
 110 z-aksen ved å borre i delen som manglet feste mot tannjulet som
 111 skal drive z-aksereimen.  Dermed var det klart for å montere
 112 z-akse-akslingen på motoren og komme et steg videre med
 113 reprap-monteringen.  Prøvekjørte den i dag med
 114 testprogrammet til stepmotoren, og kunne glad konstatere at det hele
 115 fungerte.  I hvert fall når stepmotoren ikke forsøkte
 116 å snurre for raskt rundt.  Ved høy hastighet roterte
 117 ikke akslingen i det hele tatt.  Motoren ble bare stående
 118 å vibrere.  Usikker på hvorfor, men antar motoren ikke
 119 har nok kraft til å få hele akslingen til å
 120 rotere så raskt.  Denne øvelsen avslørte dog et
 121 annet problem med monteringen så langt.  Under testingen
 122 begynte skruer og muttere å ry ned fra ulike deler av
 123 reprap-konstruksjonen.  Jeg har ikke skrudd alt hard nok sammen til
 124 å tåle slike vibrasjoner.  Tror en 5-6 skruver og/eller
 125 muttere løsnet.  Brukte ganske lang tid på å
 126 finne ut hvor det manglet deler og skru ting sammen igjen.  Antar alt
 127 må strammes skikkelig til før første
 128 utskrift.</p>
 129
 130 <p>Neste steg er å få laget z-aksebåndet.  Der trenger jeg
 131 egnet lim og en konstruksjon for å klemme bandet sammen under
 132 limingen, som
 133 <a href="http://reprap.org/bin/view/Main/AssemblingDarwinMachinery#Z_belt">beskrevet
 134 på reprap-wikien</a>.  Er blitt tipset om svart superlim som er
 135 elastisk også etter at det tørket, og dro ned til Small Size
 136 Hobbyland på Lilletorget som skulle ha slikt, men da jeg var innom
 137 fikk jeg høre at de ikke lenger hadde slikt lim.  Må finne ut
 138 hvor i Oslo jeg kan skaffe slikt.  Kanskje Panduro har?  Vet ikke hva
 139 limet egentlig heter, så det er vanskelig å søke på nett.</p>
 140 </div>
 141   <div class="tags">
 142
 143
 144
 145    Tags: <a href="tags/3d-printer">3d-printer</a>, <a href="tags/norsk">norsk</a>, <a href="tags/nuug">nuug</a>, <a href="tags/reprap">reprap</a>.
 146
 147   </div>
 148  </div>
 149  <div class="padding"></div>
 150
 151  <div class="entry">
 152   <div class="title"><a href="Avisene_i_endring.html">Avisene i endring</a></div>
 153   <div class="date">2009-03-15 22:15</div>
 154   <div class="body">
 155 <p>Jeg kom over bloggposten
 156 "<a href="http://www.shirky.com/weblog/2009/03/newspapers-and-thinking-the-unthinkable/">Newspapers
 157 and Thinking the Unthinkable</a>" som jeg synes forklarer godt hva som
 158 skjer med aviser, og fikk meg til å tenke litt rundt andre utdøende
 159 forretningsmodeller basert på å løse problemer som ikke lenger
 160 eksisterer.  Det blir spennende å se hva vi ender opp med.</p>
 161 </div>
 162   <div class="tags">
 163
 164
 165
 166    Tags: <a href="tags/norsk">norsk</a>, <a href="tags/nuug">nuug</a>.
 167
 168   </div>
 169  </div>
 170  <div class="padding"></div>
 171
 172  <div class="entry">
 173   <div class="title"><a href="En_skam_at_det_ikke_finnes_ordrett_referat_fra_norske_domstoler.html">En skam at det ikke finnes ordrett referat fra norske domstoler</a></div>
 174   <div class="date">2009-03-13 18:00</div>
 175   <div class="body">
 176 <p>Advokatene jobber i disse dager hardt for å bli kvitt juryordningen
 177 fra norske domstoler.  Det har de forsåvidt jobbet med i mange år.
 178 Personlig tror jeg det er å starte i feil ende, og en dårlig ide.</p>
 179
 180 <p>Visst du at det ikke lages ordrett referat fra norske domstoler?
 181 Det er ingen som skriver ned alt som sies i en norsk rettsal slik en
 182 ser i TV-serier fra USA.  Det som publiseres er dommerens
 183 oppsummering, og alt som ikke blir med i den oppsummeringen er det
 184 vanskelig å få dokumentert i ettertid.  Konsekvensen er at en kan
 185 lyve så mye en vil fra vitneboksen uten å bli tatt for det i
 186 ettertid, hvis dommeren ikke syntes det som ble sagt var så
 187 interessant at det ble med i dokumentet som dokumenterer
 188 domsavsigelsen.  Mens alt som sies fra Stortingets talerstol er
 189 tilgjengelig på web etter kort tid for kontroll og kritikk, er det
 190 ingen tilsvarende mulighet for det som sies fra vitneboksen i en norsk
 191 domstol.  Kan dette føre til at en sak varer lengre enn nødvendig i
 192 rettssystemet?  Jeg tror det, og synes det er en skam at det ikke
 193 publiseres ordrette referater fra norske rettsaler.</p>
 194
 195 <p>En relatert observasjon er at det i utvalgte deler av landet
 196 eksperimenteres med lydopptak fra rettsalen, men disse opptakene er
 197 kun tilgjengelig for dommeren til hjelp når oppsummeringen skrives.
 198 Jeg synes som et minimum at disse lydopptakene som en regel burde vært
 199 publisert offentlig på web.</p>
 200 </div>
 201   <div class="tags">
 202
 203
 204
 205    Tags: <a href="tags/norsk">norsk</a>.
 206
 207   </div>
 208  </div>
 209  <div class="padding"></div>
 210
 211  <div class="entry">
 212   <div class="title"><a href="Testing_av_reprap_elektronikken_igang.html">Testing av reprap-elektronikken igang</a></div>
 213   <div class="date">2009-03-12 16:00</div>
 214   <div class="body">
 215 <p>Lenge siden det var en oppdatering av status for min 3D-skriver og
 216 i mellomtiden har det skjedd en god del.  Reprap-en er nesten ferdig
 217 montert, og elektronikken er også nesten ferdig loddet.  Det ser ut
 218 til at bits-from-bytes sitt byggesett versjon 2.01 hadde noen småfeil,
 219 der en del manglet og en annen hadde suboptimalt design.  Jeg løser
 220 antagelig det ene problemet med å borre noen ekstra hull til skruver i
 221 en plastdelen som trenger å festes.  Det andre problemet håper jeg å
 222 få hjelp fra Audun Vaaler ved Høgskolen i Østfold til å løse.
 223 Høgskolen er igang med å bygge en tilsvarende reprap i versjon 2.0, og
 224 er kommet litt lenger enn meg.  De kan forhåpentligvis skrive ut den
 225 delen jeg mangler på denne.</p>
 226
 227 <p>Når det gjelder elektronikken, så er mye allerede loddet sammen av
 228 min venn Anders Rosnes, som har mer peiling på elektronikk og lodding
 229 enn meg.  Jeg fikk i dag testet
 230 <a href="http://reprap.org/bin/view/Main/Stepper_Motor_Driver_1_1">stepper
 231 motordriveren (v1.1)</a>, og det fungerte.  Jeg møtte et lite problem
 232 med strømforsyningen, en standard ATX-strømforsyning som nektet å
 233 fungere før jeg hadde satt en ledning mellom GRD og PS_ON som
 234 beskrevet på
 235 <a href="http://dev.www.reprap.org/bin/view/Main/PCPowerSupply">reprap-sidene
 236 om PC-strømforsyninger</a>.  Jeg møtte også et annet problem med
 237 Arduino-programvaren.  Versjon 0013 fungerer visst ikke på
 238 Debian/Etch.  Den kompilerte binæren ble på 0 bytes.  En side jeg fant
 239 vha. et Google-søk
 240 <a href="http://www.arduino.cc/cgi-bin/yabb2/YaBB.pl?num=1234153046/5">tipset
 241 meg</A> om at en nedgradering
 242 til <a href="http://arduino.googlecode.com/files/arduino-0012-linux.tgz">versjon
 243 0012</a> kunne løse problemet, og endelig ser jeg motorakslingen
 244 snurre.  Nå er det å koble sammen mekanikk og elektronikk for å se om
 245 reprap-en kvikner til.</p>
 246 </div>
 247   <div class="tags">
 248
 249
 250
 251    Tags: <a href="tags/3d-printer">3d-printer</a>, <a href="tags/norsk">norsk</a>, <a href="tags/nuug">nuug</a>, <a href="tags/reprap">reprap</a>.
 252
 253   </div>
 254  </div>
 255  <div class="padding"></div>
 256
 257  <div class="entry">
 258   <div class="title"><a href="Frikanalen_og_jul_i_studentr__det.html">Frikanalen og jul i studentrådet</a></div>
 259   <div class="date">2009-03-11 23:40</div>
 260   <div class="body">
 261 <p>I går
 262 <a href="http://lists.nuug.no/pipermail/interesserte/2009-March/000387.html">lanserte</a>
 263 NUUGs videogruppe
 264 <a href="http://www.frikanalen.no">Frikanalen</a> med
 265 <a href="http://www.nuug.no/pub/video/frikanalen/frontpage.cgi">åpne
 266 standarder</a>, og resultatet av noen intense uker med arbeide kunne
 267 endelig presenteres.  Jeg har tro på åpen kanalkonseptet som
 268 Frikanalen er et eksempel på, der borgerne får anledning til å
 269 kringkaste sitt syn på en åpen og demokratisk måte.  Jeg er veldig
 270 glad vi har fått gjort kanalen tilgjengelig i Ogg Theora, slik at alle
 271 kan få tilgang til opptakene på web, og slipper å måtte installere MS
 272 Silverlight for å spille av opptakene.</p>
 273
 274 <p>Frikanalen har en brokete historie, og dagens inkarnasjon er ikke
 275 helt slik foreningen Åpen kanal planla det for mange år siden, noe som
 276 er bakgrunnen for at det fredag 13. mars 2009 kl 09:00 starter en
 277 rettsak i Oslo tingrett der Kringkasterforeningen (tidligere
 278 foreningen Åpen kanal) har saksøkt kulturdepartementet over
 279 konsesjonsvilkårene til Frikanalen.  Jeg er spent på resultatet.</p>
 280
 281 <p>I arbeidet med Frikanalen med åpne standarder, så har vi hatt glede
 282 av å se en rekke av innslagene som er tilgjengelig.  Her er mye
 283 religiøst sludder, fra
 284 <a href="http://www.nuug.no/pub/video/frikanalen/fetchvideo.cgi?videoId=720">vandring
 285 i jerusalem</a> via
 286 <a href="http://www.nuug.no/pub/video/frikanalen/fetchvideo.cgi?videoId=779">religiøst
 287 vinklede nyheter</a> til
 288 <a
 289 href="http://www.nuug.no/pub/video/frikanalen/fetchvideo.cgi?videoId=2077">kreasjonisk
 290 retorikk</a>, men også fine
 291 <a href="http://www.nuug.no/pub/video/frikanalen/fetchvideo.cgi?videoId=407">dokumentarer
 292 om redningsselskapet</a> og
 293 <a href="http://www.nuug.no/pub/video/frikanalen/fetchvideo.cgi?videoId=2204">interessante
 294 tegneserieanmeldelser</a>.  Det jeg derimot har hatt størst glede av,
 295 er
 296
 297 <a href="http://www.nuug.no/pub/video/frikanalen/fetchvideo.cgi?videoId=1556">jul
 298 i studentrådet</a>, der hver episode var en fest å se på.  Jeg håper
 299 NUUG lykkes med å få ut sine opptak med like stor suksess.</p>
 300 </div>
 301   <div class="tags">
 302
 303
 304
 305    Tags: <a href="tags/norsk">norsk</a>, <a href="tags/nuug">nuug</a>, <a href="tags/video">video</a>.
 306
 307   </div>
 308  </div>
 309  <div class="padding"></div>
 310
 311  <div class="entry">
 312   <div class="title"><a href="Lisensvalg_for_NUUG_opptakene_endelig_p___plass.html">Lisensvalg for NUUG-opptakene endelig på plass</a></div>
 313   <div class="date">2009-03-06 21:20</div>
 314   <div class="body">
 315 <p>Etter mange års meditasjon over temaet, har NUUG endelig klart å
 316 bestemme seg for hvilken lisens vi skal bruke på videoopptakene som
 317 gjøres av NUUGs videogruppe.  Ole Kristian har annonsert at lisensen
 318 blir <a href="http://creativecommons.org/licenses/by-sa/3.0/no/">Creative
 319 Commons Navngivelse-Del på samme vilkår 3.0 Norge</a>.  Jeg er veldig
 320 glad for at denne saken endelig er landet.  Lisensen for opptaket til
 321 Stallman-foredraget ble en annen pga. at lisensvalget ikke var avklart
 322 på forhånd og IFI og PING ønsket CC-BY-ND, og må ses på som et unntak
 323 i denne sammenhengen.</p>
 324 </div>
 325   <div class="tags">
 326
 327
 328
 329    Tags: <a href="tags/norsk">norsk</a>, <a href="tags/nuug">nuug</a>, <a href="tags/video">video</a>.
 330
 331   </div>
 332  </div>
 333  <div class="padding"></div>
 334
 335  <div class="entry">
 336   <div class="title"><a href="Teknisk_program_for_Go_Open_2009_er_nesten_ferdig.html">Teknisk program for Go Open 2009 er nesten ferdig</a></div>
 337   <div class="date">2009-03-05 22:30</div>
 338   <div class="body">
 339 <p>Etter lang tids jobbing begynner endelig programmet til det
 340 tekniske sporet på konferansen <a href="http://www.goopen.no/">Go Open
 341 2009</a> å bli ferdig.  Det blir 9 punkter på programmet, og etter alt
 342 å dømme blir det disse 9:</p>
 343
 344 <ul>
 345
 346 <li>"Open Telephony: A solution greater than the sum of its parts" med
 347   Jon "maddog" Hall</li>
 348 <li>OpenSolaris-relatert med Ian Murdock fra SUN</li>
 349 <li>"The inner workings of the OpenStreetmap project and the
 350   technology used" med Andy Allan </li>
 351 <li>Coreboot-relatert med Peter Stuge</li>
 352 <li>"Gratis værdata fra Meteorologisk institutt" med Trond Michelsen</li>
 353 <li>RRDtool/Nagios-relatert med Tobias Oetiker</li>
 354 <li>"Developers guide to server-side productivity and fun using open
 355   source platforms and frameworks" med en gjeng folk fra
 356   JavaBin-miljøet</li>
 357 <li>"G(et)it Nå!" med Marcus Ramberg</li>
 358 <li>Om kontrolltelling av valgresultater med fri programvare med Mitch
 359   Trachtenberg</li>
 360
 361 </ul>
 362
 363 <p>De siste bekreftelsene og overskrifter mangler og kommer
 364 forhåpentlig på plass før mandag, men jeg håper dette blir et program
 365 flere enn meg vil sette pris på.  Jeg gleder meg i hvert fall
 366 stort.</p>
 367 </div>
 368   <div class="tags">
 369
 370
 371
 372    Tags: <a href="tags/norsk">norsk</a>, <a href="tags/nuug">nuug</a>.
 373
 374   </div>
 375  </div>
 376  <div class="padding"></div>
 377
 378  <div class="entry">
 379   <div class="title"><a href="Checking_server_hardware_support_status_for_Dell__HP_and_IBM_servers.html">Checking server hardware support status for Dell, HP and IBM servers</a></div>
 380   <div class="date">2009-02-28 23:50</div>
 381   <div class="body">
 382 <p>At work, we have a few hundred Linux servers, and with that amount
 383 of hardware it is important to keep track of when the hardware support
 384 contract expire for each server.  We have a machine (and service)
 385 register, which until recently did not contain much useful besides the
 386 machine room location and contact information for the system owner for
 387 each machine.  To make it easier for us to track support contract
 388 status, I've recently spent time on extending the machine register to
 389 include information about when the support contract expire, and to tag
 390 machines with expired contracts to make it easy to get a list of such
 391 machines.  I extended a perl script already being used to import
 392 information about machines into the register, to also do some screen
 393 scraping off the sites of Dell, HP and IBM (our majority of machines
 394 are from these vendors), and automatically check the support status
 395 for the relevant machines.  This make the support status information
 396 easily available and I hope it will make it easier for the computer
 397 owner to know when to get new hardware or renew the support contract.
 398 The result of this work documented that 27% of the machines in the
 399 registry is without a support contract, and made it very easy to find
 400 them.  27% might seem like a lot, but I see it more as the case of us
 401 using machines a bit longer than the 3 years a normal support contract
 402 last, to have test machines and a platform for less important
 403 services.  After all, the machines without a contract are working fine
 404 at the moment and the lack of contract is only a problem if any of
 405 them break down.  When that happen, we can either fix it using spare
 406 parts from other machines or move the service to another old
 407 machine.</p>
 408
 409 <p>I believe the code for screen scraping the Dell site was originally
 410 written by Trond Hasle Amundsen, and later adjusted by me and Morten
 411 Werner Forsbring.  The HP scraping was written by me after reading a
 412 nice article in ;login: about how to use WWW::Mechanize, and the IBM
 413 scraping was written by me based on the Dell code.  I know the HTML
 414 parsing could be done using nice libraries, but did not want to
 415 introduce more dependencies.  This is the current incarnation:</p>
 416
 417 <pre>
 418 use LWP::Simple;
 419 use POSIX;
 420 use WWW::Mechanize;
 421 use Date::Parse;
 422 [...]
 423 sub get_support_info {
 424     my ($machine, $model, $serial, $productnumber) = @_;
 425     my $str;
 426
 427     if ( $model =~ m/^Dell / ) {
 428         # fetch website from Dell support
 429         my $url = "http://support.euro.dell.com/support/topics/topic.aspx/emea/shared/support/my_systems_info/no/details?c=no&amp;cs=nodhs1&amp;l=no&amp;s=dhs&amp;ServiceTag=$serial";
 430         my $webpage = get($url);
 431         return undef unless ($webpage);
 432
 433         my $daysleft = -1;
 434         my @lines = split(/\n/, $webpage);
 435         foreach my $line (@lines) {
 436             next unless ($line =~ m/Beskrivelse/);
 437             $line =~ s/&lt;[^>]+?>/;/gm;
 438             $line =~ s/^.+?;(Beskrivelse;)/$1/;
 439
 440             my @f = split(/\;/, $line);
 441             @f = @f[13 .. $#f];
 442             my $lastend = "";
 443             while ($f[3] eq "DELL") {
 444                 my ($type, $startstr, $endstr, $days) = @f[0, 5, 7, 10];
 445
 446                 my $start = POSIX::strftime("%Y-%m-%d",
 447                                             localtime(str2time($startstr)));
 448                 my $end = POSIX::strftime("%Y-%m-%d",
 449                                           localtime(str2time($endstr)));
 450                 $str .= "$type $start -> $end ";
 451                 @f = @f[14 .. $#f];
 452                 $lastend = $end if ($end gt $lastend);
 453             }
 454             my $today = POSIX::strftime("%Y-%m-%d", localtime(time));
 455             tag_machine_unsupported($machine)
 456                 if ($lastend lt $today);
 457         }
 458     } elsif ( $model =~ m/^HP / ) {
 459         my $mech = WWW::Mechanize->new();
 460         my $url =
 461             'http://www1.itrc.hp.com/service/ewarranty/warrantyInput.do';
 462         $mech->get($url);
 463         my $fields = {
 464             'BODServiceID' => 'NA',
 465             'RegisteredPurchaseDate' => '',
 466             'country' => 'NO',
 467             'productNumber' => $productnumber,
 468             'serialNumber1' => $serial,
 469         };
 470         $mech->submit_form( form_number => 2,
 471                             fields      => $fields );
 472         # Next step is screen scraping
 473         my $content = $mech->content();
 474
 475         $content =~ s/&lt;[^>]+?>/;/gm;
 476         $content =~ s/\s+/ /gm;
 477         $content =~ s/;\s*;/;;/gm;
 478         $content =~ s/;[\s;]+/;/gm;
 479
 480         my $today = POSIX::strftime("%Y-%m-%d", localtime(time));
 481
 482         while ($content =~ m/;Warranty Type;/) {
 483             my ($type, $status, $startstr, $stopstr) = $content =~
 484                 m/;Warranty Type;([^;]+);.+?;Status;(\w+);Start Date;([^;]+);End Date;([^;]+);/;
 485             $content =~ s/^.+?;Warranty Type;//;
 486             my $start = POSIX::strftime("%Y-%m-%d",
 487                                         localtime(str2time($startstr)));
 488             my $end = POSIX::strftime("%Y-%m-%d",
 489                                       localtime(str2time($stopstr)));
 490
 491             $str .= "$type ($status) $start -> $end ";
 492
 493             tag_machine_unsupported($machine)
 494                 if ($end lt $today);
 495         }
 496     } elsif ( $model =~ m/^IBM / ) {
 497         # This code ignore extended support contracts.
 498         my ($producttype) = $model =~ m/.*-\[(.{4}).+\]-/;
 499         if ($producttype &amp;&amp; $serial) {
 500             my $content =
 501                 get("http://www-947.ibm.com/systems/support/supportsite.wss/warranty?action=warranty&amp;brandind=5000008&amp;Submit=Submit&amp;type=$producttype&amp;serial=$serial");
 502             if ($content) {
 503                 $content =~ s/&lt;[^>]+?>/;/gm;
 504                 $content =~ s/\s+/ /gm;
 505                 $content =~ s/;\s*;/;;/gm;
 506                 $content =~ s/;[\s;]+/;/gm;
 507
 508                 $content =~ s/^.+?;Warranty status;//;
 509                 my ($status, $end) = $content =~ m/;Warranty status;([^;]+)\s*;Expiration date;(\S+) ;/;
 510
 511                 $str .= "($status) -> $end ";
 512
 513                 my $today = POSIX::strftime("%Y-%m-%d", localtime(time));
 514                 tag_machine_unsupported($machine)
 515                     if ($end lt $today);
 516             }
 517         }
 518     }
 519     return $str;
 520 }
 521 </pre>
 522
 523 <p>Here are some examples on how to use the function, using fake
 524 serial numbers.  The information passed in as arguments are fetched
 525 from dmidecode.</p>
 526
 527 <pre>
 528 print get_support_info("hp.host", "HP ProLiant BL460c G1", "1234567890"
 529                        "447707-B21");
 530 print get_support_info("dell.host", "Dell Inc. PowerEdge 2950", "1234567");
 531 print get_support_info("ibm.host", "IBM eserver xSeries 345 -[867061X]-",
 532                        "1234567");
 533 </pre>
 534
 535 <p>I would recommend this approach for tracking support contracts for
 536 everyone with more than a few computers to administer. :)</p>
 537
 538 <p>Update 2009-03-06: The IBM page do not include extended support
 539 contracts, so it is useless in that case.  The original Dell code do
 540 not handle extended support contracts either, but has been updated to
 541 do so.</p>
 542 </div>
 543   <div class="tags">
 544
 545
 546
 547    Tags: <a href="tags/english">english</a>, <a href="tags/nuug">nuug</a>.
 548
 549   </div>
 550  </div>
 551  <div class="padding"></div>
 552
 553  <div class="entry">
 554   <div class="title"><a href="Using_bar_codes_at_a_computing_center.html">Using bar codes at a computing center</a></div>
 555   <div class="date">2009-02-20 08:50</div>
 556   <div class="body">
 557 <p>At work with the University of Oslo, we have several hundred computers
 558 in our computing center.  This give us a challenge in tracking the
 559 location and cabling of the computers, when they are added, moved and
 560 removed.  Some times the location register is not updated when a
 561 computer is inserted or moved and we then have to search the room for
 562 the "missing" computer.</p>
 563
 564 <p>In the last issue of Linux Journal, I came across a project
 565 <a href="http://www.libdmtx.org/">libdmtx</a> to write and read bar
 566 code blocks as defined in the
 567 <a href="http://en.wikipedia.org/wiki/Data_Matrix">The Data Matrix
 568 Standard</a>.  This is bar codes that can be read with a normal
 569 digital camera, for example that on a cell phone, and several such bar
 570 codes can be read by libdmtx from one picture.  The bar code standard
 571 allow up to 2 KiB to be written in the tag.  There is another project
 572 with <a href="http://www.terryburton.co.uk/barcodewriter/">a bar code
 573 writer written in postscript</a> capable of creating such bar codes,
 574 but this was the first time I found a tool to read these bar
 575 codes.</p>
 576
 577 <p>It occurred to me that this could be used to tag and track the
 578 machines in our computing center.  If both racks and computers are
 579 tagged this way, we can use a picture of the rack and all its
 580 computers to detect the rack location of any computer in that rack.
 581 If we do this regularly for the entire room, we will find all
 582 locations, and can detect movements and removals.</p>
 583
 584 <p>I decided to test if this would work in practice, and picked a
 585 random rack and tagged all the machines with their names.  Next, I
 586 took pictures with my digital camera, and gave the dmtxread program
 587 these JPEG pictures to see how many tags it could read.  This worked
 588 fairly well.  If the pictures was well focused and not taken from the
 589 side, all tags in the image could be read.  Because of limited space
 590 between the racks, I was unable to get a good picture of the entire
 591 rack, but could without problem read all tags from a picture covering
 592 about half the rack.  I had to limit the search time used by dmtxread
 593 to 60000 ms to make sure it terminated in a reasonable time frame.</p>
 594
 595 <p>My conclusion is that this could work, and we should probably look
 596 at adjusting our computer tagging procedures to use bar codes for
 597 easier automatic tracking of computers.</p>
 598 </div>
 599   <div class="tags">
 600
 601
 602
 603    Tags: <a href="tags/english">english</a>, <a href="tags/nuug">nuug</a>.
 604
 605   </div>
 606  </div>
 607  <div class="padding"></div>
 608
 609  <p style="text-align: right;"><a href="index.rss"><img src="xml.gif" alt="RSS feed" width="36" height="14"></a></p>
 610
 611 <div id="sidebar">
 612
 613
 614
 615
 616
 617 <h2>Archive</h2>
 618 <ul>
 619
 620 <li>2009
 621 <ul>
 622
 623 <li><a href="archive/2009/01/">January (8)</a></li>
 624
 625 <li><a href="archive/2009/02/">February (8)</a></li>
 626
 627 <li><a href="archive/2009/03/">March (8)</a></li>
 628
 629 </ul></li>
 630
 631 <li>2008
 632 <ul>
 633
 634 <li><a href="archive/2008/11/">November (5)</a></li>
 635
 636 <li><a href="archive/2008/12/">December (7)</a></li>
 637
 638 </ul></li>
 639
 640 </ul>
 641
 642
 643
 644 <h2>Tags</h2>
 645 <ul>
 646
 647  <li><a href="tags/3d-printer">3d-printer (9)</a></li>
 648
 649  <li><a href="tags/amiga">amiga (1)</a></li>
 650
 651  <li><a href="tags/aros">aros (1)</a></li>
 652
 653  <li><a href="tags/debian">debian (3)</a></li>
 654
 655  <li><a href="tags/debian edu">debian edu (4)</a></li>
 656
 657  <li><a href="tags/english">english (6)</a></li>
 658
 659  <li><a href="tags/fiksgatami">fiksgatami (1)</a></li>
 660
 661  <li><a href="tags/ltsp">ltsp (1)</a></li>
 662
 663  <li><a href="tags/multimedia">multimedia (2)</a></li>
 664
 665  <li><a href="tags/norsk">norsk (30)</a></li>
 666
 667  <li><a href="tags/nuug">nuug (26)</a></li>
 668
 669  <li><a href="tags/personvern">personvern (3)</a></li>
 670
 671  <li><a href="tags/reprap">reprap (9)</a></li>
 672
 673  <li><a href="tags/rss">rss (1)</a></li>
 674
 675  <li><a href="tags/stavekontroll">stavekontroll (1)</a></li>
 676
 677  <li><a href="tags/video">video (5)</a></li>
 678
 679  <li><a href="tags/vitenskap">vitenskap (1)</a></li>
 680
 681  <li><a href="tags/web">web (2)</a></li>
 682
 683 </ul>
 684
 685 </div>
 686
 687 <p style="text-align: right">
 688 Created by <a href="http://steve.org.uk/Software/chronicle">Chronicle v3.5</a>
 689 </p>
 690 </body>
 691 </html>