AGB  ·  Datenschutz  ·  Impressum  







Anmelden
Nützliche Links
Registrieren
Zurück Delphi-PRAXiS Delphi-PRAXiS - Lounge Klatsch und Tratsch Eure besten Quellcode Kommentare...
Thema durchsuchen
Ansicht
Themen-Optionen

Eure besten Quellcode Kommentare...

Ein Thema von Relicted · begonnen am 20. Jul 2007 · letzter Beitrag vom 1. Okt 2022
Antwort Antwort
Seite 21 von 27   « Erste     11192021 2223     Letzte »    
Benutzerbild von mleyen
mleyen

Registriert seit: 10. Aug 2007
609 Beiträge
 
FreePascal / Lazarus
 
#1

AW: Eure besten Quellcode Kommentare...

  Alt 16. Sep 2010, 21:13
Noch eine Berühmtheit:
Delphi-Quellcode:
//When I wrote this, only God and I understood what I was doing
//Now, God only knows
Private Projekte:
// Finger wech, sonst Fingerweh
Delphi-Quellcode:
// wer das lied mit dem bridge/riff errät, weiß wers verbockt hat:
// br Nanana, br Nanana [br]na[/br], Nananaa - br Nanana, br Nanana [br]na[/br], Nananaa ...
Sonstiges:
Delphi-Quellcode:
//if you steal this code, your tiny
//private parts will itch forever...
  Mit Zitat antworten Zitat
Benutzerbild von Die Muhkuh
Die Muhkuh

Registriert seit: 21. Aug 2003
7.332 Beiträge
 
Delphi 2009 Professional
 
#2

AW: Eure besten Quellcode Kommentare...

  Alt 16. Sep 2010, 22:34
Im Internet gefunden:
Delphi-Quellcode:
//
// Dear maintainer:
//
// Once you are done trying to 'optimize' this routine,
// and have realized what a terrible mistake that was,
// please increment the following counter as a warning
// to the next guy:
//
// total_hours_wasted_here = 17
//
Der ist top
  Mit Zitat antworten Zitat
r2c2

Registriert seit: 9. Mai 2005
Ort: Nordbaden
925 Beiträge
 
#3

AW: Eure besten Quellcode Kommentare...

  Alt 20. Sep 2010, 21:47
Im Internet gefunden:
Delphi-Quellcode:
//
// Dear maintainer:
//
// Once you are done trying to 'optimize' this routine,
// and have realized what a terrible mistake that was,
// please increment the following counter as a warning
// to the next guy:
//
// total_hours_wasted_here = 17
//
Der zugehörige Code würd mich mal interessieren...

mfg

Christian
Kaum macht man's richtig, schon klappts!
  Mit Zitat antworten Zitat
ToFaceTeKilla

Registriert seit: 17. Mai 2006
Ort: Leipzig
283 Beiträge
 
Delphi XE2 Professional
 
#4

Re: Eure besten Quellcode Kommentare...

  Alt 18. Mai 2009, 14:52
Zwar nicht unbedingt lustig, aber gruselig ^^
Stammt aus einem Programm, welches ich gerade überarbeite:
Delphi-Quellcode:
procedure AddNewErgASkripte (...)
procedure AddNewErgASkript (...)
Was jetzt - deutsch oder englisch? Und dann noch fast identische Namen
grauenvoll
Billy Gerwitz
"Bei der Softwareentwicklung suchen wir nicht den richtigen Weg, sondern den am wenigsten falschen." - frei nach V. Hillmann
  Mit Zitat antworten Zitat
Fridolin Walther

Registriert seit: 11. Mai 2008
Ort: Kühlungsborn
446 Beiträge
 
Delphi 2009 Professional
 
#5

Re: Eure besten Quellcode Kommentare...

  Alt 18. Mai 2009, 15:53
Meine persönlichen Highlights aus mehr oder weniger öffentlichen Quellen:

Linux Kernel (SATA Treiber) ... Cargo Cult Programming at it's best!
Code:
static void pdc_host_init(unsigned int chip_id, struct ata_probe_ent *pe)
{
   void *mmio = pe->mmio_base;
   u32 tmp;
   /*
    * Except for the hotplug stuff, this is voodoo from the
    * Promise driver. Label this entire section
    * "TODO: figure out why we do this"
    */
   
   /* change FIFO_SHD to 8 dwords, enable BMR_BURST */
   tmp = readl(mmio + PDC_FLASH_CTL);
   tmp |= 0x12000; /* bit 16 (fifo 8 dw) and 13 (bmr burst?) */
   writel(tmp, mmio + PDC_FLASH_CTL);
   /* clear plug/unplug flags for all ports */
   tmp = readl(mmio + PDC_SATA_PLUG_CSR);
   writel(tmp | 0xff, mmio + PDC_SATA_PLUG_CSR);
   ...
}
Auch sehr schön und ebenfalls aus dem SATA Treiber von Linux:
Code:
/* software reset. causes dev0 to be selected */
if (ap->flags & ATA_FLAG_MMIO) {
   writeb(ap->ctl, (void __iomem *) ioaddr->ctl_addr);
   udelay(20); /* FIXME: flush */
   writeb(ap->ctl | ATA_SRST, (void __iomem *) ioaddr->ctl_addr);
   udelay(20); /* FIXME: flush */
   writeb(ap->ctl, (void __iomem *) ioaddr->ctl_addr);
Aus einem eher unfreiwillig veröffentlichtem Stück MS Source Code:
Code:
/*
 *   !!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!
 *   !!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!
 *   !!!!!!!IF YOU CHANGE TABS TO SPACES, YOU WILL BE KILLED!!!!!!!
 *   !!!!!!!!!!!!!!DOING SO FUCKS THE BUILD PROCESS!!!!!!!!!!!!!!!!
 *   !!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!
 *   !!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!
 */
Ebenfalls von dort entnommen:
Code:
// the fucking alpha cpp compiler seems to fuck up the goddam type "LPITEMIDLIST", so to work
// around the fucking peice of shit compiler we pass the last param as an void *instead of a LPITEMIDLIST
Last but not least: Woran erkennt man einen wirklich üblen Hack? Daran das der Programmierer sich dazu genötigt fühlte eine Art ASCII Banner drum herum zu bauen, wie hier in geleakten IE Sourcen perfekt demonstriert:
Code:
/////////////////////////////////////////////////////////
//
// !!HACKHACKHACKHACKHACKHACKHACKHACKHACKHACKHACKHACKHACK
//
// Again, because of the nasty break on empty bits in
// ui-generated elements, we must ignore simulated text
// then certain elements are nested. For example,
// <blockquote> and <div>.
//

if (_textInScope == TIG_FAKE &&
   (bsTop.pNodeBlock->Tag() == ETAG_BLOCKQUOTE ||
    bsTop.pNodeBlock->Tag() == ETAG_DIV))
{
   fBreak = NO_BREAK;
}

//
// !!HACKHACKHACKHACKHACKHACKHACKHACKHACKHACKHACKHACKHACK
//
/////////////////////////////////////////////////////////
Wenn man übrigens mal lachen möchte, einfach mal in bekannten Open Source Projekten nach diversen Schimpfworten greppen. Linux Kernel, Open Office, Firefox ... genug Stoff um sich Wochenlang zu amüsieren! Ansonsten kann man sich einige weitere Perlen aus dem geleakten MS Source Paket hier anschauen: http://www.kuro5hin.org/story/2004/2/15/71552/7795.

DISCLAIMER: Sollte jemandem sein Firefox am Herzen liegen, tut Euch selbst den Gefallen und schaut Euch den Firefox Source lieber nicht an. Ihr werdet ihn danach ansonsten nicht mehr verwenden wollen. Ähnlich verhält es sich mit Open Office.
Fridolin Walther
  Mit Zitat antworten Zitat
Benutzerbild von Tonic1024
Tonic1024

Registriert seit: 10. Sep 2003
Ort: Cuxhaven
559 Beiträge
 
RAD-Studio 2009 Ent
 
#6

Re: Eure besten Quellcode Kommentare...

  Alt 28. Mai 2009, 11:53
Mach ich öfter und kanns mir dann auch irgendwie nicht verkneifen
Delphi-Quellcode:
// This is where the magic happens...
procedure MessageSink(var Msg: TCstmMsg);
Oder der hier. An logischen Übergängen wie zum Beispiel bei Hilfs- und exportierten Funktionen.
Delphi-Quellcode:
// And now for something completely different...
// --- Public stuff-----------------------------------------------------------------------------------
Toni
Der frühe Vogel fängt den Wurm, richtig.
Aber wird nicht auch der frühe Wurm vom Vogel gefressen?
  Mit Zitat antworten Zitat
Billi Berserker
(Gast)

n/a Beiträge
 
#7

Re: Eure besten Quellcode Kommentare...

  Alt 4. Jun 2009, 23:32
Delphi-Quellcode:
procedure TSharpEEditText.SetAutoComplete;
[...]
begin
  // THIS SHIT IS LEAKING! SOMEONE FIX IT! :)
  exit;
  [...]
immer wieder schön wenn man sowas 3 Jahre später wieder findet und sich nur erinnert "ups, da war ja was"
Mein fix damals bestand darin nen "exit;" und den Kommentar rein zu packen und zu vergessen das das feature jemals existierte
  Mit Zitat antworten Zitat
Benutzerbild von mleyen
mleyen

Registriert seit: 10. Aug 2007
609 Beiträge
 
FreePascal / Lazarus
 
#8

Re: Eure besten Quellcode Kommentare...

  Alt 5. Jun 2009, 11:31
Grad in einer alten Unit gefunden:
Delphi-Quellcode:
  Result := not Active;

if not Result then // doppelt genotted hält besser
  Exit;
//...
  Mit Zitat antworten Zitat
matashen

Registriert seit: 29. Jan 2007
Ort: daheim
483 Beiträge
 
Delphi 10.2 Tokyo Enterprise
 
#9

Re: Eure besten Quellcode Kommentare...

  Alt 8. Jun 2009, 09:53
grad drübergestolpert, klassiker

//Keine Ahnung warum folgende Zeile eingetragen war
Matthias
Das Leben ist eines der härtesten.
  Mit Zitat antworten Zitat
Benutzerbild von himitsu
himitsu

Registriert seit: 11. Okt 2003
Ort: Elbflorenz
44.355 Beiträge
 
Delphi 12 Athens
 
#10

Re: Eure besten Quellcode Kommentare...

  Alt 8. Jun 2009, 09:57
Zitat von matashen:
//Keine Ahnung warum folgende Zeile eingetragen war
passend dazu find ich auch sowas toll
// Keine Ahnung warum, aber folgende Zeile funktioniert wirklich (in etwa so mal irgendwo gesehn)
Ein Therapeut entspricht 1024 Gigapeut.
  Mit Zitat antworten Zitat
Antwort Antwort
Seite 21 von 27   « Erste     11192021 2223     Letzte »    

 

Forumregeln

Es ist dir nicht erlaubt, neue Themen zu verfassen.
Es ist dir nicht erlaubt, auf Beiträge zu antworten.
Es ist dir nicht erlaubt, Anhänge hochzuladen.
Es ist dir nicht erlaubt, deine Beiträge zu bearbeiten.

BB-Code ist an.
Smileys sind an.
[IMG] Code ist an.
HTML-Code ist aus.
Trackbacks are an
Pingbacks are an
Refbacks are aus

Gehe zu:

Impressum · AGB · Datenschutz · Nach oben
Alle Zeitangaben in WEZ +1. Es ist jetzt 01:11 Uhr.
Powered by vBulletin® Copyright ©2000 - 2025, Jelsoft Enterprises Ltd.
LinkBacks Enabled by vBSEO © 2011, Crawlability, Inc.
Delphi-PRAXiS (c) 2002 - 2023 by Daniel R. Wolf, 2024-2025 by Thomas Breitkreuz