X-Git-Url: http://git.jankratochvil.net/?a=blobdiff_plain;f=resume%2FResume-JanKratochvil.html.pl;h=c2f2f249874346981ff79cc0704c5ea4011924d1;hb=9168af70c86737082181f8dc2b5d0f6cf170025e;hp=778dd8966d3d8067d8747a956b8f3ee82bb4b014;hpb=0edd948423724efb89960a77b87df3cb4755f870;p=www.jankratochvil.net.git diff --git a/resume/Resume-JanKratochvil.html.pl b/resume/Resume-JanKratochvil.html.pl index 778dd89..c2f2f24 100755 --- a/resume/Resume-JanKratochvil.html.pl +++ b/resume/Resume-JanKratochvil.html.pl @@ -47,12 +47,15 @@ A[href].project { text-decoration: underline; } .platform { font-style: italic; white-space: nowrap; } table.referees td.com { text-align: center; } .techs { white-space: nowrap; } +caption { caption-side: top; } +table.jobs td { padding: 1ex; } ", "args_check"=>{ "referees"=>'', # Do not bother with '^(?:(?i)referees)?$' "print"=>'^(?:print)?$', }, ); +$W->{"args"}{"Wabs"}=1; My::Web->heading(); @@ -73,7 +76,18 @@ my $project=sub { my($name,%args)=@_; - return &{$projectref}($name).($args{"bare"} ? '' : ': '.$item{$name}{"summary"}); + my $r=&{$projectref}($name); + if (!$args{"bare"}) { + my $summary=$item{$name}{"summary"}; + $summary=~s#(?:]*>|)##gi; # if $args{"unhref"}; + if (!$args{"parenthesis"}) { + $r.=": $summary"; + } + else { + $r.=" ($summary)"; + } + } + return $r; }; my $free_projects=sub (@) @@ -121,7 +135,7 @@ my $now=(localtime())[5]+1900; print <<"HERE";
+ @{[ img "/resume/Resume-JanKratochvil-face","face" ]} @@ -129,9 +143,8 @@ print <<"HERE"; - - + + @@ -143,97 +156,105 @@ print <<"HERE"; @{[ vskip "3ex" ]} -
- @{[ img "/resume/Resume-JanKratochvil","face" ]} Name Jan Kratochvil
English technical: fluent, general: communicable
Born 1979
Status single
Licensesmotorcycle, car
eMail $mailme
WWW @{[ a_href('http://www.jankratochvil.net/') ]}
Resume @{[ a_href('http://www.jankratochvil.net/resume/') ]}
- [ @{[ a_href('/resume/Resume-JanKratochvil.txt','plain text') ]} ]
Projects@{[ a_href('http://www.jankratochvil.net/project/') ]}
Resume @{[ a_href('http://www.jankratochvil.net/resume/') ]}
OpenPGP @{[ a_href '/pgp-JanKratochvil.txt','' .'pub 1024D/44FC7632 2002-10-07 Jan Kratochvil <pgp-44FC7632@jankratochvil.net>
' .'sub 2048g/D9F5F44B 2002-10-07 [expires 2004-10-06]' ]}
- - - - - - - - - - - - - - - - - - - - +
2002 @{[ a_href('http://www.atspraha.cz/','Advanced Telecom Services') ]}MMS framework client via @{[ a_href('http://www.eurotel.cz/site/en/home/','EuroTel') ]} GSM operator - (GSM MMS, Perl, XML, SOAP)
- subtasks @{[ a_href "/etmms/",'MMS center debugging',"attr"=>'class="project"' ]}, - @{[ &$project('etherealmmse',"bare"=>1) ]}, @{[ &$project('etherealwsp',"bare"=>1) ]}
2002 @{[ a_href('http://www.jklabs.cz/','JKLabs') ]}@{[ &$project('middleman') ]} - for hotel system @{[ techs 'C, BSD, HTTP' ]}
2002 @{[ a_href('http://www.jklabs.cz/','JKLabs') ]}@{[ &$project('ssht') ]}
2002 @{[ a_href('http://www.readynote.com/','ReadyNote') ]}@{[ a_href 'http://www.mwiacek.com/gsm/gammu/gammu.html','mygnokii' ]} - @{[ a_href 'http://www.jankratochvil.net/priv/gnokii/mygnokii-0.3.3_pre8-gold_2002_03_10--uClinux2002_03_17_23_03/', - 'port to embedded' ]} $uClinux, - @{[ a_href 'http://www.nokiausa.com/phones/5190/1,1162,,00.html','Nokia 5190' ]} - @{[ a_href 'http://www.jankratochvil.net/priv/gnokii/mygnokii-0.3.3_pre8-gold_2002_02_24-decodefile/', - 'sw-modem debugging' ]} - @{[ techs 'GSM, Nokia, uClinux' ]}
2001 @{[ a_href('http://www.readynote.com/','ReadyNote') ]}@{[ &$project('mdsms') ]} port to embedded $uClinux - @{[ techs 'GSM, Nokia, uClinux' ]}
2001 @{[ a_href('http://www.netcentrum.cz/','NetCentrum') ]}@{[ a_href 'http://www.gnokii.org/','gnokii' ]} - @{[ a_href 'http://www.jankratochvil.net/priv/gnokii/gnokii-0.4.0pre1_lace2001_11_14_01_netcentrum.diff', - 'driver for custom SMS gateway protocol' ]} @{[ techs 'C' ]}
2001 @{[ a_href('http://www.atspraha.cz/','Advanced Telecom Services') ]}@{[ &$project('gsmperl') ]} @{[ techs 'Perl, GSM EMS' ]}
2001 @{[ a_href('http://www.atspraha.cz/','Advanced Telecom Services') ]}@{[ a_href 'http://www.gnokii.org/','gnokii' ]} - @{[ a_href 'http://www.jankratochvil.net/priv/gnokii/gnokii-lace-2001-11-17-01.tar.gz', - 'driver for SMS gateway' ]} - of GSM operator @{[ a_href('http://www.eurotel.cz/','EuroTel') ]} - (C, PostgreSQL)
2001 @{[ a_href('http://www.atspraha.cz/','Advanced Telecom Services') ]}@{[ &$project('mdsms') ]} - update for - @{[ a_href 'http://www.transportdata.de/html/produkte/siemens_m20t.php?lang=en', - 'Siemens M20' ]} - @{[ techs 'C, GSM PDU' ]}
2001 @{[ a_href('http://www.gtsgroup.cz/','GTS') ]}@{[ &$project('tac_plus') ]} @{[ techs 'C, Cisco TACACS+' ]}
- subtask @{[ &$project('mod_auth_tacacs') ]} @{[ techs 'C, Cisco TACACS+' ]}
+ + + + + + + - - - - - + + + + + @{[ a_href 'http://www.antlimited.com/products/fresco.htm','Fresco' ]}
+ Ad hoc technical support challenges such as i386 IRQ redirector, + @{[ &$project('middleman',"parenthesis"=>1,"unhref"=>1) ]} or @{[ &$project('ssht',"parenthesis"=>1,"unhref"=>1) ]}. + + + - - - - - + + + - + -
Contractor Jobs
DateClientDescription
2002-2003- (freelance project)@{[ &$project('captive') ]} (14 months)
+ Project required analysing portions of 80MB+ i386 disassembly dumps of MS-Windows XP kernel and ntfs.sys + to achieve the first binary compatible reimplementation of the required undocumented XP kernel subsystems.
+ Written @{[ &$project('TraceFS') ]} as native W32 kernel hooking driver for run-time analysis of the NT Cache Manager + XP kernel subsystem.
+ GNU/Linux part required integration and extensions of + @{[ a_href 'http://lufs.sourceforge.net/lufs/','LUFS' ]} (Linux Userland File System) + to transparently connect the UNIX userland based MS-Windows kernel filesystem isolated by the CORBA/ORBit interface. +
2001-2002@{[ a_href('http://www.atspraha.cz/','Advanced Telecom Services') ]}Mobile technologies +
    +
  • MMS framework client via EuroTel GSM operator + by technologies GSM MMS, Perl, XML, SOAP (3 months, still maintained)
    + Project included + @{[ a_href "/etmms/",'pilot MMS Center debugging',"attr"=>'class="project"' ]} with + Ethereal (@{[ a_href 'http://www.ethereal.com','external link' ]}), fixes of Ethereal + (@{[ a_href '/project/etherealmmse/','1' ]}, @{[ a_href '/project/etherealwsp/','2' ]}). +
    • +
  • Multimedia EMS support implemented by @{[ &$project('gsmperl',"bare"=>1) ]}
    • +
  • Implementation of protocol BIP (based on Nokia CIMD2 protocol) for GSM SMS Center direct communication + by extending gnokii (@{[ a_href 'http://www.gnokii.org/','external link' ]}) + for EuroTel GSM operator (still in use)
    • +
+
1999-2000@{[ a_href('http://www.suse.com/','SuSE') ]}@{[ &$project('surprise') ]} @{[ techs 'C, Gnome, m4' ]}
- subtask @{[ &$project('int13sniff') ]}
- subtask @{[ &$project('gladewsrc') ]}
1999 @{[ a_href('http://www.jklabs.cz/','JKLabs') ]}IRQ redirector for legacy devices @{[ techs 'i386 asm' ]}
1999-$now@{[ a_href('http://www.jklabs.cz/','JKLabs') ]}sysadmin GNU/Linux and FreeBSD, techsupport: GuestNET, + @{[ &$project('surprise') ]} (15 months)
+ Project was completed as a team work. The code is based on Gnome technologies. + As one of the subtasks to keep system bootability I implemented @{[ &$project('int13sniff',"bare"=>1) ]} + to ease Microsoft boot loaders disassembly across partition modifications. +
2001-2002@{[ a_href('http://www.readynote.com/','ReadyNote') ]}Mobile technologies for embedded devices +
    +
  • Completed debugging of gnokii (@{[ a_href 'http://www.gnokii.org/','external link' ]}) GSM software modem + for Nokia 5190
    • +
  • Port of gnokii and my @{[ &$project('mdsms',"parenthesis"=>1) ]} to embedded + uClinux (@{[ a_href 'http://www.uclinux.org/','external link' ]})
    • +
+
1999-2003@{[ a_href('http://www.jklabs.cz/','JKLabs') ]}System administration of GNU/Linux and FreeBSD, techsupport: GuestNET, @{[ a_href 'http://www.2m.dk/web/html_version/eclipse/eclipse.html','Eclipse' ]}, @{[ a_href 'http://www.globaloop.com/','GlobaLoop' ]}, - @{[ a_href 'http://www.antlimited.com/products/fresco.htm','Fresco' ]}
2001 @{[ a_href('http://www.gtsgroup.cz/','GTS') ]}@{[ &$project('tac_plus') ]} (3 months)
1999 @{[ a_href('http://www.unicom-prague.cz/','Unicom') ]} Technical translations from English
1999 @{[ a_href('http://www.geoinvest.cz/','Geoinvest') ]}@{[ &$project('332') ]} @{[ techs 'M680x0 asm, C' ]}
- subtask @{[ &$project('mot2as') ]}
1999 @{[ a_href('http://www.tencom.cz/','TENcom Trade') ]}@{[ a_href "/project/mdsms/","MobilDock SMS Tool","attr"=>'class="project"' ]} @{[ techs 'GSM/PDU' ]}
1998-1999@{[ a_href('http://www.geoinvest.cz/','Geoinvest') ]}@{[ a_href 'http://members.tripod.com/Stelios_Cellar/GSM/m1module.htm','Siemens M1' ]} - GSM modem daemon, client/server, remote GSM terminals @{[ techs 'C, GSM, GPS, S-Lang' ]}
- GPLed subtask @{[ &$project('vblib') ]} @{[ techs 'C' ]}
Mobile technologies, embedded devices +
    +
  • @{[ &$project('332') ]}
    • +
  • Siemens M1 GSM modem daemon for GPS, client/server setup, remote GSM terminals
    • +
+
1999 @{[ a_href('http://www.tencom.cz/','TENcom Trade') ]}Mobile technologies +
    +
  • @{[ a_href "/project/mdsms/","MobilDock SMS Tool","attr"=>'class="project"' ]}: + SMS communication software for Digital UNIX (2 months)
    • +
+
1998 @{[ a_href('http://www.elsa-online.org/',"European Law Students' Association") ]}@{[ &$project('step') ]} @{[ techs 'PHP, PostgreSQL' ]}
- subtasks @{[ &$project('phphash',"bare"=>1) ]}, @{[ &$project('pgsqlsubstr',"bare"=>1) ]}
@{[ &$project('step') ]}, requirement for fixes of + @{[ a_href "/project/phphash/","PHP","attr"=>'class="project"' ]} and + @{[ a_href "/project/pgsqlsubstr/","PostgreSQL","attr"=>'class="project"' ]}
1993-1996Profes J&K PC assembly and customer service
1993 @{[ a_href('http://www.japhila.cz/index_en.htm','Japhila') ]} StampMan: Database application @{[ techs 'MS-DOS: Pascal, plainTeX' ]}
Contractor Jobs
@{[ vskip "1ex" ]} - - @{[ &{$reference}('wcehrgg(ng)ernqlabgr.pbz','Jim Pruett') ]} + @{[ &{$reference}('zvpuny.ubenx(ng)ngfcenun.pm','Michal Horak') ]} - - @{[ &{$reference}('Zvpunry.Znprx(ng)tgftebhc.pm','Michael Macek') ]} + + @{[ &{$reference}('wcehrgg(ng)ernqlabgr.pbz','Jim Pruett') ]} @{[ &{$reference}('wna.xbyne(ng)wxynof.pm','Jan Kolar') ]} + + @{[ &{$reference}('Zvpunry.Znprx(ng)tgftebhc.pm','Michael Macek') ]} @{[ &{$reference}('erprcpr(ng)havpbz-centhr.pm','Valerie Bernardova') ]} - - @{[ &{$reference}('grfne(ng)grapbz.pm','Petr Tesar') ]} @{[ &{$reference}('ohgna(ng)trbvairfg.pm','Lubor Otta') ]} + + @{[ &{$reference}('grfne(ng)grapbz.pm','Petr Tesar') ]} @{[ &{$reference}('wnavx(ng)wncuvyn.pbz','Bretislav Janik') ]} HERE @@ -253,12 +274,12 @@ HERE } print <<"HERE"; -
@{[ a_href('http://www.readynote.com/','ReadyNote') ]}
Contractor Jobs Referees (reversed chronological order)
@{[ a_href('http://www.atspraha.cz/','Advanced Telecom Services') ]}
@{[ a_href('http://www.gtsgroup.cz/','GTS') ]}
@{[ a_href('http://www.readynote.com/','ReadyNote') ]}
@{[ a_href('http://www.jklabs.cz/','JKLabs') ]}
@{[ a_href('http://www.gtsgroup.cz/','GTS') ]}
@{[ a_href('http://www.unicom-prague.cz/','Unicom') ]}
@{[ a_href('http://www.tencom.cz/','TENcom Trade') ]}
@{[ a_href('http://www.geoinvest.cz/','Geoinvest') ]}
@{[ a_href('http://www.tencom.cz/','TENcom Trade') ]}
@{[ a_href('http://www.japhila.cz/index_en.htm','Japhila') ]}
Contractor Jobs Referees (reversed chronological order)
@{[ vskip "2ex" ]} + @@ -269,6 +290,7 @@ print <<"HERE"; @{[ vskip "2ex" ]}
Awards
1997Bronze medal in the International Olympiad in Informatics, South Africa - Cape Town
19972nd in an MO-P national contest - mathematics Olympiad, the programming category
19971st in the International Competition in Programming
+ @@ -288,7 +310,29 @@ print <<"HERE"; - +
Experience Summary
Major Areas mobile technologies, filesystems, embedded devices
Platforms GNU/Linux/i386/UNIX/FreeBSD, W32 kernel, Amiga/680x0, MS-DOS, ZX Spectrum, handheld PC-E500S
Protocols GSM SMS/PDU/Nokia Smart Messaging/EMS/MMS/SMIL/WAP/WSP/AMR/ETSI stds/3GPP stds, IPv4, HTTP, SMTP/RFC822/MIME, FTP, SSH, DHCP, POP3, NFSv2, PPP/LCP/IPCP,...
Filesystems ext2, FAT, AmigaFFS, ISO-9660
Each technology involved in at least one of my past projects.
+ +@{[ vskip "2ex" ]} + + + + + + + +HERE + my @platforms=@My::Project::platforms; + while (@platforms) { + my $platform_sym =shift @platforms; + my $platform_name=shift @platforms; + print ""; + print ''; + print ''; + print "\n"; + } +print <<"HERE";
My Own Free Projects
+ Detailed listing available at: @{[ a_href 'http://www.jankratochvil.net/projects/' ]} +
PlatformAvailable Free Projects
'.a_href('/project/#'.$platform_sym,$platform_name).''.&{$free_projects}($platform_sym).'
HERE