Milé malé WTF

7.9.2006 11:04 | Přečteno: 1727× | sw |

Demence lidstva v kostce. Zvláštní věci mezi nebem a zemí se občas stávají. A to včetně situací mezi programátory, čili developery, jak se jim dnes říká. Vlastně má dnešní událost na svědomí nejspíše nějaký senior solution architect. Připravte si křupínky, zázvorové pivo a nechte se kolébat na vlnách stupidity.

Většina z vás, milé čtenářstvo, jistě zná The Daily WTF, kde zoufalí lidé od počítačů hledají uklidnění, a kde se baví na učet jiných. Dnes, respektive včera v noci jsem objevil podobnou věc.

Varování: podobnost kódu s tím, jaký jsi napsal právě ty, Karlíku (nebo Toníku), je čistě náhodná a v případě jakýchkoli problému vše zapřu, anebo budu tvrdit, že jsem si vše vymyslel. Klidně na počkání.

Jména objektů, proměnných jsem změnil, formátování a komentáře zanechal. A nyní – náš dramatický příběh začíná…

Za mlhou, která by se dala krájet, a ještě mnohem dále, než je rybníček Brčálník, leží království, nad nímž nekolik staletí slunce nezapadalo. Jedno z posledních království Evropské Unie. V něm jedna firma píše velice enterprise informační systémy za velice enterprice ceny.

Shodou pekelných okolností se mi do rukou dostal kód, který napsal jeden ze zaměstnanců oné společnosti, a který teď musí udržovat jeden kamarád, jak už to tak ve smutných příbězích bývá. Tento kód dokazuje, že i mezi Oracle databázovými specialisty jsou polodementní individua, jaká známe ze zapovězených a temných oblastí tečka síť a káva.

desc a_very_huge_one;
Name      Null     Type
--------- -------- ------------
TRANID    NOT NULL NUMBER
DTIME              DATE
VAL01              VARCHAR2(30)
VAL02              VARCHAR2(30)
VAL03              VARCHAR2(30)
VAL04              VARCHAR2(30)
VAL05              VARCHAR2(30)
... vypuštěno dalších 62 sloupců. Hádejte jak s jmenují.

69 rows selected

Ponechme stranou zprasené pojmenování sloupců, to dnes není důležité, perla teprve přichází ve fragmentu PACKAGE:

...
    -- type for table A_VERY_HUGE_ONE row
    TABTYPE IS RECORD(
    TRANID NUMBER,
    DTIME DATE,
    VAL01 VARCHAR2(30),
    VAL02 VARCHAR2(30),
    VAL03 VARCHAR2(30),
    VAL04 VARCHAR2(30),
    ... opět vyhozené nějaké řádky ...
    VAL67 VARCHAR2(30));

...

    FUNCTION A_VERY_STRANGE_ONE(DATEFROM DATE) RETURN VARCHAR2 AS
        TABROW TABTYPE;
        PRAGMA AUTONOMOUS_TRANSACTION;
    BEGIN
        -- perform select from table
        SELECT *
        INTO TABROW
        FROM A_VERY_HUGE_ONE
        WHERE DTIME=DATEFROM AND
        ROWNUM=1
        ORDER BY TRANID DESC;
        -- return val02 value
        RETURN TABROW.VAL02;
        -- rollback the transaction
        ROLLBACK;
    EXCEPTION
        WHEN OTHERS THEN
        -- return an empty string
            ROLLBACK;
            RETURN '';
    END;
...

I teď, přestože na tanto hnůj koukám na šestistý pokus, nevím, jestli mám plakat, smát se anebo blít, drahý Ivánku. Také nevím, co je v té arcimrdce nejsmutnější. Jestli to, že původní autor zřejmě znal pár věcí, uměl třeba nadefinovat RECORD a uměl napsat pragmu, ale zřejmě vůbec netušil, co to dělá. Nebo jestli to, že je ten selekt naprosto na hovno, protože zjevně nedělá to, co má. Nebo jestli ty pochybné ROLLBACKY. Anebo ignorace ROWTYPE – třeba byl placen za počet znaků které napsal. Nebo jak krásně okomentoval kód, což zřejmě kdesi zaslechl, že se to má dělat… Nemluvme o tom, že ta tabulka má asi 600MB a na sloupci DTIME není index, ani žádne partyšny – na druhou strani je pak výstup z explainu velmi prostý a přečte jej i retardované vemeno. Neříkám ale, že pochopí.

Kontrolní otázka za 2 body: co se asi stane, když se daná tabulka musí rozšířit o jeden sloupec? Aneb ukázka kouzla "select * into" v celé své hrdé kráse.

Odhoďme filozofické otázky "proč tu jsme? Jaký je účel našeho života?" Jsou zbytečné. Účelem života takových lidí je pouze zbůhdarma promrhat kyslík ostatním a sežrat tuny pizzy, kterou si musí nechat vozit do openspace, kde sedí do devíti večer, protože si hodiny ošoupávají prsty psaním RECORDů. Vý-teč-ně, už se mi znovu vaří krev a oči se podlévají krví. Vraždil bych. K smrti rád.

       

Anketa

Anketa

Komentáře

[zabza]

Přidáš sloupeček a ... taková funkce co vrací NULL se vždycky hodi

No ta sranda s ROWNUM a ORDER BY ... existuje někdo kdo se na tomhle aspoň jendou nespálil?

[s0]

hehehe, podle mne neexistuje. Se slzou v oku vzpomínám, jak jsme se na tom nechali nachytat ve třech lidech. Přepisovali jsme pak asi šest baliků, a to velice rychle a se studem.

[Kyosuke]

Třeba já, používám Firebird… :-p

[wake]

treba ja, pouzivam manual.

[xvasek]

V MSSQL ROWNUM radši ani není, musí se to složitě emulovat. (Nebo neumím hledat.)

[s0]

neni tam TOP? anebo si to nejak tak pamatuju z dob mssql6

[zabza]

... je, a překvapivě se vyhodnocuje až po ORDER BY Ale to jde použít samozřejmě jen když má ROWNUM sloužit k omezení počtu řádků výsledku...

[Kyosuke]

Hmm, k čemu jinému by mělo sloužit? K pseudonáhodnému výběru záznamů, které se v dalším kroku úhledně seřadí?

[zabza]

Vy jste nikdy nepoužil ROWNUM k něčemu jinému? To bych měl někde vyhrabat jedno view, co jsem kdysi spáchal, a bylo opravdu ošklivé (šlo o něco jako že jsem potřeboval join mezi sudýma řádkama v jedné tabulce s lichýma ve druhé ... ale neptejte se proč, to si teda vážně nepamatuju).

[Kyosuke]

Zaprvé nejsem oraclista, zadruhé, jak může (bez explicitního řazení) relační databáze zaručit, které řádky budou liché a které sudé?

[zabza]

samozřejmě, šlo o sudé a liché řádky v explicitním řazení

[xvasek]

Top je podle toho, co umí rownum, jenom dětské prdění do vody...

[wake]

select * from tabulka where rownum > 1;

[Kyosuke]

Ano, to je opravdu konstrukce, bez které by se celý Oracle sesypal jako domeček z karet… (Zdá se mi to, nebo jsou oraclisti podobně nepříjemná sekta, jako javisti? )

[s0]

ne, ne, ne! Oraclisti jsou krásní, chytří a všeobecně oblíbení, zatímco Javisti jsou zlí, bijí koťátka a dupou po karafiátech.

[Kyosuke]

Ach, děkuji za vysvětlení, švarný junáku, tápal jsem dosud v temnotách…

[clayman]

Bohuzel nejsem databazista a SQL neznam, takze vtip mi utekl.

[Josef Kufner]

To nevadí, patlat prasečinky lze v čemkoliv. V poslední době mě dostal kus php, kde vytáh všecky řádky z db a za tím následoval foreach, kde to prasátko víceméně emulovalo WHERE a možná i JOIN ...

[Daniel Kvasnička ml.]

S db nepracuju tak casto, abych mel chut to cist do konce, ale za anketu jsem ti dal hodnoceni 3

[xxxxxxxx]

CHCEME VÍC NEJCHYTŘEJŠÍCH KECŮ!!!!! VÍC!!!! VÍC!!!!!!!

[wake]

to je jasny. job security. z tohohle _nikdo_ nepozna, co to vlastne ma delat. autor je nepostradatelny.

[podlesh]

No, takové obvyklé WTF. I když je pravda že jako ne-Oraclista nepoznám, co jsou normální Oracle triky a co je jen blbost autora.

Co je ale opravdu WTF, je onen odkaz na stránky "no Java", které asi původné byly zamýšlany jako veselé historky o středu kravaťáků a hackerů. Ovšem výsledek je odporný a trapný, zvláště ten první ICQ rozhovor je velmi ubohý (chápal bych v hospodě po pátém pivu, chápu i vtipkování po ICQ, ale veřejně to vystavovat na webu?).

[vaclav]

Tahle prihoda mi pripomina jeden chemickej vtip: H4SO3 :D:D:D(chemici vedi).