1234567891011121314151617181920212223242526272829303132333435363738394041424344454647484950515253545556575859606162636465666768697071727374757677787980818283848586878889909192939495969798991001011021031041051061071081091101111121131141151161171181191201211221231241251261271281291301311321331341351361371381391401411421431441451461471481491501511521531541551561571581591601611621631641651661671681691701711721731741751761771781791801811821831841851861871881891901911921931941951961971981992002012022032042052062072082092102112122132142152162172182192202212222232242252262272282292302312322332342352362372382392402412422432442452462472482492502512522532542552562572582592602612622632642652662672682692702712722732742752762772782792802812822832842852862872882892902912922932942952962972982993003013023033043053063073083093103113123133143153163173183193203213223233243253263273283293303313323333343353363373383393403413423433443453463473483493503513523533543553563573583593603613623633643653663673683693703713723733743753763773783793803813823833843853863873883893903913923933943953963973983994004014024034044054064074084094104114124134144154164174184194204214224234244254264274284294304314324334344354364374384394404414424434444454464474484494504514524534544554564574584594604614624634644654664674684694704714724734744754764774784794804814824834844854864874884894904914924934944954964974984995005015025035045055065075085095105115125135145155165175185195205215225235245255265275285295305315325335345355365375385395405415425435445455465475485495505515525535545555565575585595605615625635645655665675685695705715725735745755765775785795805815825835845855865875885895905915925935945955965975985996006016026036046056066076086096106116126136146156166176186196206216226236246256266276286296306316326336346356366376386396406416426436446456466476486496506516526536546556566576586596606616626636646656666676686696706716726736746756766776786796806816826836846856866876886896906916926936946956966976986997007017027037047057067077087097107117127137147157167177187197207217227237247257267277287297307317327337347357367377387397407417427437447457467477487497507517527537547557567577587597607617627637647657667677687697707717727737747757767777787797807817827837847857867877887897907917927937947957967977987998008018028038048058068078088098108118128138148158168178188198208218228238248258268278288298308318328338348358368378388398408418428438448458468478488498508518528538548558568578588598608618628638648658668678688698708718728738748758768778788798808818828838848858868878888898908918928938948958968978988999009019029039049059069079089099109119129139149159169179189199209219229239249259269279289299309319329339349359369379389399409419429439449459469479489499509519529539549559569579589599609619629639649659669679689699709719729739749759769779789799809819829839849859869879889899909919929939949959969979989991000100110021003100410051006100710081009101010111012101310141015101610171018101910201021102210231024102510261027102810291030103110321033103410351036103710381039104010411042104310441045104610471048104910501051105210531054105510561057105810591060106110621063106410651066106710681069107010711072107310741075107610771078107910801081108210831084108510861087108810891090109110921093109410951096109710981099110011011102110311041105110611071108110911101111111211131114111511161117111811191120112111221123112411251126112711281129113011311132113311341135113611371138113911401141114211431144114511461147114811491150115111521153115411551156115711581159116011611162116311641165116611671168116911701171117211731174117511761177117811791180118111821183118411851186118711881189119011911192119311941195119611971198119912001201120212031204120512061207120812091210121112121213121412151216121712181219122012211222122312241225122612271228122912301231123212331234123512361237123812391240124112421243124412451246124712481249125012511252125312541255125612571258125912601261126212631264126512661267126812691270127112721273127412751276127712781279128012811282128312841285128612871288128912901291129212931294129512961297129812991300130113021303130413051306130713081309131013111312131313141315131613171318131913201321132213231324132513261327132813291330133113321333133413351336133713381339134013411342134313441345134613471348134913501351135213531354135513561357135813591360136113621363136413651366136713681369137013711372137313741375137613771378137913801381138213831384138513861387138813891390139113921393139413951396139713981399140014011402140314041405140614071408140914101411141214131414141514161417141814191420142114221423142414251426142714281429143014311432143314341435143614371438143914401441144214431444144514461447144814491450145114521453145414551456145714581459146014611462146314641465146614671468146914701471147214731474147514761477147814791480148114821483148414851486148714881489149014911492149314941495149614971498149915001501150215031504150515061507150815091510151115121513151415151516151715181519152015211522152315241525152615271528152915301531153215331534153515361537153815391540154115421543154415451546154715481549155015511552155315541555155615571558155915601561156215631564156515661567156815691570157115721573157415751576157715781579158015811582158315841585158615871588158915901591159215931594159515961597159815991600160116021603160416051606160716081609161016111612161316141615161616171618161916201621162216231624162516261627162816291630163116321633163416351636163716381639164016411642164316441645164616471648164916501651165216531654165516561657165816591660166116621663166416651666166716681669167016711672167316741675167616771678167916801681168216831684168516861687168816891690169116921693169416951696169716981699170017011702170317041705170617071708170917101711171217131714171517161717171817191720172117221723172417251726172717281729173017311732173317341735173617371738173917401741174217431744174517461747174817491750175117521753175417551756175717581759176017611762176317641765176617671768176917701771177217731774177517761777177817791780178117821783178417851786178717881789179017911792179317941795179617971798179918001801180218031804180518061807180818091810181118121813181418151816181718181819182018211822182318241825182618271828182918301831183218331834183518361837183818391840184118421843184418451846184718481849185018511852185318541855185618571858185918601861186218631864186518661867186818691870187118721873187418751876187718781879188018811882188318841885188618871888188918901891189218931894189518961897189818991900190119021903190419051906190719081909191019111912191319141915191619171918191919201921192219231924192519261927192819291930193119321933193419351936193719381939194019411942194319441945194619471948194919501951195219531954195519561957195819591960196119621963196419651966196719681969197019711972197319741975197619771978197919801981198219831984198519861987198819891990199119921993199419951996199719981999200020012002200320042005200620072008200920102011201220132014201520162017201820192020202120222023202420252026202720282029203020312032203320342035203620372038203920402041204220432044204520462047204820492050205120522053205420552056205720582059206020612062206320642065206620672068206920702071207220732074207520762077207820792080208120822083208420852086208720882089209020912092209320942095209620972098209921002101210221032104210521062107210821092110211121122113211421152116211721182119212021212122212321242125212621272128212921302131213221332134213521362137213821392140214121422143214421452146214721482149215021512152215321542155215621572158215921602161216221632164216521662167216821692170217121722173217421752176217721782179218021812182218321842185218621872188218921902191219221932194219521962197219821992200220122022203220422052206220722082209221022112212221322142215221622172218221922202221222222232224222522262227222822292230223122322233223422352236223722382239224022412242224322442245224622472248224922502251225222532254225522562257225822592260226122622263226422652266226722682269227022712272227322742275227622772278227922802281228222832284228522862287228822892290229122922293229422952296229722982299230023012302230323042305230623072308230923102311231223132314231523162317231823192320232123222323232423252326232723282329233023312332233323342335233623372338233923402341234223432344234523462347234823492350235123522353235423552356235723582359236023612362236323642365236623672368236923702371237223732374237523762377237823792380238123822383238423852386238723882389239023912392239323942395239623972398239924002401240224032404240524062407240824092410241124122413241424152416241724182419242024212422242324242425242624272428242924302431243224332434243524362437243824392440244124422443244424452446244724482449245024512452245324542455245624572458245924602461246224632464246524662467246824692470247124722473247424752476247724782479248024812482248324842485248624872488248924902491249224932494249524962497249824992500250125022503250425052506250725082509251025112512251325142515251625172518251925202521252225232524252525262527252825292530253125322533253425352536253725382539254025412542254325442545254625472548254925502551255225532554255525562557255825592560256125622563256425652566256725682569257025712572257325742575257625772578257925802581258225832584258525862587258825892590259125922593259425952596259725982599260026012602260326042605260626072608260926102611261226132614261526162617261826192620262126222623262426252626262726282629263026312632263326342635263626372638263926402641264226432644264526462647264826492650265126522653265426552656265726582659266026612662266326642665266626672668266926702671267226732674267526762677267826792680268126822683268426852686268726882689269026912692269326942695269626972698269927002701270227032704270527062707270827092710271127122713271427152716271727182719272027212722272327242725272627272728272927302731273227332734273527362737273827392740274127422743274427452746274727482749275027512752275327542755275627572758275927602761276227632764276527662767276827692770277127722773277427752776277727782779278027812782278327842785278627872788278927902791279227932794279527962797279827992800280128022803280428052806280728082809281028112812281328142815281628172818281928202821282228232824282528262827282828292830283128322833283428352836283728382839284028412842284328442845284628472848284928502851285228532854285528562857285828592860286128622863286428652866286728682869287028712872287328742875287628772878287928802881288228832884288528862887288828892890289128922893289428952896289728982899290029012902290329042905290629072908290929102911291229132914291529162917291829192920292129222923292429252926292729282929293029312932293329342935293629372938293929402941294229432944294529462947294829492950295129522953295429552956295729582959296029612962296329642965296629672968296929702971297229732974297529762977297829792980298129822983298429852986298729882989299029912992299329942995299629972998299930003001300230033004300530063007300830093010301130123013301430153016301730183019302030213022302330243025302630273028302930303031303230333034303530363037303830393040304130423043304430453046304730483049305030513052305330543055305630573058305930603061306230633064306530663067306830693070307130723073307430753076307730783079308030813082308330843085308630873088308930903091309230933094309530963097309830993100310131023103310431053106310731083109311031113112311331143115311631173118311931203121312231233124312531263127312831293130313131323133313431353136313731383139314031413142314331443145314631473148314931503151315231533154315531563157315831593160316131623163316431653166316731683169317031713172317331743175317631773178317931803181318231833184318531863187318831893190319131923193319431953196319731983199320032013202320332043205320632073208320932103211321232133214321532163217321832193220322132223223322432253226322732283229323032313232323332343235323632373238323932403241324232433244324532463247324832493250325132523253325432553256325732583259326032613262326332643265326632673268326932703271327232733274327532763277327832793280328132823283328432853286328732883289329032913292329332943295329632973298329933003301330233033304330533063307330833093310331133123313331433153316331733183319332033213322332333243325332633273328332933303331333233333334333533363337333833393340334133423343334433453346334733483349335033513352335333543355335633573358335933603361336233633364336533663367336833693370337133723373337433753376337733783379338033813382338333843385338633873388338933903391339233933394339533963397339833993400340134023403340434053406340734083409341034113412341334143415341634173418341934203421342234233424342534263427342834293430343134323433343434353436343734383439344034413442344334443445344634473448344934503451345234533454345534563457345834593460346134623463346434653466346734683469347034713472347334743475347634773478347934803481348234833484348534863487348834893490349134923493349434953496349734983499350035013502350335043505350635073508350935103511351235133514351535163517351835193520352135223523352435253526352735283529353035313532353335343535353635373538353935403541354235433544354535463547354835493550355135523553355435553556355735583559356035613562356335643565356635673568356935703571357235733574357535763577357835793580358135823583358435853586358735883589359035913592359335943595359635973598359936003601360236033604360536063607360836093610361136123613361436153616361736183619362036213622362336243625362636273628362936303631363236333634363536363637363836393640364136423643364436453646364736483649365036513652365336543655365636573658365936603661366236633664366536663667366836693670367136723673367436753676367736783679368036813682368336843685368636873688368936903691369236933694369536963697369836993700370137023703370437053706370737083709371037113712371337143715371637173718371937203721372237233724372537263727372837293730373137323733373437353736373737383739374037413742374337443745374637473748374937503751375237533754375537563757375837593760376137623763376437653766376737683769377037713772377337743775377637773778377937803781378237833784378537863787378837893790379137923793379437953796379737983799380038013802380338043805380638073808380938103811381238133814381538163817381838193820382138223823382438253826382738283829383038313832383338343835383638373838383938403841384238433844384538463847384838493850385138523853385438553856385738583859386038613862386338643865386638673868386938703871387238733874387538763877387838793880388138823883388438853886388738883889389038913892389338943895389638973898389939003901390239033904390539063907390839093910391139123913391439153916391739183919392039213922392339243925392639273928392939303931393239333934393539363937393839393940394139423943394439453946394739483949395039513952395339543955395639573958395939603961396239633964396539663967396839693970397139723973397439753976397739783979398039813982398339843985398639873988398939903991399239933994399539963997399839994000400140024003400440054006400740084009401040114012401340144015401640174018401940204021402240234024402540264027402840294030403140324033403440354036403740384039404040414042404340444045404640474048404940504051405240534054405540564057405840594060406140624063406440654066406740684069407040714072407340744075407640774078407940804081408240834084408540864087408840894090409140924093409440954096409740984099410041014102410341044105410641074108410941104111411241134114411541164117411841194120412141224123412441254126412741284129413041314132413341344135413641374138413941404141414241434144414541464147414841494150415141524153415441554156415741584159416041614162416341644165416641674168416941704171417241734174417541764177417841794180418141824183418441854186418741884189419041914192419341944195419641974198419942004201420242034204420542064207420842094210421142124213421442154216421742184219422042214222422342244225422642274228422942304231423242334234423542364237423842394240424142424243424442454246424742484249425042514252425342544255425642574258425942604261426242634264426542664267426842694270427142724273427442754276427742784279428042814282428342844285428642874288428942904291429242934294429542964297429842994300430143024303430443054306430743084309431043114312431343144315431643174318431943204321432243234324432543264327432843294330433143324333433443354336433743384339434043414342434343444345434643474348434943504351435243534354435543564357435843594360436143624363436443654366436743684369437043714372437343744375437643774378437943804381438243834384438543864387438843894390439143924393439443954396439743984399440044014402440344044405440644074408440944104411441244134414441544164417441844194420442144224423442444254426442744284429443044314432443344344435443644374438443944404441444244434444444544464447444844494450445144524453445444554456445744584459446044614462446344644465446644674468446944704471447244734474447544764477447844794480448144824483448444854486448744884489449044914492449344944495449644974498449945004501450245034504450545064507450845094510451145124513451445154516451745184519452045214522452345244525452645274528452945304531453245334534453545364537453845394540454145424543454445454546454745484549455045514552455345544555455645574558455945604561456245634564456545664567456845694570457145724573457445754576457745784579458045814582458345844585458645874588458945904591459245934594459545964597459845994600460146024603460446054606460746084609461046114612461346144615461646174618461946204621462246234624462546264627462846294630463146324633463446354636463746384639464046414642464346444645464646474648464946504651465246534654465546564657465846594660466146624663466446654666466746684669467046714672467346744675467646774678467946804681468246834684468546864687468846894690469146924693469446954696469746984699470047014702470347044705470647074708470947104711471247134714471547164717471847194720472147224723472447254726472747284729473047314732473347344735473647374738473947404741474247434744474547464747474847494750475147524753475447554756475747584759476047614762476347644765476647674768476947704771477247734774477547764777477847794780478147824783478447854786478747884789479047914792479347944795479647974798479948004801480248034804480548064807480848094810481148124813481448154816481748184819482048214822482348244825482648274828482948304831483248334834483548364837483848394840484148424843484448454846484748484849485048514852485348544855485648574858485948604861486248634864486548664867486848694870487148724873487448754876487748784879488048814882488348844885488648874888488948904891489248934894489548964897489848994900490149024903490449054906490749084909491049114912491349144915491649174918491949204921492249234924492549264927492849294930493149324933493449354936493749384939494049414942494349444945494649474948494949504951495249534954495549564957495849594960496149624963496449654966496749684969497049714972497349744975497649774978497949804981498249834984498549864987498849894990499149924993499449954996499749984999500050015002500350045005500650075008500950105011501250135014501550165017501850195020502150225023502450255026502750285029503050315032503350345035503650375038503950405041504250435044504550465047504850495050505150525053505450555056505750585059506050615062506350645065506650675068506950705071507250735074507550765077507850795080508150825083508450855086508750885089509050915092509350945095509650975098509951005101510251035104510551065107510851095110511151125113511451155116511751185119512051215122512351245125512651275128512951305131513251335134513551365137513851395140514151425143514451455146514751485149515051515152515351545155515651575158515951605161516251635164516551665167516851695170517151725173517451755176517751785179518051815182518351845185518651875188518951905191519251935194519551965197519851995200520152025203520452055206520752085209521052115212521352145215521652175218521952205221522252235224522552265227522852295230523152325233523452355236523752385239524052415242524352445245524652475248524952505251525252535254525552565257525852595260526152625263526452655266526752685269527052715272527352745275527652775278527952805281528252835284528552865287528852895290529152925293529452955296529752985299530053015302530353045305530653075308530953105311531253135314531553165317531853195320532153225323532453255326532753285329533053315332533353345335533653375338533953405341534253435344534553465347534853495350535153525353535453555356535753585359536053615362536353645365536653675368536953705371537253735374537553765377537853795380538153825383538453855386538753885389539053915392539353945395539653975398539954005401540254035404540554065407540854095410541154125413541454155416541754185419542054215422542354245425542654275428542954305431543254335434543554365437543854395440544154425443544454455446544754485449545054515452545354545455545654575458545954605461546254635464546554665467546854695470547154725473547454755476547754785479548054815482548354845485548654875488548954905491549254935494549554965497549854995500550155025503550455055506550755085509551055115512551355145515551655175518551955205521552255235524552555265527552855295530553155325533553455355536553755385539554055415542554355445545554655475548554955505551555255535554555555565557555855595560556155625563556455655566556755685569557055715572557355745575557655775578557955805581558255835584558555865587558855895590559155925593559455955596559755985599560056015602560356045605560656075608560956105611561256135614561556165617561856195620562156225623562456255626562756285629563056315632563356345635563656375638563956405641564256435644564556465647564856495650565156525653565456555656565756585659566056615662566356645665566656675668566956705671567256735674567556765677567856795680568156825683568456855686568756885689569056915692569356945695569656975698569957005701570257035704570557065707570857095710571157125713571457155716571757185719572057215722572357245725572657275728572957305731573257335734573557365737573857395740574157425743574457455746574757485749575057515752575357545755575657575758575957605761576257635764576557665767576857695770577157725773577457755776577757785779578057815782578357845785578657875788578957905791579257935794579557965797579857995800580158025803580458055806580758085809581058115812581358145815581658175818581958205821582258235824582558265827582858295830583158325833 |
- /*********************************************************************
- *
- * File : $Source: /cvsroot/ijbswa/current/jcc.c,v $
- *
- * Purpose : Main file. Contains main() method, main loop, and
- * the main connection-handling function.
- *
- * Copyright : Written by and Copyright (C) 2001-2020 the
- * Privoxy team. https://www.privoxy.org/
- *
- * Based on the Internet Junkbuster originally written
- * by and Copyright (C) 1997 Anonymous Coders and
- * Junkbusters Corporation. http://www.junkbusters.com
- *
- * This program is free software; you can redistribute it
- * and/or modify it under the terms of the GNU General
- * Public License as published by the Free Software
- * Foundation; either version 2 of the License, or (at
- * your option) any later version.
- *
- * This program is distributed in the hope that it will
- * be useful, but WITHOUT ANY WARRANTY; without even the
- * implied warranty of MERCHANTABILITY or FITNESS FOR A
- * PARTICULAR PURPOSE. See the GNU General Public
- * License for more details.
- *
- * The GNU General Public License should be included with
- * this file. If not, you can view it at
- * http://www.gnu.org/copyleft/gpl.html
- * or write to the Free Software Foundation, Inc., 59
- * Temple Place - Suite 330, Boston, MA 02111-1307, USA.
- *
- *********************************************************************/
- #include "config.h"
- #include <stdio.h>
- #include <sys/types.h>
- #include <stdlib.h>
- #include <string.h>
- #include <signal.h>
- #include <fcntl.h>
- #include <errno.h>
- #include <assert.h>
- #ifdef _WIN32
- # ifndef FEATURE_PTHREAD
- # ifndef STRICT
- # define STRICT
- # endif
- # include <winsock2.h>
- # include <windows.h>
- # include <process.h>
- # endif /* ndef FEATURE_PTHREAD */
- # include "win32.h"
- # ifndef _WIN_CONSOLE
- # include "w32log.h"
- # endif /* ndef _WIN_CONSOLE */
- # include "w32svrapi.h"
- #else /* ifndef _WIN32 */
- # include <unistd.h>
- # include <sys/wait.h>
- # include <sys/time.h>
- # include <sys/stat.h>
- # include <sys/ioctl.h>
- #ifdef sun
- #include <sys/termios.h>
- #endif /* sun */
- #ifdef unix
- #include <pwd.h>
- #include <grp.h>
- #endif
- # include <signal.h>
- # ifdef __BEOS__
- # include <socket.h> /* BeOS has select() for sockets only. */
- # include <OS.h> /* declarations for threads and stuff. */
- # endif
- #ifdef HAVE_POLL
- #ifdef __GLIBC__
- #include <sys/poll.h>
- #else
- #include <poll.h>
- #endif /* def __GLIBC__ */
- #else
- # ifndef FD_ZERO
- # include <select.h>
- # endif
- #warning poll() appears to be unavailable. Your platform will become unsupported in the future.
- #endif /* HAVE_POLL */
- #endif
- #include "project.h"
- #include "list.h"
- #include "jcc.h"
- #ifdef FEATURE_HTTPS_INSPECTION
- #include "ssl.h"
- #endif
- #include "filters.h"
- #include "loaders.h"
- #include "parsers.h"
- #include "miscutil.h"
- #include "errlog.h"
- #include "jbsockets.h"
- #include "gateway.h"
- #include "actions.h"
- #include "cgi.h"
- #include "loadcfg.h"
- #include "urlmatch.h"
- #ifdef FEATURE_CLIENT_TAGS
- #include "client-tags.h"
- #endif
- int daemon_mode = 1;
- struct client_states clients[1];
- struct file_list files[1];
- #ifdef FEATURE_STATISTICS
- int urls_read = 0; /* total nr of urls read inc rejected */
- int urls_rejected = 0; /* total nr of urls rejected */
- #endif /* def FEATURE_STATISTICS */
- #ifdef FEATURE_GRACEFUL_TERMINATION
- int g_terminate = 0;
- #endif
- #if !defined(_WIN32)
- static void sig_handler(int the_signal);
- #endif
- static int client_protocol_is_unsupported(struct client_state *csp, char *req);
- static jb_err get_request_destination_elsewhere(struct client_state *csp, struct list *headers);
- static jb_err get_server_headers(struct client_state *csp);
- static const char *crunch_reason(const struct http_response *rsp);
- static void send_crunch_response(struct client_state *csp, struct http_response *rsp);
- static char *get_request_line(struct client_state *csp);
- static jb_err receive_client_request(struct client_state *csp);
- static jb_err parse_client_request(struct client_state *csp);
- static void build_request_line(struct client_state *csp, const struct forward_spec *fwd, char **request_line);
- static jb_err change_request_destination(struct client_state *csp);
- static void handle_established_connection(struct client_state *csp);
- static void chat(struct client_state *csp);
- static void serve(struct client_state *csp);
- #if !defined(_WIN32) || defined(_WIN_CONSOLE)
- static void usage(const char *myname);
- #endif
- static void initialize_mutexes(void);
- static jb_socket bind_port_helper(const char *haddr, int hport, int backlog);
- static void bind_ports_helper(struct configuration_spec *config, jb_socket sockets[]);
- static void close_ports_helper(jb_socket sockets[]);
- static void listen_loop(void);
- static void serve(struct client_state *csp);
- #ifdef __BEOS__
- static int32 server_thread(void *data);
- #endif /* def __BEOS__ */
- #ifdef _WIN32
- #define sleep(N) Sleep(((N) * 1000))
- #endif
- #ifdef FUZZ
- int process_fuzzed_input(char *fuzz_input_type, char *fuzz_input_file);
- void show_fuzz_usage(const char *name);
- #endif
- #ifdef MUTEX_LOCKS_AVAILABLE
- /*
- * XXX: Does the locking stuff really belong in this file?
- */
- privoxy_mutex_t log_mutex;
- privoxy_mutex_t log_init_mutex;
- privoxy_mutex_t connection_reuse_mutex;
- #ifdef FEATURE_HTTPS_INSPECTION
- privoxy_mutex_t certificate_mutex;
- privoxy_mutex_t ssl_init_mutex;
- #endif
- #ifdef FEATURE_EXTERNAL_FILTERS
- privoxy_mutex_t external_filter_mutex;
- #endif
- #ifdef FEATURE_CLIENT_TAGS
- privoxy_mutex_t client_tags_mutex;
- #endif
- #ifdef FEATURE_EXTENDED_STATISTICS
- privoxy_mutex_t filter_statistics_mutex;
- privoxy_mutex_t block_statistics_mutex;
- #endif
- #if !defined(HAVE_GETHOSTBYADDR_R) || !defined(HAVE_GETHOSTBYNAME_R)
- privoxy_mutex_t resolver_mutex;
- #endif /* !defined(HAVE_GETHOSTBYADDR_R) || !defined(HAVE_GETHOSTBYNAME_R) */
- #ifndef HAVE_GMTIME_R
- privoxy_mutex_t gmtime_mutex;
- #endif /* ndef HAVE_GMTIME_R */
- #ifndef HAVE_LOCALTIME_R
- privoxy_mutex_t localtime_mutex;
- #endif /* ndef HAVE_GMTIME_R */
- #if !defined(HAVE_ARC4RANDOM) && !defined(HAVE_RANDOM)
- privoxy_mutex_t rand_mutex;
- #endif /* !defined(HAVE_ARC4RANDOM) && !defined(HAVE_RANDOM) */
- #endif /* def MUTEX_LOCKS_AVAILABLE */
- #if defined(unix)
- const char *basedir = NULL;
- const char *pidfile = NULL;
- static int received_hup_signal = 0;
- #endif /* defined unix */
- /* HTTP snipplets. */
- static const char CSUCCEED[] =
- "HTTP/1.1 200 Connection established\r\n\r\n";
- static const char CHEADER[] =
- "HTTP/1.1 400 Invalid header received from client\r\n"
- "Content-Type: text/plain\r\n"
- "Connection: close\r\n\r\n"
- "Invalid header received from client.\r\n";
- static const char FTP_RESPONSE[] =
- "HTTP/1.1 400 Invalid request received from client\r\n"
- "Content-Type: text/plain\r\n"
- "Connection: close\r\n\r\n"
- "Invalid request. Privoxy doesn't support FTP.\r\n";
- static const char GOPHER_RESPONSE[] =
- "HTTP/1.1 400 Invalid request received from client\r\n"
- "Content-Type: text/plain\r\n"
- "Connection: close\r\n\r\n"
- "Invalid request. Privoxy doesn't support gopher.\r\n";
- /* XXX: should be a template */
- static const char MISSING_DESTINATION_RESPONSE[] =
- "HTTP/1.1 400 Bad request received from client\r\n"
- "Content-Type: text/plain\r\n"
- "Connection: close\r\n\r\n"
- "Bad request. Privoxy was unable to extract the destination.\r\n";
- /* XXX: should be a template */
- static const char INVALID_SERVER_HEADERS_RESPONSE[] =
- "HTTP/1.1 502 Server or forwarder response invalid\r\n"
- "Content-Type: text/plain\r\n"
- "Connection: close\r\n\r\n"
- "Bad response. The server or forwarder response doesn't look like HTTP.\r\n";
- /* XXX: should be a template */
- static const char MESSED_UP_REQUEST_RESPONSE[] =
- "HTTP/1.1 400 Malformed request after rewriting\r\n"
- "Content-Type: text/plain\r\n"
- "Connection: close\r\n\r\n"
- "Bad request. Messed up with header filters.\r\n";
- static const char TOO_MANY_CONNECTIONS_RESPONSE[] =
- "HTTP/1.1 503 Too many open connections\r\n"
- "Content-Type: text/plain\r\n"
- "Connection: close\r\n\r\n"
- "Maximum number of open connections reached.\r\n";
- static const char CLIENT_CONNECTION_TIMEOUT_RESPONSE[] =
- "HTTP/1.1 504 Connection timeout\r\n"
- "Content-Type: text/plain\r\n"
- "Connection: close\r\n\r\n"
- "The connection timed out because the client request didn't arrive in time.\r\n";
- static const char CLIENT_BODY_PARSE_ERROR_RESPONSE[] =
- "HTTP/1.1 400 Failed reading client body\r\n"
- "Content-Type: text/plain\r\n"
- "Connection: close\r\n\r\n"
- "Failed parsing or buffering the chunk-encoded client body.\r\n";
- static const char UNSUPPORTED_CLIENT_EXPECTATION_ERROR_RESPONSE[] =
- "HTTP/1.1 417 Expecting too much\r\n"
- "Content-Type: text/plain\r\n"
- "Connection: close\r\n\r\n"
- "Privoxy detected an unsupported Expect header value.\r\n";
- /* A function to crunch a response */
- typedef struct http_response *(*crunch_func_ptr)(struct client_state *);
- /* Crunch function flags */
- #define CF_NO_FLAGS 0
- /* Cruncher applies to forced requests as well */
- #define CF_IGNORE_FORCE 1
- /* Crunched requests are counted for the block statistics */
- #define CF_COUNT_AS_REJECT 2
- /* A crunch function and its flags */
- struct cruncher
- {
- const crunch_func_ptr cruncher;
- const int flags;
- };
- static int crunch_response_triggered(struct client_state *csp, const struct cruncher crunchers[]);
- /* Complete list of cruncher functions */
- static const struct cruncher crunchers_all[] = {
- { direct_response, CF_COUNT_AS_REJECT|CF_IGNORE_FORCE},
- { block_url, CF_COUNT_AS_REJECT },
- #ifdef FEATURE_TRUST
- { trust_url, CF_COUNT_AS_REJECT },
- #endif /* def FEATURE_TRUST */
- { redirect_url, CF_NO_FLAGS },
- { dispatch_cgi, CF_IGNORE_FORCE},
- { NULL, 0 }
- };
- /* Light version, used after tags are applied */
- static const struct cruncher crunchers_light[] = {
- { block_url, CF_COUNT_AS_REJECT },
- { redirect_url, CF_NO_FLAGS },
- { NULL, 0 }
- };
- /*
- * XXX: Don't we really mean
- *
- * #if defined(unix)
- *
- * here?
- */
- #if !defined(_WIN32)
- /*********************************************************************
- *
- * Function : sig_handler
- *
- * Description : Signal handler for different signals.
- * Exit gracefully on TERM and INT
- * or set a flag that will cause the errlog
- * to be reopened by the main thread on HUP.
- *
- * Parameters :
- * 1 : the_signal = the signal cause this function to call
- *
- * Returns : -
- *
- *********************************************************************/
- static void sig_handler(int the_signal)
- {
- switch(the_signal)
- {
- case SIGTERM:
- case SIGINT:
- log_error(LOG_LEVEL_INFO, "exiting by signal %d .. bye", the_signal);
- #if defined(unix)
- if (pidfile)
- {
- unlink(pidfile);
- }
- #endif /* unix */
- exit(the_signal);
- break;
- case SIGHUP:
- #if defined(unix)
- received_hup_signal = 1;
- #endif
- break;
- default:
- /*
- * We shouldn't be here, unless we catch signals
- * in main() that we can't handle here!
- */
- log_error(LOG_LEVEL_FATAL, "sig_handler: exiting on unexpected signal %d", the_signal);
- }
- return;
- }
- #endif
- /*********************************************************************
- *
- * Function : get_write_delay
- *
- * Description : Parse the delay-response parameter.
- *
- * Parameters :
- * 1 : csp = Current client state (buffers, headers, etc...)
- *
- * Returns : Number of milliseconds to delay writes.
- *
- *********************************************************************/
- static unsigned int get_write_delay(const struct client_state *csp)
- {
- unsigned int delay;
- char *endptr;
- char *newval;
- if ((csp->action->flags & ACTION_DELAY_RESPONSE) == 0)
- {
- return 0;
- }
- newval = csp->action->string[ACTION_STRING_DELAY_RESPONSE];
- delay = (unsigned)strtol(newval, &endptr, 0);
- if (*endptr != '\0')
- {
- log_error(LOG_LEVEL_FATAL,
- "Invalid delay-response{} parameter: '%s'", newval);
- }
- return delay;
- }
- /*********************************************************************
- *
- * Function : client_protocol_is_unsupported
- *
- * Description : Checks if the client used a known unsupported
- * protocol and deals with it by sending an error
- * response.
- *
- * Parameters :
- * 1 : csp = Current client state (buffers, headers, etc...)
- * 2 : req = the first request line send by the client
- *
- * Returns : TRUE if an error response has been generated, or
- * FALSE if the request doesn't look invalid.
- *
- *********************************************************************/
- static int client_protocol_is_unsupported(struct client_state *csp, char *req)
- {
- /*
- * If it's a FTP or gopher request, we don't support it.
- *
- * These checks are better than nothing, but they might
- * not work in all configurations and some clients might
- * have problems digesting the answer.
- *
- * They should, however, never cause more problems than
- * Privoxy's old behaviour (returning the misleading HTML
- * error message:
- *
- * "Could not resolve http://(ftp|gopher)://example.org").
- */
- if (!strncmpic(req, "GET ftp://", 10) || !strncmpic(req, "GET gopher://", 13))
- {
- const char *response = NULL;
- const char *protocol = NULL;
- if (!strncmpic(req, "GET ftp://", 10))
- {
- response = FTP_RESPONSE;
- protocol = "FTP";
- }
- else
- {
- response = GOPHER_RESPONSE;
- protocol = "GOPHER";
- }
- log_error(LOG_LEVEL_ERROR,
- "%s tried to use Privoxy as %s proxy: %s",
- csp->ip_addr_str, protocol, req);
- log_error(LOG_LEVEL_CLF,
- "%s - - [%T] \"%s\" 400 0", csp->ip_addr_str, req);
- freez(req);
- #ifdef FEATURE_HTTPS_INSPECTION
- if (client_use_ssl(csp))
- {
- ssl_send_data_delayed(&(csp->ssl_client_attr),
- (const unsigned char *)response, strlen(response),
- get_write_delay(csp));
- }
- else
- #endif
- {
- write_socket_delayed(csp->cfd, response, strlen(response),
- get_write_delay(csp));
- }
- return TRUE;
- }
- return FALSE;
- }
- /*********************************************************************
- *
- * Function : client_has_unsupported_expectations
- *
- * Description : Checks if the client used an unsupported expectation
- * in which case an error message is delivered.
- *
- * Parameters :
- * 1 : csp = Current client state (buffers, headers, etc...)
- *
- * Returns : TRUE if an error response has been generated, or
- * FALSE if the request doesn't look invalid.
- *
- *********************************************************************/
- static int client_has_unsupported_expectations(const struct client_state *csp)
- {
- if ((csp->flags & CSP_FLAG_UNSUPPORTED_CLIENT_EXPECTATION))
- {
- log_error(LOG_LEVEL_ERROR,
- "Rejecting request from client %s with unsupported Expect header value",
- csp->ip_addr_str);
- log_error(LOG_LEVEL_CLF,
- "%s - - [%T] \"%s\" 417 0", csp->ip_addr_str, csp->http->cmd);
- write_socket_delayed(csp->cfd,
- UNSUPPORTED_CLIENT_EXPECTATION_ERROR_RESPONSE,
- strlen(UNSUPPORTED_CLIENT_EXPECTATION_ERROR_RESPONSE),
- get_write_delay(csp));
- return TRUE;
- }
- return FALSE;
- }
- /*********************************************************************
- *
- * Function : get_request_destination_elsewhere
- *
- * Description : If the client's request was redirected into
- * Privoxy without the client's knowledge,
- * the request line lacks the destination host.
- *
- * This function tries to get it elsewhere,
- * provided accept-intercepted-requests is enabled.
- *
- * "Elsewhere" currently only means "Host: header",
- * but in the future we may ask the redirecting
- * packet filter to look the destination up.
- *
- * If the destination stays unknown, an error
- * response is send to the client and headers
- * are freed so that chat() can return directly.
- *
- * Parameters :
- * 1 : csp = Current client state (buffers, headers, etc...)
- * 2 : headers = a header list
- *
- * Returns : JB_ERR_OK if the destination is now known, or
- * JB_ERR_PARSE if it isn't.
- *
- *********************************************************************/
- static jb_err get_request_destination_elsewhere(struct client_state *csp, struct list *headers)
- {
- if (!(csp->config->feature_flags & RUNTIME_FEATURE_ACCEPT_INTERCEPTED_REQUESTS))
- {
- log_error(LOG_LEVEL_ERROR, "%s's request: \'%s\' is invalid."
- " Privoxy isn't configured to accept intercepted requests.",
- csp->ip_addr_str, csp->http->cmd);
- /* XXX: Use correct size */
- log_error(LOG_LEVEL_CLF, "%s - - [%T] \"%s\" 400 0",
- csp->ip_addr_str, csp->http->cmd);
- write_socket_delayed(csp->cfd, CHEADER, strlen(CHEADER),
- get_write_delay(csp));
- destroy_list(headers);
- return JB_ERR_PARSE;
- }
- else if (JB_ERR_OK == get_destination_from_headers(headers, csp->http))
- {
- /* Split the domain we just got for pattern matching */
- init_domain_components(csp->http);
- return JB_ERR_OK;
- }
- else
- {
- /* We can't work without destination. Go spread the news.*/
- /* XXX: Use correct size */
- log_error(LOG_LEVEL_CLF, "%s - - [%T] \"%s\" 400 0",
- csp->ip_addr_str, csp->http->cmd);
- log_error(LOG_LEVEL_ERROR,
- "Privoxy was unable to get the destination for %s's request: %s",
- csp->ip_addr_str, csp->http->cmd);
- write_socket_delayed(csp->cfd, MISSING_DESTINATION_RESPONSE,
- strlen(MISSING_DESTINATION_RESPONSE), get_write_delay(csp));
- destroy_list(headers);
- return JB_ERR_PARSE;
- }
- /*
- * TODO: If available, use PF's ioctl DIOCNATLOOK as last resort
- * to get the destination IP address, use it as host directly
- * or do a reverse DNS lookup first.
- */
- }
- /*********************************************************************
- *
- * Function : get_server_headers
- *
- * Description : Parses server headers in iob and fills them
- * into csp->headers so that they can later be
- * handled by sed().
- *
- * Parameters :
- * 1 : csp = Current client state (buffers, headers, etc...)
- *
- * Returns : JB_ERR_OK if everything went fine, or
- * JB_ERR_PARSE if the headers were incomplete.
- *
- *********************************************************************/
- static jb_err get_server_headers(struct client_state *csp)
- {
- int continue_hack_in_da_house = 0;
- char * header;
- while (((header = get_header(csp->iob)) != NULL) || continue_hack_in_da_house)
- {
- if (header == NULL)
- {
- /*
- * continue hack in da house. Ignore the ending of
- * this head and continue enlisting header lines.
- * The reason is described below.
- */
- enlist(csp->headers, "");
- continue_hack_in_da_house = 0;
- continue;
- }
- else if (0 == strncmpic(header, "HTTP/1.1 100", 12))
- {
- /*
- * It's a bodyless continue response, don't
- * stop header parsing after reaching its end.
- *
- * As a result Privoxy will concatenate the
- * next response's head and parse and deliver
- * the headers as if they belonged to one request.
- *
- * The client will separate them because of the
- * empty line between them.
- *
- * XXX: What we're doing here is clearly against
- * the intended purpose of the continue header,
- * and under some conditions (HTTP/1.0 client request)
- * it's a standard violation.
- *
- * Anyway, "sort of against the spec" is preferable
- * to "always getting confused by Continue responses"
- * (Privoxy's behaviour before this hack was added)
- */
- log_error(LOG_LEVEL_HEADER, "Continue hack in da house.");
- continue_hack_in_da_house = 1;
- }
- else if (*header == '\0')
- {
- /*
- * If the header is empty, but the Continue hack
- * isn't active, we can assume that we reached the
- * end of the buffer before we hit the end of the
- * head.
- *
- * Inform the caller an let it decide how to handle it.
- */
- return JB_ERR_PARSE;
- }
- if (JB_ERR_MEMORY == enlist(csp->headers, header))
- {
- /*
- * XXX: Should we quit the request and return a
- * out of memory error page instead?
- */
- log_error(LOG_LEVEL_ERROR,
- "Out of memory while enlisting server headers. %s lost.",
- header);
- }
- freez(header);
- }
- return JB_ERR_OK;
- }
- /*********************************************************************
- *
- * Function : crunch_reason
- *
- * Description : Translates the crunch reason code into a string.
- *
- * Parameters :
- * 1 : rsp = a http_response
- *
- * Returns : A string with the crunch reason or an error description.
- *
- *********************************************************************/
- static const char *crunch_reason(const struct http_response *rsp)
- {
- char * reason = NULL;
- assert(rsp != NULL);
- if (rsp == NULL)
- {
- return "Internal error while searching for crunch reason";
- }
- switch (rsp->crunch_reason)
- {
- case UNSUPPORTED:
- reason = "Unsupported HTTP feature";
- break;
- case BLOCKED:
- reason = "Blocked";
- break;
- case UNTRUSTED:
- reason = "Untrusted";
- break;
- case REDIRECTED:
- reason = "Redirected";
- break;
- case CGI_CALL:
- reason = "CGI Call";
- break;
- case NO_SUCH_DOMAIN:
- reason = "DNS failure";
- break;
- case FORWARDING_FAILED:
- reason = "Forwarding failed";
- break;
- case CONNECT_FAILED:
- reason = "Connection failure";
- break;
- case OUT_OF_MEMORY:
- reason = "Out of memory (may mask other reasons)";
- break;
- case CONNECTION_TIMEOUT:
- reason = "Connection timeout";
- break;
- case NO_SERVER_DATA:
- reason = "No server data received";
- break;
- default:
- reason = "No reason recorded";
- break;
- }
- return reason;
- }
- /*********************************************************************
- *
- * Function : log_applied_actions
- *
- * Description : Logs the applied actions if LOG_LEVEL_ACTIONS is
- * enabled.
- *
- * Parameters :
- * 1 : actions = Current action spec to log
- *
- * Returns : Nothing.
- *
- *********************************************************************/
- static void log_applied_actions(const struct current_action_spec *actions)
- {
- /*
- * The conversion to text requires lots of memory allocations so
- * we only do the conversion if the user is actually interested.
- */
- if (debug_level_is_enabled(LOG_LEVEL_ACTIONS))
- {
- char *actions_as_text = actions_to_line_of_text(actions);
- log_error(LOG_LEVEL_ACTIONS, "%s", actions_as_text);
- freez(actions_as_text);
- }
- }
- /*********************************************************************
- *
- * Function : send_crunch_response
- *
- * Description : Delivers already prepared response for
- * intercepted requests, logs the interception
- * and frees the response.
- *
- * Parameters :
- * 1 : csp = Current client state (buffers, headers, etc...)
- * 2 : rsp = Fully prepared response. Will be freed on exit.
- *
- * Returns : Nothing.
- *
- *********************************************************************/
- static void send_crunch_response(struct client_state *csp, struct http_response *rsp)
- {
- const struct http_request *http = csp->http;
- char status_code[4];
- assert(rsp != NULL);
- assert(rsp->head != NULL);
- if (rsp == NULL)
- {
- log_error(LOG_LEVEL_FATAL, "NULL response in send_crunch_response.");
- }
- /*
- * Extract the status code from the actual head
- * that will be send to the client. It is the only
- * way to get it right for all requests, including
- * the fixed ones for out-of-memory problems.
- *
- * A head starts like this: 'HTTP/1.1 200...'
- * 0123456789|11
- * 10
- */
- status_code[0] = rsp->head[9];
- status_code[1] = rsp->head[10];
- status_code[2] = rsp->head[11];
- status_code[3] = '\0';
- /* Log that the request was crunched and why. */
- log_applied_actions(csp->action);
- #ifdef FEATURE_HTTPS_INSPECTION
- if (client_use_ssl(csp))
- {
- log_error(LOG_LEVEL_CRUNCH, "%s: https://%s%s", crunch_reason(rsp),
- http->hostport, http->path);
- log_error(LOG_LEVEL_CLF, "%s - - [%T] \"%s https://%s%s %s\" %s %lu",
- csp->ip_addr_str, http->gpc, http->hostport, http->path,
- http->version, status_code, rsp->content_length);
- }
- else
- #endif
- {
- log_error(LOG_LEVEL_CRUNCH, "%s: %s", crunch_reason(rsp), http->url);
- log_error(LOG_LEVEL_CLF, "%s - - [%T] \"%s\" %s %lu",
- csp->ip_addr_str, http->ocmd, status_code, rsp->content_length);
- }
- /* Write the answer to the client */
- #ifdef FEATURE_HTTPS_INSPECTION
- if (client_use_ssl(csp))
- {
- if ((ssl_send_data_delayed(&(csp->ssl_client_attr),
- (const unsigned char *)rsp->head, rsp->head_length,
- get_write_delay(csp)) < 0)
- || (ssl_send_data_delayed(&(csp->ssl_client_attr),
- (const unsigned char *)rsp->body, rsp->content_length,
- get_write_delay(csp)) < 0))
- {
- /* There is nothing we can do about it. */
- log_error(LOG_LEVEL_CONNECT, "Couldn't deliver the error message "
- "for https://%s%s through client socket %d using TLS/SSL",
- http->hostport, http->url, csp->cfd);
- }
- }
- else
- #endif
- {
- if (write_socket_delayed(csp->cfd, rsp->head, rsp->head_length,
- get_write_delay(csp))
- || write_socket_delayed(csp->cfd, rsp->body, rsp->content_length,
- get_write_delay(csp)))
- {
- /* There is nothing we can do about it. */
- log_error(LOG_LEVEL_CONNECT,
- "Couldn't deliver the error message for %s through client socket %d: %E",
- http->url, csp->cfd);
- }
- }
- /* Clean up and return */
- if (cgi_error_memory() != rsp)
- {
- free_http_response(rsp);
- }
- return;
- }
- /*********************************************************************
- *
- * Function : crunch_response_triggered
- *
- * Description : Checks if the request has to be crunched,
- * and delivers the crunch response if necessary.
- *
- * Parameters :
- * 1 : csp = Current client state (buffers, headers, etc...)
- * 2 : crunchers = list of cruncher functions to run
- *
- * Returns : TRUE if the request was answered with a crunch response
- * FALSE otherwise.
- *
- *********************************************************************/
- static int crunch_response_triggered(struct client_state *csp, const struct cruncher crunchers[])
- {
- struct http_response *rsp = NULL;
- const struct cruncher *c;
- /*
- * If CGI request crunching is disabled,
- * check the CGI dispatcher out of order to
- * prevent unintentional blocks or redirects.
- */
- if (!(csp->config->feature_flags & RUNTIME_FEATURE_CGI_CRUNCHING)
- && (NULL != (rsp = dispatch_cgi(csp))))
- {
- /* Deliver, log and free the interception response. */
- send_crunch_response(csp, rsp);
- csp->flags |= CSP_FLAG_CRUNCHED;
- return TRUE;
- }
- for (c = crunchers; c->cruncher != NULL; c++)
- {
- /*
- * Check the cruncher if either Privoxy is toggled
- * on and the request isn't forced, or if the cruncher
- * applies to forced requests as well.
- */
- if (((csp->flags & CSP_FLAG_TOGGLED_ON) &&
- !(csp->flags & CSP_FLAG_FORCED)) ||
- (c->flags & CF_IGNORE_FORCE))
- {
- rsp = c->cruncher(csp);
- if (NULL != rsp)
- {
- /* Deliver, log and free the interception response. */
- send_crunch_response(csp, rsp);
- csp->flags |= CSP_FLAG_CRUNCHED;
- #ifdef FEATURE_STATISTICS
- if (c->flags & CF_COUNT_AS_REJECT)
- {
- csp->flags |= CSP_FLAG_REJECTED;
- }
- #endif /* def FEATURE_STATISTICS */
- return TRUE;
- }
- }
- }
- return FALSE;
- }
- /*********************************************************************
- *
- * Function : build_request_line
- *
- * Description : Builds the HTTP request line.
- *
- * If a HTTP forwarder is used it expects the whole URL,
- * web servers only get the path.
- *
- * Parameters :
- * 1 : csp = Current client state (buffers, headers, etc...)
- * 2 : fwd = The forwarding spec used for the request
- * XXX: Should use http->fwd instead.
- * 3 : request_line = The old request line which will be replaced.
- *
- * Returns : Nothing. Terminates in case of memory problems.
- *
- *********************************************************************/
- static void build_request_line(struct client_state *csp, const struct forward_spec *fwd, char **request_line)
- {
- struct http_request *http = csp->http;
- /*
- * Downgrade http version from 1.1 to 1.0
- * if +downgrade action applies.
- */
- if ((csp->action->flags & ACTION_DOWNGRADE)
- && (!strcmpic(http->version, "HTTP/1.1")))
- {
- freez(http->version);
- http->version = strdup_or_die("HTTP/1.0");
- }
- /*
- * Rebuild the request line.
- */
- freez(*request_line);
- *request_line = strdup(http->gpc);
- string_append(request_line, " ");
- if (fwd->forward_host && fwd->type != FORWARD_WEBSERVER)
- {
- string_append(request_line, http->url);
- }
- else
- {
- string_append(request_line, http->path);
- }
- string_append(request_line, " ");
- string_append(request_line, http->version);
- if (*request_line == NULL)
- {
- log_error(LOG_LEVEL_FATAL, "Out of memory writing HTTP command");
- }
- log_error(LOG_LEVEL_HEADER, "New HTTP Request-Line: %s", *request_line);
- }
- /*********************************************************************
- *
- * Function : change_request_destination
- *
- * Description : Parse a (rewritten) request line and regenerate
- * the http request data.
- *
- * Parameters :
- * 1 : csp = Current client state (buffers, headers, etc...)
- *
- * Returns : Forwards the parse_http_request() return code.
- * Terminates in case of memory problems.
- *
- *********************************************************************/
- static jb_err change_request_destination(struct client_state *csp)
- {
- struct http_request *http = csp->http;
- jb_err err;
- log_error(LOG_LEVEL_REDIRECTS, "Rewrite detected: %s",
- csp->headers->first->str);
- free_http_request(http);
- err = parse_http_request(csp->headers->first->str, http);
- if (JB_ERR_OK != err)
- {
- log_error(LOG_LEVEL_ERROR, "Couldn't parse rewritten request: %s.",
- jb_err_to_string(err));
- }
- return err;
- }
- #ifdef FEATURE_CONNECTION_KEEP_ALIVE
- /*********************************************************************
- *
- * Function : server_response_is_complete
- *
- * Description : Determines whether we should stop reading
- * from the server socket.
- *
- * Parameters :
- * 1 : csp = Current client state (buffers, headers, etc...)
- * 2 : content_length = Length of content received so far.
- *
- * Returns : TRUE if the response is complete,
- * FALSE otherwise.
- *
- *********************************************************************/
- static int server_response_is_complete(struct client_state *csp,
- unsigned long long content_length)
- {
- int content_length_known = !!(csp->flags & CSP_FLAG_CONTENT_LENGTH_SET);
- if (!strcmpic(csp->http->gpc, "HEAD"))
- {
- /*
- * "HEAD" implies no body, we are thus expecting
- * no content. XXX: incomplete "list" of methods?
- */
- csp->expected_content_length = 0;
- content_length_known = TRUE;
- csp->flags |= CSP_FLAG_SERVER_CONTENT_LENGTH_SET;
- }
- if (csp->http->status == 204 || csp->http->status == 304)
- {
- /*
- * Expect no body. XXX: incomplete "list" of status codes?
- */
- csp->expected_content_length = 0;
- content_length_known = TRUE;
- csp->flags |= CSP_FLAG_SERVER_CONTENT_LENGTH_SET;
- }
- return (content_length_known && ((0 == csp->expected_content_length)
- || (csp->expected_content_length <= content_length)));
- }
- #ifdef FEATURE_CONNECTION_SHARING
- /*********************************************************************
- *
- * Function : wait_for_alive_connections
- *
- * Description : Waits for alive connections to timeout.
- *
- * Parameters : N/A
- *
- * Returns : N/A
- *
- *********************************************************************/
- static void wait_for_alive_connections(void)
- {
- int connections_alive = close_unusable_connections();
- while (0 < connections_alive)
- {
- log_error(LOG_LEVEL_CONNECT,
- "Waiting for %d connections to timeout.",
- connections_alive);
- sleep(60);
- connections_alive = close_unusable_connections();
- }
- log_error(LOG_LEVEL_CONNECT, "No connections to wait for left.");
- }
- #endif /* def FEATURE_CONNECTION_SHARING */
- /*********************************************************************
- *
- * Function : save_connection_destination
- *
- * Description : Remembers a connection for reuse later on.
- *
- * Parameters :
- * 1 : sfd = Open socket to remember.
- * 2 : http = The destination for the connection.
- * 3 : fwd = The forwarder settings used.
- * 4 : server_connection = storage.
- *
- * Returns : void
- *
- *********************************************************************/
- void save_connection_destination(jb_socket sfd,
- const struct http_request *http,
- const struct forward_spec *fwd,
- struct reusable_connection *server_connection)
- {
- assert(sfd != JB_INVALID_SOCKET);
- assert(NULL != http->host);
- server_connection->sfd = sfd;
- server_connection->host = strdup_or_die(http->host);
- server_connection->port = http->port;
- assert(NULL != fwd);
- assert(server_connection->gateway_host == NULL);
- assert(server_connection->gateway_port == 0);
- assert(server_connection->forwarder_type == 0);
- assert(server_connection->forward_host == NULL);
- assert(server_connection->forward_port == 0);
- server_connection->forwarder_type = fwd->type;
- if (NULL != fwd->gateway_host)
- {
- server_connection->gateway_host = strdup_or_die(fwd->gateway_host);
- }
- else
- {
- server_connection->gateway_host = NULL;
- }
- server_connection->gateway_port = fwd->gateway_port;
- if (NULL != fwd->auth_username)
- {
- server_connection->auth_username = strdup_or_die(fwd->auth_username);
- }
- else
- {
- server_connection->auth_username = NULL;
- }
- if (NULL != fwd->auth_password)
- {
- server_connection->auth_password = strdup_or_die(fwd->auth_password);
- }
- else
- {
- server_connection->auth_password = NULL;
- }
- if (NULL != fwd->forward_host)
- {
- server_connection->forward_host = strdup_or_die(fwd->forward_host);
- }
- else
- {
- server_connection->forward_host = NULL;
- }
- server_connection->forward_port = fwd->forward_port;
- }
- #endif /* FEATURE_CONNECTION_KEEP_ALIVE */
- /*********************************************************************
- *
- * Function : verify_request_length
- *
- * Description : Checks if we already got the whole client requests
- * and sets CSP_FLAG_CLIENT_REQUEST_COMPLETELY_READ if
- * we do.
- *
- * Data that doesn't belong to the current request is
- * either thrown away to let the client retry on a clean
- * socket, or stashed to be dealt with after the current
- * request is served.
- *
- * Parameters :
- * 1 : csp = Current client state (buffers, headers, etc...)
- *
- * Returns : void
- *
- *********************************************************************/
- static void verify_request_length(struct client_state *csp)
- {
- unsigned long long buffered_request_bytes =
- (unsigned long long)(csp->client_iob->eod - csp->client_iob->cur);
- if ((csp->expected_client_content_length != 0)
- && (buffered_request_bytes != 0))
- {
- if (csp->expected_client_content_length >= buffered_request_bytes)
- {
- csp->expected_client_content_length -= buffered_request_bytes;
- log_error(LOG_LEVEL_CONNECT, "Reduced expected bytes to %llu "
- "to account for the %llu ones we already got.",
- csp->expected_client_content_length, buffered_request_bytes);
- }
- else
- {
- assert(csp->client_iob->eod > csp->client_iob->cur + csp->expected_client_content_length);
- csp->client_iob->eod = csp->client_iob->cur + csp->expected_client_content_length;
- log_error(LOG_LEVEL_CONNECT, "Reducing expected bytes to 0. "
- "Marking the server socket tainted after throwing %llu bytes away.",
- buffered_request_bytes - csp->expected_client_content_length);
- csp->expected_client_content_length = 0;
- csp->flags |= CSP_FLAG_SERVER_SOCKET_TAINTED;
- }
- if (csp->expected_client_content_length == 0)
- {
- csp->flags |= CSP_FLAG_CLIENT_REQUEST_COMPLETELY_READ;
- }
- }
- if (!(csp->flags & CSP_FLAG_CLIENT_REQUEST_COMPLETELY_READ)
- && ((csp->client_iob->cur < csp->client_iob->eod)
- || (csp->expected_client_content_length != 0)))
- {
- if (strcmpic(csp->http->gpc, "GET")
- && strcmpic(csp->http->gpc, "HEAD")
- && strcmpic(csp->http->gpc, "TRACE")
- && strcmpic(csp->http->gpc, "OPTIONS")
- && strcmpic(csp->http->gpc, "DELETE"))
- {
- /* XXX: this is an incomplete hack */
- csp->flags &= ~CSP_FLAG_CLIENT_REQUEST_COMPLETELY_READ;
- log_error(LOG_LEVEL_CONNECT, "There better be a request body.");
- }
- else
- {
- csp->flags |= CSP_FLAG_CLIENT_REQUEST_COMPLETELY_READ;
- if ((csp->config->feature_flags & RUNTIME_FEATURE_TOLERATE_PIPELINING) == 0)
- {
- csp->flags |= CSP_FLAG_SERVER_SOCKET_TAINTED;
- log_error(LOG_LEVEL_CONNECT,
- "Possible pipeline attempt detected. The connection will not "
- "be kept alive and we will only serve the first request.");
- /* Nuke the pipelined requests from orbit, just to be sure. */
- clear_iob(csp->client_iob);
- }
- else
- {
- /*
- * Keep the pipelined data around for now, we'll deal with
- * it once we're done serving the current request.
- */
- csp->flags |= CSP_FLAG_PIPELINED_REQUEST_WAITING;
- assert(csp->client_iob->eod >= csp->client_iob->cur);
- log_error(LOG_LEVEL_CONNECT, "Complete client request followed by "
- "%d bytes of pipelined data received.",
- (int)(csp->client_iob->eod - csp->client_iob->cur));
- }
- }
- }
- else
- {
- csp->flags |= CSP_FLAG_CLIENT_REQUEST_COMPLETELY_READ;
- log_error(LOG_LEVEL_CONNECT, "Complete client request received.");
- }
- }
- /*********************************************************************
- *
- * Function : mark_server_socket_tainted
- *
- * Description : Makes sure we don't reuse a server socket
- * (if we didn't read everything the server sent
- * us reusing the socket would lead to garbage).
- *
- * Parameters :
- * 1 : csp = Current client state (buffers, headers, etc...)
- *
- * Returns : void.
- *
- *********************************************************************/
- static void mark_server_socket_tainted(struct client_state *csp)
- {
- /*
- * For consistency we always mark the server socket
- * tainted, however, to reduce the log noise we only
- * emit a log message if the server socket could have
- * actually been reused.
- */
- if ((csp->flags & CSP_FLAG_SERVER_CONNECTION_KEEP_ALIVE)
- && !(csp->flags & CSP_FLAG_SERVER_SOCKET_TAINTED))
- {
- log_error(LOG_LEVEL_CONNECT,
- "Marking the server socket %d tainted.",
- csp->server_connection.sfd);
- }
- csp->flags |= CSP_FLAG_SERVER_SOCKET_TAINTED;
- }
- /*********************************************************************
- *
- * Function : get_request_line
- *
- * Description : Read the client request line.
- *
- * Parameters :
- * 1 : csp = Current client state (buffers, headers, etc...)
- *
- * Returns : Pointer to request line or NULL in case of errors.
- *
- *********************************************************************/
- static char *get_request_line(struct client_state *csp)
- {
- char buf[BUFFER_SIZE];
- char *request_line = NULL;
- int len;
- memset(buf, 0, sizeof(buf));
- if ((csp->flags & CSP_FLAG_PIPELINED_REQUEST_WAITING) != 0)
- {
- /*
- * If there are multiple pipelined requests waiting,
- * the flag will be set again once the next request
- * has been parsed.
- */
- csp->flags &= ~CSP_FLAG_PIPELINED_REQUEST_WAITING;
- request_line = get_header(csp->client_iob);
- if ((NULL != request_line) && ('\0' != *request_line))
- {
- return request_line;
- }
- else
- {
- log_error(LOG_LEVEL_CONNECT, "No complete request line "
- "received yet. Continuing reading from %d.", csp->cfd);
- }
- }
- do
- {
- if (
- #ifdef FUZZ
- 0 == (csp->flags & CSP_FLAG_FUZZED_INPUT) &&
- #endif
- !data_is_available(csp->cfd, csp->config->socket_timeout)
- )
- {
- if (socket_is_still_alive(csp->cfd))
- {
- log_error(LOG_LEVEL_CONNECT,
- "No request line on socket %d received in time. Timeout: %d.",
- csp->cfd, csp->config->socket_timeout);
- write_socket_delayed(csp->cfd, CLIENT_CONNECTION_TIMEOUT_RESPONSE,
- strlen(CLIENT_CONNECTION_TIMEOUT_RESPONSE),
- get_write_delay(csp));
- }
- else
- {
- log_error(LOG_LEVEL_CONNECT,
- "The client side of the connection on socket %d got "
- "closed without sending a complete request line.", csp->cfd);
- }
- return NULL;
- }
- len = read_socket(csp->cfd, buf, sizeof(buf) - 1);
- if (len <= 0) return NULL;
- /*
- * If there is no memory left for buffering the
- * request, there is nothing we can do but hang up
- */
- if (add_to_iob(csp->client_iob, csp->config->buffer_limit, buf, len))
- {
- return NULL;
- }
- request_line = get_header(csp->client_iob);
- } while ((NULL != request_line) && ('\0' == *request_line));
- return request_line;
- }
- enum chunk_status
- {
- CHUNK_STATUS_MISSING_DATA,
- CHUNK_STATUS_BODY_COMPLETE,
- CHUNK_STATUS_PARSE_ERROR
- };
- /*********************************************************************
- *
- * Function : chunked_body_is_complete
- *
- * Description : Figures out whether or not a chunked body is complete.
- *
- * Currently it always starts at the beginning of the
- * buffer which is somewhat wasteful and prevents Privoxy
- * from starting to forward the correctly parsed chunks
- * as soon as theoretically possible.
- *
- * Should be modified to work with a common buffer,
- * and allow the caller to skip already parsed chunks.
- *
- * This would allow the function to be used for unbuffered
- * response bodies as well.
- *
- * Parameters :
- * 1 : iob = Buffer with the body to check.
- * 2 : length = Length of complete body
- *
- * Returns : Enum with the result of the check.
- *
- *********************************************************************/
- static enum chunk_status chunked_body_is_complete(struct iob *iob, size_t *length)
- {
- unsigned int chunksize;
- char *p = iob->cur;
- do
- {
- /*
- * We need at least a single digit, followed by "\r\n",
- * followed by an unknown amount of data, followed by "\r\n".
- */
- if (p + 5 > iob->eod)
- {
- return CHUNK_STATUS_MISSING_DATA;
- }
- if (sscanf(p, "%x", &chunksize) != 1)
- {
- return CHUNK_STATUS_PARSE_ERROR;
- }
- /*
- * We want at least a single digit, followed by "\r\n",
- * followed by the specified amount of data, followed by "\r\n".
- */
- if (p + chunksize + 5 > iob->eod)
- {
- return CHUNK_STATUS_MISSING_DATA;
- }
- /* Skip chunk-size. */
- p = strstr(p, "\r\n");
- if (NULL == p)
- {
- return CHUNK_STATUS_PARSE_ERROR;
- }
- /* Move beyond the chunkdata. */
- p += 2 + chunksize;
- /* There should be another "\r\n" to skip */
- if (memcmp(p, "\r\n", 2))
- {
- return CHUNK_STATUS_PARSE_ERROR;
- }
- p += 2;
- } while (chunksize > 0U);
- *length = (size_t)(p - iob->cur);
- assert(*length <= (size_t)(iob->eod - iob->cur));
- assert(p <= iob->eod);
- return CHUNK_STATUS_BODY_COMPLETE;
- }
- /*********************************************************************
- *
- * Function : receive_chunked_client_request_body
- *
- * Description : Read the chunk-encoded client request body.
- * Failures are dealt with.
- *
- * Parameters :
- * 1 : csp = Current client state (buffers, headers, etc...)
- *
- * Returns : JB_ERR_OK or JB_ERR_PARSE
- *
- *********************************************************************/
- static jb_err receive_chunked_client_request_body(struct client_state *csp)
- {
- size_t body_length;
- enum chunk_status status;
- while (CHUNK_STATUS_MISSING_DATA ==
- (status = chunked_body_is_complete(csp->client_iob, &body_length)))
- {
- char buf[BUFFER_SIZE];
- int len;
- if (!data_is_available(csp->cfd, csp->config->socket_timeout))
- {
- log_error(LOG_LEVEL_ERROR,
- "Timeout while waiting for the client body.");
- break;
- }
- len = read_socket(csp->cfd, buf, sizeof(buf) - 1);
- if (len <= 0)
- {
- log_error(LOG_LEVEL_ERROR, "Read the client body failed: %E");
- break;
- }
- if (add_to_iob(csp->client_iob, csp->config->buffer_limit, buf, len))
- {
- break;
- }
- }
- if (status != CHUNK_STATUS_BODY_COMPLETE)
- {
- write_socket_delayed(csp->cfd, CLIENT_BODY_PARSE_ERROR_RESPONSE,
- strlen(CLIENT_BODY_PARSE_ERROR_RESPONSE), get_write_delay(csp));
- log_error(LOG_LEVEL_CLF,
- "%s - - [%T] \"Failed reading chunked client body\" 400 0", csp->ip_addr_str);
- return JB_ERR_PARSE;
- }
- log_error(LOG_LEVEL_CONNECT,
- "Chunked client body completely read. Length: %lu", body_length);
- csp->expected_client_content_length = body_length;
- return JB_ERR_OK;
- }
- #ifdef FUZZ
- /*********************************************************************
- *
- * Function : fuzz_chunked_transfer_encoding
- *
- * Description : Treat the fuzzed input as chunked transfer encoding
- * to check and dechunk.
- *
- * Parameters :
- * 1 : csp = Used to store the data.
- * 2 : fuzz_input_file = File to read the input from.
- *
- * Returns : Result of dechunking
- *
- *********************************************************************/
- extern int fuzz_chunked_transfer_encoding(struct client_state *csp, char *fuzz_input_file)
- {
- size_t length;
- size_t size = (size_t)(csp->iob->eod - csp->iob->cur);
- enum chunk_status status;
- status = chunked_body_is_complete(csp->iob, &length);
- if (CHUNK_STATUS_BODY_COMPLETE != status)
- {
- log_error(LOG_LEVEL_INFO, "Chunked body is incomplete or invalid");
- }
- return (JB_ERR_OK == remove_chunked_transfer_coding(csp->iob->cur, &size));
- }
- /*********************************************************************
- *
- * Function : fuzz_client_request
- *
- * Description : Try to get a client request from the fuzzed input.
- *
- * Parameters :
- * 1 : csp = Current client state (buffers, headers, etc...)
- * 2 : fuzz_input_file = File to read the input from.
- *
- * Returns : Result of fuzzing.
- *
- *********************************************************************/
- extern int fuzz_client_request(struct client_state *csp, char *fuzz_input_file)
- {
- jb_err err;
- csp->cfd = 0;
- csp->ip_addr_str = "fuzzer";
- if (strcmp(fuzz_input_file, "-") != 0)
- {
- log_error(LOG_LEVEL_FATAL,
- "Fuzzed client requests can currently only be read from stdin (-).");
- }
- err = receive_client_request(csp);
- if (err != JB_ERR_OK)
- {
- return 1;
- }
- err = parse_client_request(csp);
- if (err != JB_ERR_OK)
- {
- return 1;
- }
- return 0;
- }
- #endif /* def FUZZ */
- #ifdef FEATURE_FORCE_LOAD
- /*********************************************************************
- *
- * Function : force_required
- *
- * Description : Checks a request line to see if it contains
- * the FORCE_PREFIX. If it does, it is removed
- * unless enforcing requests has beend disabled.
- *
- * Parameters :
- * 1 : request_line = HTTP request line
- *
- * Returns : TRUE if force is required, FALSE otherwise.
- *
- *********************************************************************/
- static int force_required(const struct client_state *csp, char *request_line)
- {
- char *p;
- p = strstr(request_line, "http://");
- if (p != NULL)
- {
- /* Skip protocol */
- p += strlen("http://");
- }
- else
- {
- /* Intercepted request usually don't specify the protocol. */
- p = request_line;
- }
- /* Go to the beginning of the path */
- p = strstr(p, "/");
- if (p == NULL)
- {
- /*
- * If the path is missing the request line is invalid and we
- * are done here. The client-visible rejection happens later on.
- */
- return 0;
- }
- if (0 == strncmpic(p, FORCE_PREFIX, strlen(FORCE_PREFIX) - 1))
- {
- if (!(csp->config->feature_flags & RUNTIME_FEATURE_ENFORCE_BLOCKS))
- {
- /* XXX: Should clean more carefully */
- strclean(request_line, FORCE_PREFIX);
- log_error(LOG_LEVEL_FORCE,
- "Enforcing request: \"%s\".", request_line);
- return 1;
- }
- log_error(LOG_LEVEL_FORCE,
- "Ignored force prefix in request: \"%s\".", request_line);
- }
- return 0;
- }
- #endif /* def FEATURE_FORCE_LOAD */
- /*********************************************************************
- *
- * Function : receive_client_request
- *
- * Description : Read the client's request (more precisely the
- * client headers) and answer it if necessary.
- *
- * Parameters :
- * 1 : csp = Current client state (buffers, headers, etc...)
- *
- * Returns : JB_ERR_OK, JB_ERR_PARSE or JB_ERR_MEMORY
- *
- *********************************************************************/
- static jb_err receive_client_request(struct client_state *csp)
- {
- char buf[BUFFER_SIZE];
- char *p;
- char *req = NULL;
- struct http_request *http;
- int len;
- jb_err err;
- /* Temporary copy of the client's headers before they get enlisted in csp->headers */
- struct list header_list;
- struct list *headers = &header_list;
- /* We don't care if the arriving data is a valid HTTP request or not. */
- csp->requests_received_total++;
- http = csp->http;
- memset(buf, 0, sizeof(buf));
- req = get_request_line(csp);
- if (req == NULL)
- {
- mark_server_socket_tainted(csp);
- return JB_ERR_PARSE;
- }
- assert(*req != '\0');
- if (client_protocol_is_unsupported(csp, req))
- {
- return JB_ERR_PARSE;
- }
- #ifdef FEATURE_FORCE_LOAD
- if (force_required(csp, req))
- {
- csp->flags |= CSP_FLAG_FORCED;
- }
- #endif /* def FEATURE_FORCE_LOAD */
- err = parse_http_request(req, http);
- freez(req);
- if (JB_ERR_OK != err)
- {
- write_socket_delayed(csp->cfd, CHEADER, strlen(CHEADER),
- get_write_delay(csp));
- /* XXX: Use correct size */
- log_error(LOG_LEVEL_CLF, "%s - - [%T] \"Invalid request\" 400 0", csp->ip_addr_str);
- log_error(LOG_LEVEL_ERROR,
- "Couldn't parse request line received from %s: %s",
- csp->ip_addr_str, jb_err_to_string(err));
- free_http_request(http);
- return JB_ERR_PARSE;
- }
- /* grab the rest of the client's headers */
- init_list(headers);
- for (;;)
- {
- p = get_header(csp->client_iob);
- if (p == NULL)
- {
- /* There are no additional headers to read. */
- break;
- }
- if (*p == '\0')
- {
- /*
- * We didn't receive a complete header
- * line yet, get the rest of it.
- */
- if (!data_is_available(csp->cfd, csp->config->socket_timeout))
- {
- log_error(LOG_LEVEL_ERROR,
- "Stopped grabbing the client headers.");
- destroy_list(headers);
- return JB_ERR_PARSE;
- }
- len = read_socket(csp->cfd, buf, sizeof(buf) - 1);
- if (len <= 0)
- {
- log_error(LOG_LEVEL_ERROR, "read from client failed: %E");
- destroy_list(headers);
- return JB_ERR_PARSE;
- }
- if (add_to_iob(csp->client_iob, csp->config->buffer_limit, buf, len))
- {
- /*
- * If there is no memory left for buffering the
- * request, there is nothing we can do but hang up
- */
- destroy_list(headers);
- return JB_ERR_MEMORY;
- }
- }
- else
- {
- if (!strncmpic(p, "Transfer-Encoding:", 18))
- {
- /*
- * XXX: should be called through sed()
- * but currently can't.
- */
- client_transfer_encoding(csp, &p);
- }
- /*
- * We were able to read a complete
- * header and can finally enlist it.
- */
- enlist(headers, p);
- freez(p);
- }
- }
- if (http->host == NULL)
- {
- /*
- * If we still don't know the request destination,
- * the request is invalid or the client uses
- * Privoxy without its knowledge.
- */
- if (JB_ERR_OK != get_request_destination_elsewhere(csp, headers))
- {
- /*
- * Our attempts to get the request destination
- * elsewhere failed or Privoxy is configured
- * to only accept proxy requests.
- *
- * An error response has already been send
- * and we're done here.
- */
- return JB_ERR_PARSE;
- }
- }
- #ifdef FEATURE_CLIENT_TAGS
- /* XXX: If the headers were enlisted sooner, passing csp would do. */
- set_client_address(csp, headers);
- get_tag_list_for_client(csp->client_tags, csp->client_address);
- #endif
- /*
- * Determine the actions for this URL
- */
- #ifdef FEATURE_TOGGLE
- if (!(csp->flags & CSP_FLAG_TOGGLED_ON))
- {
- /* Most compatible set of actions (i.e. none) */
- init_current_action(csp->action);
- }
- else
- #endif /* ndef FEATURE_TOGGLE */
- {
- get_url_actions(csp, http);
- }
- enlist(csp->headers, http->cmd);
- /* Append the previously read headers */
- err = list_append_list_unique(csp->headers, headers);
- destroy_list(headers);
- return err;
- }
- /*********************************************************************
- *
- * Function : parse_client_request
- *
- * Description : Parses the client's request and decides what to do
- * with it.
- *
- * Note that since we're not using select() we could get
- * blocked here if a client connected, then didn't say
- * anything!
- *
- * Parameters :
- * 1 : csp = Current client state (buffers, headers, etc...)
- *
- * Returns : JB_ERR_OK or JB_ERR_PARSE
- *
- *********************************************************************/
- static jb_err parse_client_request(struct client_state *csp)
- {
- struct http_request *http = csp->http;
- jb_err err;
- #ifdef FEATURE_CONNECTION_KEEP_ALIVE
- if ((csp->config->feature_flags & RUNTIME_FEATURE_CONNECTION_KEEP_ALIVE)
- && (!strcmpic(csp->http->version, "HTTP/1.1"))
- && (csp->http->ssl == 0))
- {
- /* Assume persistence until further notice */
- csp->flags |= CSP_FLAG_CLIENT_CONNECTION_KEEP_ALIVE;
- }
- #endif /* def FEATURE_CONNECTION_KEEP_ALIVE */
- if (csp->http->ssl == 0)
- {
- /*
- * This whole block belongs to chat() but currently
- * has to be executed before sed().
- */
- if (csp->flags & CSP_FLAG_CHUNKED_CLIENT_BODY)
- {
- if (receive_chunked_client_request_body(csp) != JB_ERR_OK)
- {
- return JB_ERR_PARSE;
- }
- }
- else
- {
- csp->expected_client_content_length = get_expected_content_length(csp->headers);
- }
- verify_request_length(csp);
- }
- #ifndef FEATURE_HTTPS_INSPECTION
- else
- {
- csp->flags |= CSP_FLAG_SERVER_SOCKET_TAINTED;
- }
- #endif
- err = sed(csp, FILTER_CLIENT_HEADERS);
- if (JB_ERR_OK != err)
- {
- log_error(LOG_LEVEL_ERROR, "Failed to parse client request from %s.",
- csp->ip_addr_str);
- log_error(LOG_LEVEL_CLF, "%s - - [%T] \"%s\" 400 0",
- csp->ip_addr_str, csp->http->cmd);
- write_socket_delayed(csp->cfd, CHEADER, strlen(CHEADER), get_write_delay(csp));
- return JB_ERR_PARSE;
- }
- csp->flags |= CSP_FLAG_CLIENT_HEADER_PARSING_DONE;
- /* Check request line for rewrites. */
- if ((NULL == csp->headers->first->str)
- || (strcmp(http->cmd, csp->headers->first->str) &&
- (JB_ERR_OK != change_request_destination(csp))))
- {
- /*
- * A header filter broke the request line - bail out.
- */
- write_socket_delayed(csp->cfd, MESSED_UP_REQUEST_RESPONSE,
- strlen(MESSED_UP_REQUEST_RESPONSE), get_write_delay(csp));
- /* XXX: Use correct size */
- log_error(LOG_LEVEL_CLF,
- "%s - - [%T] \"Invalid request generated\" 500 0", csp->ip_addr_str);
- log_error(LOG_LEVEL_ERROR,
- "Invalid request line after applying header filters.");
- free_http_request(http);
- return JB_ERR_PARSE;
- }
- if (client_has_unsupported_expectations(csp))
- {
- return JB_ERR_PARSE;
- }
- return JB_ERR_OK;
- }
- /*********************************************************************
- *
- * Function : send_http_request
- *
- * Description : Sends the HTTP headers from the client request
- * and all the body data that has already been received.
- *
- * Parameters :
- * 1 : csp = Current client state (buffers, headers, etc...)
- *
- * Returns : 0 on success, anything else is an error.
- *
- *********************************************************************/
- static int send_http_request(struct client_state *csp)
- {
- char *hdr;
- int write_failure;
- hdr = list_to_text(csp->headers);
- if (hdr == NULL)
- {
- /* FIXME Should handle error properly */
- log_error(LOG_LEVEL_FATAL, "Out of memory parsing client header");
- }
- list_remove_all(csp->headers);
- /*
- * Write the client's (modified) header to the server
- * (along with anything else that may be in the buffer)
- */
- write_failure = 0 != write_socket(csp->server_connection.sfd, hdr, strlen(hdr));
- freez(hdr);
- if (write_failure)
- {
- log_error(LOG_LEVEL_CONNECT, "Failed sending request headers to: %s: %E",
- csp->http->hostport);
- }
- else if (((csp->flags & CSP_FLAG_PIPELINED_REQUEST_WAITING) == 0)
- && (flush_iob(csp->server_connection.sfd, csp->client_iob, 0) < 0))
- {
- write_failure = 1;
- log_error(LOG_LEVEL_CONNECT, "Failed sending request body to: %s: %E",
- csp->http->hostport);
- }
- return write_failure;
- }
- #ifdef FEATURE_HTTPS_INSPECTION
- /*********************************************************************
- *
- * Function : receive_and_send_encrypted_post_data
- *
- * Description : Reads remaining POST data from the client and sends
- * it to the server.
- *
- * Parameters :
- * 1 : csp = Current client state (buffers, headers, etc...)
- *
- * Returns : 0 on success, anything else is an error.
- *
- *********************************************************************/
- static int receive_and_send_encrypted_post_data(struct client_state *csp)
- {
- int content_length_known = csp->expected_client_content_length != 0;
- while (is_ssl_pending(&(csp->ssl_client_attr))
- || (content_length_known && csp->expected_client_content_length != 0))
- {
- unsigned char buf[BUFFER_SIZE];
- int len;
- int max_bytes_to_read = sizeof(buf);
- if (content_length_known && csp->expected_client_content_length < sizeof(buf))
- {
- max_bytes_to_read = (int)csp->expected_client_content_length;
- }
- log_error(LOG_LEVEL_CONNECT,
- "Waiting for up to %d bytes of POST data from the client.",
- max_bytes_to_read);
- len = ssl_recv_data(&(csp->ssl_client_attr), buf,
- (unsigned)max_bytes_to_read);
- if (len == -1)
- {
- return 1;
- }
- if (len == 0)
- {
- /* XXX: Does this actually happen? */
- break;
- }
- log_error(LOG_LEVEL_CONNECT, "Forwarding %d bytes of encrypted POST data",
- len);
- len = ssl_send_data(&(csp->ssl_server_attr), buf, (size_t)len);
- if (len == -1)
- {
- return 1;
- }
- if (csp->expected_client_content_length != 0)
- {
- if (csp->expected_client_content_length >= len)
- {
- csp->expected_client_content_length -= (unsigned)len;
- }
- if (csp->expected_client_content_length == 0)
- {
- log_error(LOG_LEVEL_CONNECT, "Forwarded the last %d bytes", len);
- break;
- }
- }
- }
- log_error(LOG_LEVEL_CONNECT, "Done forwarding encrypted POST data");
- return 0;
- }
- /*********************************************************************
- *
- * Function : send_https_request
- *
- * Description : Sends the HTTP headers from the client request
- * and all the body data that has already been received.
- *
- * Parameters :
- * 1 : csp = Current client state (buffers, headers, etc...)
- *
- * Returns : 0 on success, anything else is an error.
- *
- *********************************************************************/
- static int send_https_request(struct client_state *csp)
- {
- char *hdr;
- int ret;
- long flushed = 0;
- hdr = list_to_text(csp->https_headers);
- if (hdr == NULL)
- {
- /* FIXME Should handle error properly */
- log_error(LOG_LEVEL_FATAL, "Out of memory parsing client header");
- }
- list_remove_all(csp->https_headers);
- /*
- * Write the client's (modified) header to the server
- * (along with anything else that may be in the buffer)
- */
- ret = ssl_send_data(&(csp->ssl_server_attr),
- (const unsigned char *)hdr, strlen(hdr));
- freez(hdr);
- if (ret < 0)
- {
- log_error(LOG_LEVEL_CONNECT,
- "Failed sending encrypted request headers to: %s: %E",
- csp->http->hostport);
- mark_server_socket_tainted(csp);
- return 1;
- }
- if (((csp->flags & CSP_FLAG_PIPELINED_REQUEST_WAITING) == 0)
- && ((flushed = ssl_flush_socket(&(csp->ssl_server_attr),
- csp->client_iob)) < 0))
- {
- log_error(LOG_LEVEL_CONNECT, "Failed sending request body to: %s: %E",
- csp->http->hostport);
- return 1;
- }
- if (flushed != 0 || csp->expected_client_content_length != 0)
- {
- if (csp->expected_client_content_length != 0)
- {
- if (csp->expected_client_content_length < flushed)
- {
- log_error(LOG_LEVEL_ERROR,
- "Flushed %ld bytes of request body while only expecting %llu",
- flushed, csp->expected_client_content_length);
- csp->expected_client_content_length = 0;
- }
- else
- {
- log_error(LOG_LEVEL_CONNECT,
- "Flushed %ld bytes of request body while expecting %llu",
- flushed, csp->expected_client_content_length);
- csp->expected_client_content_length -= (unsigned)flushed;
- if (receive_and_send_encrypted_post_data(csp))
- {
- return 1;
- }
- }
- }
- else
- {
- log_error(LOG_LEVEL_CONNECT,
- "Flushed %ld bytes of request body", flushed);
- }
- }
- log_error(LOG_LEVEL_CONNECT, "Encrypted request sent");
- return 0;
- }
- /*********************************************************************
- *
- * Function : receive_encrypted_request
- *
- * Description : Receives an encrypted request.
- *
- * Parameters :
- * 1 : csp = Current client state (buffers, headers, etc...)
- *
- * Returns : JB_ERR_OK on success,
- * JB_ERR_PARSE or JB_ERR_MEMORY otherwise
- *
- *********************************************************************/
- static jb_err receive_encrypted_request(struct client_state *csp)
- {
- char buf[BUFFER_SIZE];
- int len;
- char *p;
- do
- {
- log_error(LOG_LEVEL_HEADER, "Reading encrypted headers");
- if (!is_ssl_pending(&(csp->ssl_client_attr)) &&
- !data_is_available(csp->cfd, csp->config->socket_timeout))
- {
- log_error(LOG_LEVEL_CONNECT,
- "Socket %d timed out while waiting for client headers", csp->cfd);
- return JB_ERR_PARSE;
- }
- len = ssl_recv_data(&(csp->ssl_client_attr),
- (unsigned char *)buf, sizeof(buf));
- if (len == 0)
- {
- log_error(LOG_LEVEL_CONNECT,
- "Socket %d closed while waiting for client headers", csp->cfd);
- return JB_ERR_PARSE;
- }
- if (len == -1)
- {
- return JB_ERR_PARSE;
- }
- if (add_to_iob(csp->client_iob, csp->config->buffer_limit, buf, len))
- {
- return JB_ERR_MEMORY;
- }
- p = strstr(csp->client_iob->cur, "\r\n\r\n");
- } while (p == NULL);
- log_error(LOG_LEVEL_HEADER, "Encrypted headers received completely");
- return JB_ERR_OK;
- }
- /*********************************************************************
- *
- * Function : process_encrypted_request
- *
- * Description : Receives and parses an encrypted request.
- *
- * Parameters :
- * 1 : csp = Current client state (buffers, headers, etc...)
- *
- * Returns : JB_ERR_OK on success,
- * JB_ERR_PARSE or JB_ERR_MEMORY otherwise
- *
- *********************************************************************/
- static jb_err process_encrypted_request(struct client_state *csp)
- {
- char *p;
- char *request_line;
- jb_err err;
- /* Temporary copy of the client's headers before they get enlisted in csp->https_headers */
- struct list header_list;
- struct list *headers = &header_list;
- assert(csp->ssl_with_client_is_opened);
- #ifdef FEATURE_CONNECTION_KEEP_ALIVE
- if (csp->config->feature_flags & RUNTIME_FEATURE_CONNECTION_KEEP_ALIVE)
- {
- csp->flags |= CSP_FLAG_CLIENT_CONNECTION_KEEP_ALIVE;
- }
- #endif
- err = receive_encrypted_request(csp);
- if (err != JB_ERR_OK)
- {
- if (csp->client_iob->cur == NULL ||
- csp->client_iob->cur == csp->client_iob->eod)
- {
- /*
- * We did not receive any data, most likely because the
- * client is done. Don't log this as a parse failure.
- */
- return JB_ERR_PARSE;
- }
- /* XXX: Also used for JB_ERR_MEMORY */
- log_error(LOG_LEVEL_ERROR, "Failed to receive encrypted request: %s",
- jb_err_to_string(err));
- ssl_send_data_delayed(&(csp->ssl_client_attr),
- (const unsigned char *)CHEADER, strlen(CHEADER), get_write_delay(csp));
- return err;
- }
- /* We don't need get_request_line() because the whole HTTP head is buffered. */
- request_line = get_header(csp->client_iob);
- if (request_line == NULL)
- {
- log_error(LOG_LEVEL_ERROR, "Failed to get the encrypted request line");
- ssl_send_data_delayed(&(csp->ssl_client_attr),
- (const unsigned char *)CHEADER, strlen(CHEADER), get_write_delay(csp));
- return JB_ERR_PARSE;
- }
- assert(*request_line != '\0');
- if (client_protocol_is_unsupported(csp, request_line))
- {
- /*
- * If the protocol is unsupported we're done here.
- * client_protocol_is_unsupported() took care of sending
- * the error response and logging the error message.
- */
- return JB_ERR_PARSE;
- }
- #ifdef FEATURE_FORCE_LOAD
- if (force_required(csp, request_line))
- {
- csp->flags |= CSP_FLAG_FORCED;
- }
- #endif /* def FEATURE_FORCE_LOAD */
- free_http_request(csp->http);
- err = parse_http_request(request_line, csp->http);
- /* XXX: Restore ssl setting. This is ugly */
- csp->http->client_ssl = 1;
- csp->http->server_ssl = 1;
- freez(request_line);
- if (JB_ERR_OK != err)
- {
- ssl_send_data_delayed(&(csp->ssl_client_attr),
- (const unsigned char *)CHEADER, strlen(CHEADER), get_write_delay(csp));
- /* XXX: Use correct size */
- log_error(LOG_LEVEL_CLF, "%s - - [%T] \"Invalid request\" 400 0", csp->ip_addr_str);
- log_error(LOG_LEVEL_ERROR,
- "Couldn't parse request line received from %s: %s",
- csp->ip_addr_str, jb_err_to_string(err));
- free_http_request(csp->http);
- return JB_ERR_PARSE;
- }
- /* Parse the rest of the client's headers. */
- init_list(headers);
- for (;;)
- {
- p = get_header(csp->client_iob);
- if (p == NULL)
- {
- /* There are no additional headers to read. */
- break;
- }
- enlist(headers, p);
- freez(p);
- }
- if (JB_ERR_OK != get_destination_from_https_headers(headers, csp->http))
- {
- /*
- * Our attempts to get the request destination
- * elsewhere failed.
- */
- log_error(LOG_LEVEL_ERROR,
- "Failed to get the encrypted request destination");
- ssl_send_data_delayed(&(csp->ssl_client_attr),
- (const unsigned char *)CHEADER, strlen(CHEADER), get_write_delay(csp));
- return JB_ERR_PARSE;
- }
- /* Split the domain we just got for pattern matching */
- init_domain_components(csp->http);
- #ifdef FEATURE_CLIENT_TAGS
- /* XXX: If the headers were enlisted sooner, passing csp would do. */
- if (csp->client_address == NULL)
- {
- set_client_address(csp, headers);
- get_tag_list_for_client(csp->client_tags, csp->client_address);
- }
- #endif
- #ifdef FEATURE_TOGGLE
- if ((csp->flags & CSP_FLAG_TOGGLED_ON) != 0)
- #endif
- {
- /*
- * Determine the actions for this request after
- * clearing the ones from the previous one.
- */
- free_current_action(csp->action);
- get_url_actions(csp, csp->http);
- }
- enlist(csp->https_headers, csp->http->cmd);
- /* Append the previously read headers */
- err = list_append_list_unique(csp->https_headers, headers);
- destroy_list(headers);
- if (JB_ERR_OK != err)
- {
- /* XXX: Send error message */
- return err;
- }
- /* XXX: Work around crash */
- csp->error_message = NULL;
- /* XXX: Why do this here? */
- csp->http->ssl = 1;
- err = sed_https(csp);
- if (JB_ERR_OK != err)
- {
- ssl_send_data_delayed(&(csp->ssl_client_attr),
- (const unsigned char *)CHEADER, strlen(CHEADER), get_write_delay(csp));
- log_error(LOG_LEVEL_ERROR, "Failed to parse client request from %s.",
- csp->ip_addr_str);
- log_error(LOG_LEVEL_CLF, "%s - - [%T] \"%s\" 400 0",
- csp->ip_addr_str, csp->http->cmd);
- return JB_ERR_PARSE;
- }
- log_error(LOG_LEVEL_HEADER, "Encrypted request processed");
- log_applied_actions(csp->action);
- log_error(LOG_LEVEL_REQUEST, "https://%s%s", csp->http->hostport,
- csp->http->path);
- return err;
- }
- /*********************************************************************
- *
- * Function : cgi_page_requested
- *
- * Description : Checks if a request is for an internal CGI page.
- *
- * Parameters :
- * 1 : host = The host requested by the client.
- *
- * Returns : 1 if a CGI page has been requested, 0 otherwise
- *
- *********************************************************************/
- static int cgi_page_requested(const char *host)
- {
- if ((0 == strcmpic(host, CGI_SITE_1_HOST))
- || (0 == strcmpic(host, CGI_SITE_1_HOST "."))
- || (0 == strcmpic(host, CGI_SITE_2_HOST))
- || (0 == strcmpic(host, CGI_SITE_2_HOST ".")))
- {
- return 1;
- }
- return 0;
- }
- #ifdef FEATURE_CONNECTION_KEEP_ALIVE
- /*********************************************************************
- *
- * Function : continue_https_chat
- *
- * Description : Behaves similar to chat() but only deals with
- * https-inspected requests that arrive on an already
- * established connection. The first request is always
- * served by chat() which is a lot more complex as it
- * has to deal with forwarding settings and connection
- * failures etc.
- *
- * If a connection to the server has already been
- * opened it is reused unless the request is blocked
- * or the forwarder changed.
- *
- * If a connection to the server has not yet been
- * opened (because the previous request was crunched),
- * or the forwarder changed, the connection is dropped
- * so that the client retries on a fresh one.
- *
- * Parameters :
- * 1 : csp = Current client state (buffers, headers, etc...)
- *
- * Returns : Nothing.
- *
- *********************************************************************/
- static void continue_https_chat(struct client_state *csp)
- {
- const struct forward_spec *fwd;
- if (JB_ERR_OK != process_encrypted_request(csp))
- {
- return;
- }
- csp->requests_received_total++;
- /*
- * We have an encrypted request. Check if one of the crunchers wants it.
- */
- if (crunch_response_triggered(csp, crunchers_all))
- {
- /*
- * Yes. The client got the crunch response and we're done here.
- */
- return;
- }
- if (csp->ssl_with_server_is_opened == 0)
- {
- log_error(LOG_LEVEL_CONNECT,
- "Dropping the client connection on socket %d. "
- "The server connection has not been established yet.",
- csp->cfd);
- csp->flags &= ~CSP_FLAG_CLIENT_CONNECTION_KEEP_ALIVE;
- return;
- }
- assert(csp->server_connection.sfd != JB_INVALID_SOCKET);
- fwd = forward_url(csp, csp->http);
- if (!connection_destination_matches(&csp->server_connection, csp->http, fwd))
- {
- log_error(LOG_LEVEL_CONNECT,
- "Dropping the client connection on socket %d with "
- "server socket %d connected to %s. The forwarder has changed.",
- csp->cfd, csp->server_connection.sfd, csp->server_connection.host);
- csp->flags &= ~CSP_FLAG_CLIENT_CONNECTION_KEEP_ALIVE;
- return;
- }
- log_error(LOG_LEVEL_CONNECT,
- "Reusing server socket %d connected to %s. Requests already sent: %u.",
- csp->server_connection.sfd, csp->server_connection.host,
- csp->server_connection.requests_sent_total);
- if (send_https_request(csp))
- {
- /*
- * Most likely the server connection timed out. We can't easily
- * create a new one so simply drop the client connection without a
- * error response to let the client retry.
- */
- log_error(LOG_LEVEL_CONNECT,
- "Dropping client connection on socket %d. "
- "Forwarding the encrypted client request failed.",
- csp->cfd);
- return;
- }
- csp->server_connection.requests_sent_total++;
- handle_established_connection(csp);
- freez(csp->receive_buffer);
- }
- #endif /* def FEATURE_CONNECTION_KEEP_ALIVE */
- #endif
- /*********************************************************************
- *
- * Function : handle_established_connection
- *
- * Description : Shuffle data between client and server once the
- * connection has been established.
- *
- * Parameters :
- * 1 : csp = Current client state (buffers, headers, etc...)
- *
- * Returns : Nothing.
- *
- *********************************************************************/
- static void handle_established_connection(struct client_state *csp)
- {
- char *hdr;
- char *p;
- int n;
- #ifdef HAVE_POLL
- struct pollfd poll_fds[2];
- #else
- fd_set rfds;
- jb_socket maxfd;
- struct timeval timeout;
- #endif
- int server_body;
- int ms_iis5_hack = 0;
- unsigned long long byte_count = 0;
- struct http_request *http;
- long len = 0; /* for buffer sizes (and negative error codes) */
- int buffer_and_filter_content = 0;
- unsigned int write_delay;
- #ifdef FEATURE_HTTPS_INSPECTION
- int ret = 0;
- int use_ssl_tunnel = 0;
- csp->dont_verify_certificate = 0;
- if (csp->http->ssl && !(csp->action->flags & ACTION_HTTPS_INSPECTION))
- {
- /* Pass encrypted content without filtering. */
- use_ssl_tunnel = 1;
- }
- #endif
- /* Skeleton for HTTP response, if we should intercept the request */
- struct http_response *rsp;
- #ifdef FEATURE_CONNECTION_KEEP_ALIVE
- int watch_client_socket;
- #endif
- csp->receive_buffer_size = csp->config->receive_buffer_size;
- csp->receive_buffer = zalloc(csp->receive_buffer_size + 1);
- if (csp->receive_buffer == NULL)
- {
- log_error(LOG_LEVEL_ERROR,
- "Out of memory. Failed to allocate the receive buffer.");
- rsp = cgi_error_memory();
- send_crunch_response(csp, rsp);
- return;
- }
- http = csp->http;
- #ifndef HAVE_POLL
- maxfd = (csp->cfd > csp->server_connection.sfd) ?
- csp->cfd : csp->server_connection.sfd;
- #endif
- /* pass data between the client and server
- * until one or the other shuts down the connection.
- */
- server_body = 0;
- #ifdef FEATURE_CONNECTION_KEEP_ALIVE
- watch_client_socket = 0 == (csp->flags & CSP_FLAG_PIPELINED_REQUEST_WAITING);
- #endif
- write_delay = get_write_delay(csp);
- for (;;)
- {
- #ifndef HAVE_POLL
- FD_ZERO(&rfds);
- #ifdef FEATURE_CONNECTION_KEEP_ALIVE
- if (!watch_client_socket)
- {
- maxfd = csp->server_connection.sfd;
- }
- else
- #endif /* def FEATURE_CONNECTION_KEEP_ALIVE */
- {
- FD_SET(csp->cfd, &rfds);
- }
- FD_SET(csp->server_connection.sfd, &rfds);
- #endif /* ndef HAVE_POLL */
- #ifdef FEATURE_CONNECTION_KEEP_ALIVE
- if ((csp->flags & CSP_FLAG_CHUNKED)
- && !(csp->flags & CSP_FLAG_CONTENT_LENGTH_SET)
- && ((csp->iob->eod - csp->iob->cur) >= 5)
- && !memcmp(csp->iob->eod-5, "0\r\n\r\n", 5))
- {
- /*
- * XXX: This check should be obsolete now,
- * but let's wait a while to be sure.
- */
- log_error(LOG_LEVEL_CONNECT,
- "Looks like we got the last chunk together with "
- "the server headers but didn't detect it earlier. "
- "We better stop reading.");
- byte_count = (unsigned long long)(csp->iob->eod - csp->iob->cur);
- csp->expected_content_length = byte_count;
- csp->flags |= CSP_FLAG_CONTENT_LENGTH_SET;
- }
- if (server_body && server_response_is_complete(csp, byte_count))
- {
- if (csp->expected_content_length == byte_count)
- {
- log_error(LOG_LEVEL_CONNECT,
- "Done reading from server. Content length: %llu as expected. "
- "Bytes most recently read: %ld.",
- byte_count, len);
- }
- else
- {
- log_error(LOG_LEVEL_CONNECT,
- "Done reading from server. Expected content length: %llu. "
- "Actual content length: %llu. Bytes most recently read: %ld.",
- csp->expected_content_length, byte_count, len);
- }
- len = 0;
- /*
- * XXX: Should not jump around, handle_established_connection()
- * is complicated enough already.
- */
- goto reading_done;
- }
- #endif /* FEATURE_CONNECTION_KEEP_ALIVE */
- #ifdef HAVE_POLL
- poll_fds[0].fd = csp->cfd;
- #ifdef FEATURE_CONNECTION_KEEP_ALIVE
- if (!watch_client_socket)
- {
- /*
- * Ignore incoming data, but still watch out
- * for disconnects etc. These flags are always
- * implied anyway but explicitly setting them
- * doesn't hurt.
- */
- poll_fds[0].events = POLLERR|POLLHUP;
- }
- else
- #endif
- {
- poll_fds[0].events = POLLIN;
- }
- poll_fds[1].fd = csp->server_connection.sfd;
- poll_fds[1].events = POLLIN;
- n = poll(poll_fds, 2, csp->config->socket_timeout * 1000);
- #else
- timeout.tv_sec = csp->config->socket_timeout;
- timeout.tv_usec = 0;
- n = select((int)maxfd + 1, &rfds, NULL, NULL, &timeout);
- #endif /* def HAVE_POLL */
- /*server or client not responding in timeout */
- if (n == 0)
- {
- log_error(LOG_LEVEL_CONNECT, "Socket timeout %d reached: %s",
- csp->config->socket_timeout, http->url);
- if ((byte_count == 0) && (http->ssl == 0))
- {
- send_crunch_response(csp, error_response(csp, "connection-timeout"));
- }
- mark_server_socket_tainted(csp);
- #ifdef FEATURE_HTTPS_INSPECTION
- close_client_and_server_ssl_connections(csp);
- #endif
- return;
- }
- else if (n < 0)
- {
- #ifdef HAVE_POLL
- log_error(LOG_LEVEL_ERROR, "poll() failed!: %E");
- #else
- log_error(LOG_LEVEL_ERROR, "select() failed!: %E");
- #endif
- mark_server_socket_tainted(csp);
- #ifdef FEATURE_HTTPS_INSPECTION
- close_client_and_server_ssl_connections(csp);
- #endif
- return;
- }
- /*
- * This is the body of the browser's request,
- * just read and write it.
- *
- * Receives data from browser and sends it to server
- *
- * XXX: Make sure the client doesn't use pipelining
- * behind Privoxy's back.
- */
- #ifdef HAVE_POLL
- if ((poll_fds[0].revents & (POLLERR|POLLHUP|POLLNVAL)) != 0)
- {
- log_error(LOG_LEVEL_CONNECT,
- "The client socket %d has become unusable while "
- "the server socket %d is still open.",
- csp->cfd, csp->server_connection.sfd);
- mark_server_socket_tainted(csp);
- break;
- }
- if (poll_fds[0].revents != 0)
- #else
- if (FD_ISSET(csp->cfd, &rfds))
- #endif /* def HAVE_POLL*/
- {
- int max_bytes_to_read = (int)csp->receive_buffer_size;
- #ifdef FEATURE_CONNECTION_KEEP_ALIVE
- if ((csp->flags & CSP_FLAG_CLIENT_REQUEST_COMPLETELY_READ))
- {
- if (data_is_available(csp->cfd, 0))
- {
- /*
- * If the next request is already waiting, we have
- * to stop select()ing the client socket. Otherwise
- * we would always return right away and get nothing
- * else done.
- */
- watch_client_socket = 0;
- log_error(LOG_LEVEL_CONNECT,
- "Stop watching client socket %d. "
- "There's already another request waiting.",
- csp->cfd);
- continue;
- }
- /*
- * If the client socket is set, but there's no data
- * available on the socket, the client went fishing
- * and continuing talking to the server makes no sense.
- */
- log_error(LOG_LEVEL_CONNECT,
- "The client closed socket %d while "
- "the server socket %d is still open.",
- csp->cfd, csp->server_connection.sfd);
- mark_server_socket_tainted(csp);
- break;
- }
- if (csp->expected_client_content_length != 0)
- {
- if (csp->expected_client_content_length < csp->receive_buffer_size)
- {
- max_bytes_to_read = (int)csp->expected_client_content_length;
- }
- log_error(LOG_LEVEL_CONNECT,
- "Waiting for up to %d bytes from the client.",
- max_bytes_to_read);
- }
- assert(max_bytes_to_read <= csp->receive_buffer_size);
- #endif /* def FEATURE_CONNECTION_KEEP_ALIVE */
- #ifdef FEATURE_HTTPS_INSPECTION
- if (client_use_ssl(csp))
- {
- if (csp->http->status == 101)
- {
- len = ssl_recv_data(&(csp->ssl_client_attr),
- (unsigned char *)csp->receive_buffer,
- (size_t)max_bytes_to_read);
- if (len == -1)
- {
- log_error(LOG_LEVEL_ERROR, "Failed to receive data "
- "on client socket %d for an upgraded connection",
- csp->cfd);
- break;
- }
- if (len == 0)
- {
- log_error(LOG_LEVEL_CONNECT, "Done receiving data "
- "on client socket %d for an upgraded connection",
- csp->cfd);
- break;
- }
- byte_count += (unsigned long long)len;
- len = ssl_send_data(&(csp->ssl_server_attr),
- (unsigned char *)csp->receive_buffer, (size_t)len);
- if (len == -1)
- {
- log_error(LOG_LEVEL_ERROR, "Failed to send data "
- "on server socket %d for an upgraded connection",
- csp->server_connection.sfd);
- break;
- }
- continue;
- }
- log_error(LOG_LEVEL_CONNECT, "Breaking with TLS/SSL.");
- break;
- }
- else
- #endif /* def FEATURE_HTTPS_INSPECTION */
- {
- len = read_socket(csp->cfd, csp->receive_buffer, max_bytes_to_read);
- if (len <= 0)
- {
- /* XXX: not sure if this is necessary. */
- mark_server_socket_tainted(csp);
- break; /* "game over, man" */
- }
- #ifdef FEATURE_CONNECTION_KEEP_ALIVE
- if (csp->expected_client_content_length != 0)
- {
- assert(len <= max_bytes_to_read);
- csp->expected_client_content_length -= (unsigned)len;
- log_error(LOG_LEVEL_CONNECT,
- "Expected client content length set to %llu "
- "after reading %ld bytes.",
- csp->expected_client_content_length, len);
- if (csp->expected_client_content_length == 0)
- {
- log_error(LOG_LEVEL_CONNECT,
- "Done reading from the client.");
- csp->flags |= CSP_FLAG_CLIENT_REQUEST_COMPLETELY_READ;
- }
- }
- #endif /* def FEATURE_CONNECTION_KEEP_ALIVE */
- if (write_socket(csp->server_connection.sfd, csp->receive_buffer, (size_t)len))
- {
- log_error(LOG_LEVEL_ERROR, "write to: %s failed: %E", http->host);
- mark_server_socket_tainted(csp);
- return;
- }
- }
- continue;
- }
- /*
- * The server wants to talk. It could be the header or the body.
- * If `hdr' is null, then it's the header otherwise it's the body.
- * FIXME: Does `hdr' really mean `host'? No.
- */
- #ifdef HAVE_POLL
- if (poll_fds[1].revents != 0)
- #else
- if (FD_ISSET(csp->server_connection.sfd, &rfds))
- #endif /* HAVE_POLL */
- {
- #ifdef FEATURE_CONNECTION_KEEP_ALIVE
- /*
- * If we are buffering content, we don't want to eat up to
- * buffer-limit bytes if the client no longer cares about them.
- * If we aren't buffering, however, a dead client socket will be
- * noticed pretty much right away anyway, so we can reduce the
- * overhead by skipping the check.
- */
- if (buffer_and_filter_content && !socket_is_still_alive(csp->cfd))
- {
- #ifdef _WIN32
- log_error(LOG_LEVEL_CONNECT,
- "The server still wants to talk, but the client may already have hung up on us.");
- #else
- log_error(LOG_LEVEL_CONNECT,
- "The server still wants to talk, but the client hung up on us.");
- mark_server_socket_tainted(csp);
- #ifdef FEATURE_HTTPS_INSPECTION
- close_client_and_server_ssl_connections(csp);
- #endif
- return;
- #endif /* def _WIN32 */
- }
- #endif /* def FEATURE_CONNECTION_KEEP_ALIVE */
- #ifdef FEATURE_HTTPS_INSPECTION
- /*
- * Reading data from standard or secured connection (HTTP/HTTPS)
- */
- if (server_use_ssl(csp))
- {
- len = ssl_recv_data(&(csp->ssl_server_attr),
- (unsigned char *)csp->receive_buffer, csp->receive_buffer_size);
- }
- else
- #endif
- {
- len = read_socket(csp->server_connection.sfd, csp->receive_buffer,
- (int)csp->receive_buffer_size);
- }
- if (len < 0)
- {
- log_error(LOG_LEVEL_ERROR, "read from: %s failed: %E", http->host);
- if ((http->ssl && (csp->fwd == NULL))
- #ifdef FEATURE_HTTPS_INSPECTION
- && use_ssl_tunnel
- #endif
- )
- {
- /*
- * Just hang up. We already confirmed the client's CONNECT
- * request with status code 200 and unencrypted content is
- * no longer welcome.
- */
- log_error(LOG_LEVEL_ERROR,
- "CONNECT already confirmed. Unable to tell the client about the problem.");
- return;
- }
- else if (byte_count)
- {
- /*
- * Just hang up. We already transmitted the original headers
- * and parts of the original content and therefore missed the
- * chance to send an error message (without risking data corruption).
- *
- * XXX: we could retry with a fancy range request here.
- */
- log_error(LOG_LEVEL_ERROR, "Already forwarded the original headers. "
- "Unable to tell the client about the problem.");
- mark_server_socket_tainted(csp);
- #ifdef FEATURE_HTTPS_INSPECTION
- close_client_and_server_ssl_connections(csp);
- #endif
- return;
- }
- /*
- * XXX: Consider handling the cases above the same.
- */
- mark_server_socket_tainted(csp);
- len = 0;
- }
- #ifdef FEATURE_CONNECTION_KEEP_ALIVE
- if (csp->flags & CSP_FLAG_CHUNKED)
- {
- if ((len >= 5) && !memcmp(csp->receive_buffer+len-5, "0\r\n\r\n", 5))
- {
- /* XXX: this is a temporary hack */
- log_error(LOG_LEVEL_CONNECT,
- "Looks like we reached the end of the last chunk. "
- "We better stop reading.");
- csp->expected_content_length = byte_count + (unsigned long long)len;
- csp->flags |= CSP_FLAG_CONTENT_LENGTH_SET;
- }
- }
- reading_done:
- #endif /* FEATURE_CONNECTION_KEEP_ALIVE */
- /*
- * This is guaranteed by allocating with zalloc_or_die()
- * and never (intentionally) writing to the last byte.
- *
- * csp->receive_buffer_size is the size of the part of the
- * buffer we intentionally write to, but we actually
- * allocated csp->receive_buffer_size+1 bytes so the assertion
- * stays within the allocated range.
- */
- assert(csp->receive_buffer[csp->receive_buffer_size] == '\0');
- /*
- * Add a trailing zero to let be able to use string operations.
- * XXX: do we still need this with filter_popups gone?
- */
- assert(len <= csp->receive_buffer_size);
- csp->receive_buffer[len] = '\0';
- /*
- * Normally, this would indicate that we've read
- * as much as the server has sent us and we can
- * close the client connection. However, Microsoft
- * in its wisdom has released IIS/5 with a bug that
- * prevents it from sending the trailing \r\n in
- * a 302 redirect header (and possibly other headers).
- * To work around this if we've haven't parsed
- * a full header we'll append a trailing \r\n
- * and see if this now generates a valid one.
- *
- * This hack shouldn't have any impacts. If we've
- * already transmitted the header or if this is a
- * SSL connection, then we won't bother with this
- * hack. So we only work on partially received
- * headers. If we append a \r\n and this still
- * doesn't generate a valid header, then we won't
- * transmit anything to the client.
- */
- if (len == 0)
- {
- if (server_body || (http->ssl
- #ifdef FEATURE_HTTPS_INSPECTION
- && use_ssl_tunnel
- #endif
- ))
- {
- /*
- * If we have been buffering up the document,
- * now is the time to apply content modification
- * and send the result to the client.
- */
- if (buffer_and_filter_content)
- {
- p = execute_content_filters(csp);
- /*
- * If content filtering fails, use the original
- * buffer and length.
- * (see p != NULL ? p : csp->iob->cur below)
- */
- if (NULL == p)
- {
- csp->content_length = (size_t)(csp->iob->eod - csp->iob->cur);
- }
- #ifdef FEATURE_COMPRESSION
- else if ((csp->flags & CSP_FLAG_CLIENT_SUPPORTS_DEFLATE)
- && (csp->content_length > LOWER_LENGTH_LIMIT_FOR_COMPRESSION))
- {
- char *compressed_content = compress_buffer(p,
- (size_t *)&csp->content_length, csp->config->compression_level);
- if (compressed_content != NULL)
- {
- freez(p);
- p = compressed_content;
- csp->flags |= CSP_FLAG_BUFFERED_CONTENT_DEFLATED;
- }
- }
- #endif
- if (JB_ERR_OK != update_server_headers(csp))
- {
- log_error(LOG_LEVEL_FATAL,
- "Failed to update server headers. after filtering.");
- }
- hdr = list_to_text(csp->headers);
- if (hdr == NULL)
- {
- /* FIXME Should handle error properly */
- log_error(LOG_LEVEL_FATAL, "Out of memory parsing server header");
- }
- #ifdef FEATURE_HTTPS_INSPECTION
- /*
- * Sending data with standard or secured connection (HTTP/HTTPS)
- */
- if (client_use_ssl(csp))
- {
- if ((ssl_send_data_delayed(&(csp->ssl_client_attr),
- (const unsigned char *)hdr, strlen(hdr),
- get_write_delay(csp)) < 0)
- || (ssl_send_data_delayed(&(csp->ssl_client_attr),
- (const unsigned char *) ((p != NULL) ? p : csp->iob->cur),
- csp->content_length, get_write_delay(csp)) < 0))
- {
- log_error(LOG_LEVEL_ERROR, "write modified content to "
- "client over TLS/SSL failed");
- freez(hdr);
- freez(p);
- mark_server_socket_tainted(csp);
- close_client_and_server_ssl_connections(csp);
- return;
- }
- }
- else
- #endif /* def FEATURE_HTTPS_INSPECTION */
- {
- if (write_socket_delayed(csp->cfd, hdr, strlen(hdr), write_delay)
- || write_socket_delayed(csp->cfd, ((p != NULL) ? p : csp->iob->cur),
- (size_t)csp->content_length, write_delay))
- {
- log_error(LOG_LEVEL_ERROR, "write modified content to client failed: %E");
- freez(hdr);
- freez(p);
- mark_server_socket_tainted(csp);
- return;
- }
- }
- freez(hdr);
- freez(p);
- }
- break; /* "game over, man" */
- }
- /*
- * This is NOT the body, so
- * Let's pretend the server just sent us a blank line.
- */
- snprintf(csp->receive_buffer, csp->receive_buffer_size, "\r\n");
- len = (int)strlen(csp->receive_buffer);
- /*
- * Now, let the normal header parsing algorithm below do its
- * job. If it fails, we'll exit instead of continuing.
- */
- ms_iis5_hack = 1;
- }
- /*
- * If we're in the body of the server document, just write it to
- * the client, unless we need to buffer the body for later
- * content-filtering.
- */
- if (server_body || (http->ssl
- #ifdef FEATURE_HTTPS_INSPECTION
- && use_ssl_tunnel
- #endif
- ))
- {
- if (buffer_and_filter_content)
- {
- /*
- * If there is no memory left for buffering the content, or the buffer limit
- * has been reached, switch to non-filtering mode, i.e. make & write the
- * header, flush the iob and buf, and get out of the way.
- */
- if (add_to_iob(csp->iob, csp->config->buffer_limit, csp->receive_buffer, len))
- {
- size_t hdrlen;
- long flushed;
- log_error(LOG_LEVEL_INFO,
- "Flushing header and buffers. Stepping back from filtering.");
- hdr = list_to_text(csp->headers);
- if (hdr == NULL)
- {
- /*
- * Memory is too tight to even generate the header.
- * Send our static "Out-of-memory" page.
- */
- log_error(LOG_LEVEL_ERROR, "Out of memory while trying to flush.");
- rsp = cgi_error_memory();
- send_crunch_response(csp, rsp);
- mark_server_socket_tainted(csp);
- #ifdef FEATURE_HTTPS_INSPECTION
- close_client_and_server_ssl_connections(csp);
- #endif
- return;
- }
- hdrlen = strlen(hdr);
- #ifdef FEATURE_HTTPS_INSPECTION
- /*
- * Sending data with standard or secured connection (HTTP/HTTPS)
- */
- if (client_use_ssl(csp))
- {
- if ((ssl_send_data_delayed(&(csp->ssl_client_attr),
- (const unsigned char *)hdr, hdrlen, get_write_delay(csp)) < 0)
- || ((flushed = ssl_flush_socket(&(csp->ssl_client_attr),
- csp->iob)) < 0)
- || (ssl_send_data_delayed(&(csp->ssl_client_attr),
- (const unsigned char *)csp->receive_buffer, (size_t)len,
- get_write_delay(csp)) < 0))
- {
- log_error(LOG_LEVEL_CONNECT,
- "Flush header and buffers to client failed");
- freez(hdr);
- mark_server_socket_tainted(csp);
- close_client_and_server_ssl_connections(csp);
- return;
- }
- }
- else
- #endif /* def FEATURE_HTTPS_INSPECTION */
- {
- if (write_socket_delayed(csp->cfd, hdr, hdrlen, write_delay)
- || ((flushed = flush_iob(csp->cfd, csp->iob, write_delay)) < 0)
- || write_socket_delayed(csp->cfd, csp->receive_buffer, (size_t)len,
- write_delay))
- {
- log_error(LOG_LEVEL_CONNECT,
- "Flush header and buffers to client failed: %E");
- freez(hdr);
- mark_server_socket_tainted(csp);
- return;
- }
- }
- /*
- * Reset the byte_count to the amount of bytes
- * we just flushed. len will be added a few lines below,
- * hdrlen doesn't matter for LOG_LEVEL_CLF.
- */
- byte_count = (unsigned long long)flushed;
- freez(hdr);
- buffer_and_filter_content = 0;
- server_body = 1;
- }
- }
- else
- {
- #ifdef FEATURE_HTTPS_INSPECTION
- /*
- * Sending data with standard or secured connection (HTTP/HTTPS)
- */
- if (client_use_ssl(csp))
- {
- ret = ssl_send_data_delayed(&(csp->ssl_client_attr),
- (const unsigned char *)csp->receive_buffer, (size_t)len,
- get_write_delay(csp));
- if (ret < 0)
- {
- log_error(LOG_LEVEL_ERROR,
- "Sending data to client failed");
- mark_server_socket_tainted(csp);
- close_client_and_server_ssl_connections(csp);
- return;
- }
- }
- else
- #endif /* def FEATURE_HTTPS_INSPECTION */
- {
- if (write_socket_delayed(csp->cfd, csp->receive_buffer,
- (size_t)len, write_delay))
- {
- log_error(LOG_LEVEL_ERROR, "write to client failed: %E");
- mark_server_socket_tainted(csp);
- return;
- }
- }
- }
- byte_count += (unsigned long long)len;
- continue;
- }
- else
- {
- /*
- * We're still looking for the end of the server's header.
- * Buffer up the data we just read. If that fails, there's
- * little we can do but send our static out-of-memory page.
- */
- if (add_to_iob(csp->iob, csp->config->buffer_limit, csp->receive_buffer, len))
- {
- log_error(LOG_LEVEL_ERROR, "Out of memory while looking for end of server headers.");
- rsp = cgi_error_memory();
- send_crunch_response(csp, rsp);
- mark_server_socket_tainted(csp);
- #ifdef FEATURE_HTTPS_INSPECTION
- close_client_and_server_ssl_connections(csp);
- #endif
- return;
- }
- /* Convert iob into something sed() can digest */
- if (JB_ERR_PARSE == get_server_headers(csp))
- {
- if (ms_iis5_hack)
- {
- /*
- * Well, we tried our MS IIS/5 hack and it didn't work.
- * The header is incomplete and there isn't anything
- * we can do about it.
- */
- log_error(LOG_LEVEL_ERROR, "Invalid server headers. "
- "Applying the MS IIS5 hack didn't help.");
- log_error(LOG_LEVEL_CLF,
- "%s - - [%T] \"%s\" 502 0", csp->ip_addr_str, http->cmd);
- #ifdef FEATURE_HTTPS_INSPECTION
- /*
- * Sending data with standard or secured connection (HTTP/HTTPS)
- */
- if (client_use_ssl(csp))
- {
- ssl_send_data_delayed(&(csp->ssl_client_attr),
- (const unsigned char *)INVALID_SERVER_HEADERS_RESPONSE,
- strlen(INVALID_SERVER_HEADERS_RESPONSE), get_write_delay(csp));
- }
- else
- #endif /* def FEATURE_HTTPS_INSPECTION */
- {
- write_socket_delayed(csp->cfd,
- INVALID_SERVER_HEADERS_RESPONSE,
- strlen(INVALID_SERVER_HEADERS_RESPONSE), write_delay);
- }
- mark_server_socket_tainted(csp);
- #ifdef FEATURE_HTTPS_INSPECTION
- close_client_and_server_ssl_connections(csp);
- #endif
- return;
- }
- else
- {
- /*
- * Since we have to wait for more from the server before
- * we can parse the headers we just continue here.
- */
- log_error(LOG_LEVEL_CONNECT,
- "Continuing buffering server headers from socket %d. "
- "Bytes most recently read: %ld.", csp->cfd, len);
- continue;
- }
- }
- else
- {
- /*
- * Account for the content bytes we
- * might have gotten with the headers.
- */
- assert(csp->iob->eod >= csp->iob->cur);
- byte_count = (unsigned long long)(csp->iob->eod - csp->iob->cur);
- }
- /* Did we actually get anything? */
- if (NULL == csp->headers->first)
- {
- if ((csp->flags & CSP_FLAG_REUSED_CLIENT_CONNECTION))
- {
- log_error(LOG_LEVEL_ERROR,
- "No server or forwarder response received on socket %d. "
- "Closing client socket %d without sending data.",
- csp->server_connection.sfd, csp->cfd);
- log_error(LOG_LEVEL_CLF,
- "%s - - [%T] \"%s\" 502 0", csp->ip_addr_str, http->cmd);
- }
- else
- {
- log_error(LOG_LEVEL_ERROR,
- "No server or forwarder response received on socket %d.",
- csp->server_connection.sfd);
- send_crunch_response(csp, error_response(csp, "no-server-data"));
- }
- free_http_request(http);
- mark_server_socket_tainted(csp);
- #ifdef FEATURE_HTTPS_INSPECTION
- close_client_and_server_ssl_connections(csp);
- #endif
- return;
- }
- if (!csp->headers->first->str)
- {
- log_error(LOG_LEVEL_ERROR, "header search: csp->headers->first->str == NULL, assert will be called");
- }
- assert(csp->headers->first->str);
- if (strncmpic(csp->headers->first->str, "HTTP", 4) &&
- strncmpic(csp->headers->first->str, "ICY", 3))
- {
- /*
- * It doesn't look like a HTTP (or Shoutcast) response:
- * tell the client and log the problem.
- */
- if (strlen(csp->headers->first->str) > 30)
- {
- csp->headers->first->str[30] = '\0';
- }
- log_error(LOG_LEVEL_ERROR,
- "Invalid server or forwarder response. Starts with: %s",
- csp->headers->first->str);
- log_error(LOG_LEVEL_CLF,
- "%s - - [%T] \"%s\" 502 0", csp->ip_addr_str, http->cmd);
- #ifdef FEATURE_HTTPS_INSPECTION
- /*
- * Sending data with standard or secured connection (HTTP/HTTPS)
- */
- if (client_use_ssl(csp))
- {
- ssl_send_data_delayed(&(csp->ssl_client_attr),
- (const unsigned char *)INVALID_SERVER_HEADERS_RESPONSE,
- strlen(INVALID_SERVER_HEADERS_RESPONSE),
- get_write_delay(csp));
- }
- else
- #endif /* def FEATURE_HTTPS_INSPECTION */
- {
- write_socket_delayed(csp->cfd, INVALID_SERVER_HEADERS_RESPONSE,
- strlen(INVALID_SERVER_HEADERS_RESPONSE), write_delay);
- }
- free_http_request(http);
- mark_server_socket_tainted(csp);
- #ifdef FEATURE_HTTPS_INSPECTION
- close_client_and_server_ssl_connections(csp);
- #endif
- return;
- }
- /*
- * We have now received the entire server header,
- * filter it and send the result to the client
- */
- if (JB_ERR_OK != sed(csp, FILTER_SERVER_HEADERS))
- {
- log_error(LOG_LEVEL_CLF,
- "%s - - [%T] \"%s\" 502 0", csp->ip_addr_str, http->cmd);
- #ifdef FEATURE_HTTPS_INSPECTION
- /*
- * Sending data with standard or secured connection (HTTP/HTTPS)
- */
- if (client_use_ssl(csp))
- {
- ssl_send_data_delayed(&(csp->ssl_client_attr),
- (const unsigned char *)INVALID_SERVER_HEADERS_RESPONSE,
- strlen(INVALID_SERVER_HEADERS_RESPONSE),
- get_write_delay(csp));
- }
- else
- #endif
- {
- write_socket_delayed(csp->cfd, INVALID_SERVER_HEADERS_RESPONSE,
- strlen(INVALID_SERVER_HEADERS_RESPONSE), write_delay);
- }
- free_http_request(http);
- mark_server_socket_tainted(csp);
- #ifdef FEATURE_HTTPS_INSPECTION
- close_client_and_server_ssl_connections(csp);
- #endif
- return;
- }
- hdr = list_to_text(csp->headers);
- if (hdr == NULL)
- {
- /* FIXME Should handle error properly */
- log_error(LOG_LEVEL_FATAL, "Out of memory parsing server header");
- }
- if ((csp->flags & CSP_FLAG_CHUNKED)
- && !(csp->flags & CSP_FLAG_CONTENT_LENGTH_SET)
- && ((csp->iob->eod - csp->iob->cur) >= 5)
- && !memcmp(csp->iob->eod-5, "0\r\n\r\n", 5))
- {
- log_error(LOG_LEVEL_CONNECT,
- "Looks like we got the last chunk together with "
- "the server headers. We better stop reading.");
- byte_count = (unsigned long long)(csp->iob->eod - csp->iob->cur);
- csp->expected_content_length = byte_count;
- csp->flags |= CSP_FLAG_CONTENT_LENGTH_SET;
- }
- csp->server_connection.response_received = time(NULL);
- if (crunch_response_triggered(csp, crunchers_light))
- {
- /*
- * One of the tags created by a server-header
- * tagger triggered a crunch. We already
- * delivered the crunch response to the client
- * and are done here after cleaning up.
- */
- freez(hdr);
- mark_server_socket_tainted(csp);
- #ifdef FEATURE_HTTPS_INSPECTION
- close_client_and_server_ssl_connections(csp);
- #endif
- return;
- }
- /* Buffer and pcrs filter this if appropriate. */
- buffer_and_filter_content = content_requires_filtering(csp);
- if (!buffer_and_filter_content)
- {
- /*
- * Write the server's (modified) header to
- * the client (along with anything else that
- * may be in the buffer). Use standard or secured
- * connection.
- */
- #ifdef FEATURE_HTTPS_INSPECTION
- if (client_use_ssl(csp))
- {
- if ((ssl_send_data_delayed(&(csp->ssl_client_attr),
- (const unsigned char *)hdr, strlen(hdr),
- get_write_delay(csp)) < 0)
- || (len = ssl_flush_socket(&(csp->ssl_client_attr),
- csp->iob) < 0))
- {
- log_error(LOG_LEVEL_CONNECT, "Write header to client failed");
- /*
- * The write failed, so don't bother mentioning it
- * to the client... it probably can't hear us anyway.
- */
- freez(hdr);
- mark_server_socket_tainted(csp);
- #ifdef FEATURE_HTTPS_INSPECTION
- close_client_and_server_ssl_connections(csp);
- #endif
- return;
- }
- }
- else
- #endif /* def FEATURE_HTTPS_INSPECTION */
- {
- if (write_socket_delayed(csp->cfd, hdr, strlen(hdr), write_delay)
- || ((len = flush_iob(csp->cfd, csp->iob, write_delay)) < 0))
- {
- log_error(LOG_LEVEL_ERROR,
- "write header to client failed");
- /*
- * The write failed, so don't bother mentioning it
- * to the client... it probably can't hear us anyway.
- */
- freez(hdr);
- mark_server_socket_tainted(csp);
- return;
- }
- }
- }
- /* we're finished with the server's header */
- freez(hdr);
- server_body = 1;
- /*
- * If this was a MS IIS/5 hack then it means the server
- * has already closed the connection. Nothing more to read.
- * Time to bail.
- */
- if (ms_iis5_hack)
- {
- log_error(LOG_LEVEL_ERROR,
- "Closed server connection detected. "
- "Applying the MS IIS5 hack didn't help.");
- log_error(LOG_LEVEL_CLF,
- "%s - - [%T] \"%s\" 502 0", csp->ip_addr_str, http->cmd);
- #ifdef FEATURE_HTTPS_INSPECTION
- /*
- * Sending data with standard or secured connection (HTTP/HTTPS)
- */
- if (client_use_ssl(csp))
- {
- ssl_send_data_delayed(&(csp->ssl_client_attr),
- (const unsigned char *)INVALID_SERVER_HEADERS_RESPONSE,
- strlen(INVALID_SERVER_HEADERS_RESPONSE),
- get_write_delay(csp));
- }
- else
- #endif /* def FEATURE_HTTPS_INSPECTION */
- {
- write_socket_delayed(csp->cfd, INVALID_SERVER_HEADERS_RESPONSE,
- strlen(INVALID_SERVER_HEADERS_RESPONSE), write_delay);
- }
- mark_server_socket_tainted(csp);
- #ifdef FEATURE_HTTPS_INSPECTION
- close_client_and_server_ssl_connections(csp);
- #endif
- return;
- }
- }
- continue;
- }
- mark_server_socket_tainted(csp);
- #ifdef FEATURE_HTTPS_INSPECTION
- close_client_and_server_ssl_connections(csp);
- #endif
- return; /* huh? we should never get here */
- }
- if (csp->content_length == 0)
- {
- /*
- * If Privoxy didn't recalculate the Content-Length,
- * byte_count is still correct.
- */
- csp->content_length = byte_count;
- }
- #ifdef FEATURE_CONNECTION_KEEP_ALIVE
- if ((csp->flags & CSP_FLAG_CONTENT_LENGTH_SET)
- && (csp->expected_content_length != byte_count))
- {
- log_error(LOG_LEVEL_CONNECT,
- "Received %llu bytes while expecting %llu.",
- byte_count, csp->expected_content_length);
- mark_server_socket_tainted(csp);
- }
- #endif
- #ifdef FEATURE_HTTPS_INSPECTION
- if (client_use_ssl(csp))
- {
- log_error(LOG_LEVEL_CLF, "%s - - [%T] \"%s https://%s%s %s\" 200 %llu",
- csp->ip_addr_str, http->gpc, http->hostport, http->path,
- http->version, csp->content_length);
- }
- else
- #endif
- {
- log_error(LOG_LEVEL_CLF, "%s - - [%T] \"%s\" 200 %llu",
- csp->ip_addr_str, http->ocmd, csp->content_length);
- }
- csp->server_connection.timestamp = time(NULL);
- }
- /*********************************************************************
- *
- * Function : chat
- *
- * Description : Once a connection from the client has been accepted,
- * this function is called (via serve()) to handle the
- * main business of the communication. This function
- * returns after dealing with a single request. It can
- * be called multiple times with the same client socket
- * if the client is keeping the connection alive.
- *
- * The decision whether or not a client connection will
- * be kept alive is up to the caller which also must
- * close the client socket when done.
- *
- * FIXME: chat is nearly thousand lines long.
- * Ridiculous.
- *
- * Parameters :
- * 1 : csp = Current client state (buffers, headers, etc...)
- *
- * Returns : Nothing.
- *
- *********************************************************************/
- static void chat(struct client_state *csp)
- {
- const struct forward_spec *fwd;
- struct http_request *http;
- /* Skeleton for HTTP response, if we should intercept the request */
- struct http_response *rsp;
- #ifdef FEATURE_HTTPS_INSPECTION
- int use_ssl_tunnel = 0;
- #endif
- http = csp->http;
- if (receive_client_request(csp) != JB_ERR_OK)
- {
- return;
- }
- if (parse_client_request(csp) != JB_ERR_OK)
- {
- return;
- }
- /* decide how to route the HTTP request */
- fwd = forward_url(csp, http);
- #ifdef FEATURE_HTTPS_INSPECTION
- /*
- * Setting flags to use old solution with SSL tunnel and to disable
- * certificate verification.
- */
- if (csp->http->ssl && !(csp->action->flags & ACTION_HTTPS_INSPECTION)
- && !cgi_page_requested(csp->http->host))
- {
- use_ssl_tunnel = 1;
- }
- if (http->ssl && csp->action->flags & ACTION_IGNORE_CERTIFICATE_ERRORS)
- {
- csp->dont_verify_certificate = 1;
- }
- #endif
- /*
- * build the http request to send to the server
- * we have to do one of the following:
- *
- * create = use the original HTTP request to create a new
- * HTTP request that has either the path component
- * without the http://domainspec (w/path) or the
- * full orininal URL (w/url)
- * Note that the path and/or the HTTP version may
- * have been altered by now.
- *
- * SSL proxy = Open a socket to the host:port of the server
- * and create TLS/SSL connection with server and
- * with client. Then behave like mediator between
- * client and server over TLS/SSL.
- *
- * SSL proxy = Pass the request unchanged if forwarding a CONNECT
- * with request to a parent proxy. Note that we'll be sending
- * forwarding the CFAIL message ourselves if connecting to the parent
- * fails, but we won't send a CSUCCEED message if it works,
- * since that would result in a double message (ours and the
- * parent's). After sending the request to the parent, we
- * must parse answer and send it to client. If connection
- * with server is established, we do TLS/SSL proxy. Otherwise
- * we send parent response to client and close connections.
- *
- * here's the matrix:
- * SSL
- * 0 1
- * +--------+--------+
- * | | |
- * 0 | create | SSL |
- * | w/path | proxy |
- * Forwarding +--------+--------+
- * | | SSL |
- * 1 | create | proxy |
- * | w/url |+forward|
- * +--------+--------+
- *
- */
- #ifdef FEATURE_HTTPS_INSPECTION
- /*
- * Presetting SSL client and server flags
- */
- if (http->ssl && !use_ssl_tunnel)
- {
- http->client_ssl = 1;
- http->server_ssl = 1;
- }
- else
- {
- http->client_ssl = 0;
- http->server_ssl = 0;
- }
- #endif
- #ifdef FEATURE_HTTPS_INSPECTION
- /*
- * Log the request unless we're https inspecting
- * in which case we don't have the path yet and
- * will log the request later.
- */
- if (!client_use_ssl(csp))
- #endif
- {
- log_error(LOG_LEVEL_REQUEST, "%s%s", http->hostport, http->path);
- }
- if (http->ssl && connect_port_is_forbidden(csp))
- {
- const char *acceptable_connect_ports =
- csp->action->string[ACTION_STRING_LIMIT_CONNECT];
- assert(NULL != acceptable_connect_ports);
- log_error(LOG_LEVEL_INFO, "Request from %s marked for blocking. "
- "limit-connect{%s} doesn't allow CONNECT requests to %s",
- csp->ip_addr_str, acceptable_connect_ports, csp->http->hostport);
- csp->action->flags |= ACTION_BLOCK;
- http->ssl = 0;
- #ifdef FEATURE_HTTPS_INSPECTION
- http->client_ssl = 0;
- http->server_ssl = 0;
- #endif
- }
- freez(csp->headers->first->str);
- build_request_line(csp, fwd, &csp->headers->first->str);
- /*
- * We have a request. Check if one of the crunchers wants it
- * unless the client wants to use TLS/SSL in which case we
- * haven't setup the TLS context yet and will send the crunch
- * response later.
- */
- if (
- #ifdef FEATURE_HTTPS_INSPECTION
- !client_use_ssl(csp) &&
- #endif
- crunch_response_triggered(csp, crunchers_all))
- {
- /*
- * Yes. The client got the crunch response and we're done here.
- */
- return;
- }
- log_applied_actions(csp->action);
- if (fwd->forward_host)
- {
- log_error(LOG_LEVEL_CONNECT, "via [%s]:%d to: %s",
- fwd->forward_host, fwd->forward_port, http->hostport);
- }
- else
- {
- log_error(LOG_LEVEL_CONNECT, "to %s", http->hostport);
- }
- /* here we connect to the server, gateway, or the forwarder */
- #ifdef FEATURE_CONNECTION_KEEP_ALIVE
- if ((csp->server_connection.sfd != JB_INVALID_SOCKET)
- && socket_is_still_alive(csp->server_connection.sfd)
- && connection_destination_matches(&csp->server_connection, http, fwd))
- {
- log_error(LOG_LEVEL_CONNECT,
- "Reusing server socket %d connected to %s. Total requests: %u.",
- csp->server_connection.sfd, csp->server_connection.host,
- csp->server_connection.requests_sent_total);
- }
- else
- {
- if (csp->server_connection.sfd != JB_INVALID_SOCKET)
- {
- #ifdef FEATURE_CONNECTION_SHARING
- if (csp->config->feature_flags & RUNTIME_FEATURE_CONNECTION_SHARING
- #ifdef FEATURE_HTTPS_INSPECTION
- && !server_use_ssl(csp)
- #endif
- )
- {
- remember_connection(&csp->server_connection);
- }
- else
- #endif /* def FEATURE_CONNECTION_SHARING */
- {
- log_error(LOG_LEVEL_CONNECT,
- "Closing server socket %d connected to %s. Total requests: %u.",
- csp->server_connection.sfd, csp->server_connection.host,
- csp->server_connection.requests_sent_total);
- close_socket(csp->server_connection.sfd);
- }
- mark_connection_closed(&csp->server_connection);
- }
- #endif /* def FEATURE_CONNECTION_KEEP_ALIVE */
- #ifdef FEATURE_HTTPS_INSPECTION
- if (http->ssl && !use_ssl_tunnel)
- {
- int ret;
- /*
- * Creating a SSL proxy.
- *
- * By sending the CSUCCEED message we're lying to the client as
- * the connection hasn't actually been established yet. We don't
- * establish the connection until we have seen and parsed the
- * encrypted client headers.
- */
- if (write_socket_delayed(csp->cfd, CSUCCEED,
- strlen(CSUCCEED), get_write_delay(csp)) != 0)
- {
- log_error(LOG_LEVEL_ERROR, "Sending SUCCEED to client failed");
- return;
- }
- ret = create_client_ssl_connection(csp);
- if (ret != 0)
- {
- log_error(LOG_LEVEL_ERROR,
- "Failed to open a secure connection with the client");
- return;
- }
- if (JB_ERR_OK != process_encrypted_request(csp))
- {
- close_client_ssl_connection(csp);
- return;
- }
- /*
- * We have an encrypted request. Check if one of the crunchers now
- * wants it (for example because the previously invisible path was
- * required to match).
- */
- if (crunch_response_triggered(csp, crunchers_all))
- {
- /*
- * Yes. The client got the crunch response and we're done here.
- */
- return;
- }
- }
- #endif
- /*
- * Connecting to destination server
- */
- csp->server_connection.sfd = forwarded_connect(fwd, http, csp);
- if (csp->server_connection.sfd == JB_INVALID_SOCKET)
- {
- if (fwd->type != SOCKS_NONE)
- {
- /* Socks error. */
- rsp = error_response(csp, "forwarding-failed");
- }
- else if (errno == EINVAL)
- {
- rsp = error_response(csp, "no-such-domain");
- }
- else
- {
- rsp = error_response(csp, "connect-failed");
- }
- /* Write the answer to the client */
- if (rsp != NULL)
- {
- send_crunch_response(csp, rsp);
- }
- /*
- * Temporary workaround to prevent already-read client
- * bodies from being parsed as new requests. For now we
- * err on the safe side and throw all the following
- * requests under the bus, even if no client body has been
- * buffered. A compliant client will repeat the dropped
- * requests on an untainted connection.
- *
- * The proper fix is to discard the no longer needed
- * client body in the buffer (if there is one) and to
- * continue parsing the bytes that follow.
- */
- #ifdef FEATURE_HTTPS_INSPECTION
- close_client_ssl_connection(csp);
- #endif
- drain_and_close_socket(csp->cfd);
- csp->cfd = JB_INVALID_SOCKET;
- return;
- }
- #ifdef FEATURE_HTTPS_INSPECTION
- /*
- * Creating TLS/SSL connections with destination server or parent
- * proxy. If forwarding is enabled, we must send client request to
- * parent proxy and receive, parse and resend parent proxy answer.
- */
- if (http->ssl && !use_ssl_tunnel)
- {
- if (fwd->forward_host != NULL)
- {
- char server_response[BUFFER_SIZE];
- int ret = 0;
- int len = 0;
- char *hdr = list_to_text(csp->headers);
- memset(server_response, 0, sizeof(server_response));
- if (hdr == NULL)
- {
- log_error(LOG_LEVEL_FATAL,
- "Out of memory parsing client header");
- }
- list_remove_all(csp->headers);
- /*
- * Sending client's CONNECT request to the parent proxy
- */
- ret = write_socket(csp->server_connection.sfd, hdr, strlen(hdr));
- freez(hdr);
- if (ret != 0)
- {
- log_error(LOG_LEVEL_CONNECT,
- "Sending request headers to: %s failed", http->hostport);
- mark_server_socket_tainted(csp);
- close_client_ssl_connection(csp);
- return;
- }
- /* Waiting for parent proxy server response */
- len = read_socket(csp->server_connection.sfd, server_response,
- sizeof(server_response)-1);
- if (len <= 0)
- {
- log_error(LOG_LEVEL_ERROR, "No response from parent proxy "
- "server on socket %d.", csp->server_connection.sfd);
- rsp = error_response(csp, "no-server-data");
- if (rsp)
- {
- send_crunch_response(csp, rsp);
- }
- mark_server_socket_tainted(csp);
- close_client_ssl_connection(csp);
- return;
- }
- /*
- * Test if the connection to the destination server was
- * established successfully by the parent proxy.
- */
- if (!tunnel_established_successfully(server_response, (unsigned int)len))
- {
- log_error(LOG_LEVEL_ERROR,
- "The forwarder %s failed to establish a connection with %s",
- fwd->forward_host, http->host);
- rsp = error_response(csp, "connect-failed");
- if (rsp)
- {
- send_crunch_response(csp, rsp);
- }
- mark_server_socket_tainted(csp);
- close_client_ssl_connection(csp);
- return;
- }
- } /* -END- if (fwd->forward_host != NULL) */
- /*
- * We can now create the TLS/SSL connection with the destination server.
- */
- int ret = create_server_ssl_connection(csp);
- if (ret != 0)
- {
- if (csp->server_cert_verification_result != SSL_CERT_VALID &&
- csp->server_cert_verification_result != SSL_CERT_NOT_VERIFIED)
- {
- /*
- * If the server certificate is invalid, we must inform
- * the client and then close connection to the client.
- */
- ssl_send_certificate_error(csp);
- close_client_and_server_ssl_connections(csp);
- return;
- }
- if (csp->server_cert_verification_result == SSL_CERT_NOT_VERIFIED
- || csp->server_cert_verification_result == SSL_CERT_VALID)
- {
- /*
- * The TLS/SSL connection wasn't created but an invalid
- * certificate wasn't detected. Report it as connection
- * failure.
- */
- rsp = error_response(csp, "connect-failed");
- if (rsp)
- {
- send_crunch_response(csp, rsp);
- }
- close_client_and_server_ssl_connections(csp);
- return;
- }
- }
- }/* -END- if (http->ssl) */
- #endif /* def FEATURE_HTTPS_INSPECTION */
- #ifdef FEATURE_CONNECTION_KEEP_ALIVE
- save_connection_destination(csp->server_connection.sfd,
- http, fwd, &csp->server_connection);
- csp->server_connection.keep_alive_timeout =
- (unsigned)csp->config->keep_alive_timeout;
- }
- #endif /* def FEATURE_CONNECTION_KEEP_ALIVE */
- csp->server_connection.requests_sent_total++;
- if ((fwd->type == SOCKS_5T) && (NULL == csp->headers->first))
- {
- /* Client headers have been sent optimistically */
- assert(csp->headers->last == NULL);
- }
- else if (http->ssl == 0 || (fwd->forward_host
- #ifdef FEATURE_HTTPS_INSPECTION
- && use_ssl_tunnel
- #endif
- ))
- {
- if (send_http_request(csp))
- {
- rsp = error_response(csp, "connect-failed");
- if (rsp)
- {
- send_crunch_response(csp, rsp);
- }
- return;
- }
- }
- else
- {
- /*
- * Using old solution with SSL tunnel or new solution with SSL proxy
- */
- list_remove_all(csp->headers);
- #ifdef FEATURE_HTTPS_INSPECTION
- if (use_ssl_tunnel)
- #endif
- {
- /*
- * We're running an SSL tunnel and we're not forwarding,
- * so just ditch the client headers, send the "connect succeeded"
- * message to the client, flush the rest, and get out of the way.
- */
- if (write_socket_delayed(csp->cfd, CSUCCEED,
- strlen(CSUCCEED), get_write_delay(csp)))
- {
- return;
- }
- }
- #ifdef FEATURE_HTTPS_INSPECTION
- else
- {
- /*
- * If server certificate has been verified and is invalid,
- * we must inform the client and then close the connection
- * with client and server.
- */
- if (csp->server_cert_verification_result != SSL_CERT_VALID &&
- csp->server_cert_verification_result != SSL_CERT_NOT_VERIFIED)
- {
- ssl_send_certificate_error(csp);
- close_client_and_server_ssl_connections(csp);
- return;
- }
- if (send_https_request(csp))
- {
- rsp = error_response(csp, "connect-failed");
- if (rsp)
- {
- send_crunch_response(csp, rsp);
- }
- close_client_and_server_ssl_connections(csp);
- return;
- }
- }
- #endif /* def FEATURE_HTTPS_INSPECTION */
- clear_iob(csp->client_iob);
- }/* -END- else ... if (http->ssl == 1) */
- log_error(LOG_LEVEL_CONNECT, "to %s successful", http->hostport);
- /* XXX: should the time start earlier for optimistically sent data? */
- csp->server_connection.request_sent = time(NULL);
- handle_established_connection(csp);
- freez(csp->receive_buffer);
- }
- #ifdef FUZZ
- /*********************************************************************
- *
- * Function : fuzz_server_response
- *
- * Description : Treat the input as a whole server response.
- *
- * Parameters :
- * 1 : csp = Current client state (buffers, headers, etc...)
- * 2 : fuzz_input_file = File to read the input from.
- *
- * Returns : 0
- *
- *********************************************************************/
- extern int fuzz_server_response(struct client_state *csp, char *fuzz_input_file)
- {
- static struct forward_spec fwd; /* Zero'd due to being static */
- csp->cfd = 0;
- if (strcmp(fuzz_input_file, "-") == 0)
- {
- /* XXX: Doesn't work yet. */
- csp->server_connection.sfd = 0;
- }
- else
- {
- csp->server_connection.sfd = open(fuzz_input_file, O_RDONLY);
- if (csp->server_connection.sfd == -1)
- {
- log_error(LOG_LEVEL_FATAL, "Failed to open %s: %E",
- fuzz_input_file);
- }
- }
- csp->fwd = &fwd;
- csp->content_type |= CT_GIF;
- csp->action->flags |= ACTION_DEANIMATE;
- csp->action->string[ACTION_STRING_DEANIMATE] = "last";
- csp->http->path = strdup_or_die("/");
- csp->http->host = strdup_or_die("fuzz.example.org");
- csp->http->hostport = strdup_or_die("fuzz.example.org:80");
- /* Prevent client socket monitoring */
- csp->flags |= CSP_FLAG_PIPELINED_REQUEST_WAITING;
- csp->flags |= CSP_FLAG_CHUNKED;
- csp->config->feature_flags |= RUNTIME_FEATURE_CONNECTION_KEEP_ALIVE;
- csp->flags |= CSP_FLAG_CLIENT_CONNECTION_KEEP_ALIVE;
- csp->content_type |= CT_DECLARED|CT_GIF;
- csp->config->socket_timeout = 0;
- cgi_init_error_messages();
- handle_established_connection(csp);
- freez(csp->receive_buffer);
- return 0;
- }
- #endif
- #ifdef FEATURE_CONNECTION_KEEP_ALIVE
- /*********************************************************************
- *
- * Function : prepare_csp_for_next_request
- *
- * Description : Put the csp in a mostly vergin state.
- *
- * Parameters :
- * 1 : csp = Current client state (buffers, headers, etc...)
- *
- * Returns : N/A
- *
- *********************************************************************/
- static void prepare_csp_for_next_request(struct client_state *csp)
- {
- csp->content_type = 0;
- csp->content_length = 0;
- csp->expected_content_length = 0;
- csp->expected_client_content_length = 0;
- list_remove_all(csp->headers);
- clear_iob(csp->iob);
- freez(csp->error_message);
- free_http_request(csp->http);
- destroy_list(csp->headers);
- #ifdef FEATURE_HTTPS_INSPECTION
- destroy_list(csp->https_headers);
- #endif
- destroy_list(csp->tags);
- #ifdef FEATURE_CLIENT_TAGS
- destroy_list(csp->client_tags);
- freez(csp->client_address);
- #endif
- free_current_action(csp->action);
- if (NULL != csp->fwd)
- {
- unload_forward_spec(csp->fwd);
- csp->fwd = NULL;
- }
- /* XXX: Store per-connection flags someplace else. */
- csp->flags = (CSP_FLAG_ACTIVE | CSP_FLAG_REUSED_CLIENT_CONNECTION);
- #ifdef FEATURE_TOGGLE
- if (global_toggle_state)
- #endif /* def FEATURE_TOGGLE */
- {
- csp->flags |= CSP_FLAG_TOGGLED_ON;
- }
- if (csp->client_iob->eod > csp->client_iob->cur)
- {
- long bytes_to_shift = csp->client_iob->cur - csp->client_iob->buf;
- size_t data_length = (size_t)(csp->client_iob->eod - csp->client_iob->cur);
- assert(bytes_to_shift > 0);
- assert(data_length > 0);
- log_error(LOG_LEVEL_CONNECT, "Shifting %lu pipelined bytes by %ld bytes",
- data_length, bytes_to_shift);
- memmove(csp->client_iob->buf, csp->client_iob->cur, data_length);
- csp->client_iob->cur = csp->client_iob->buf;
- assert(csp->client_iob->eod == csp->client_iob->buf + bytes_to_shift + data_length);
- csp->client_iob->eod = csp->client_iob->buf + data_length;
- memset(csp->client_iob->eod, '\0', (size_t)bytes_to_shift);
- csp->flags |= CSP_FLAG_PIPELINED_REQUEST_WAITING;
- }
- else
- {
- /*
- * We mainly care about resetting client_iob->cur so we don't
- * waste buffer space at the beginning and don't mess up the
- * request restoration done by cgi_show_request().
- *
- * Freeing the buffer itself isn't technically necessary,
- * but makes debugging more convenient.
- */
- clear_iob(csp->client_iob);
- }
- }
- #endif /* def FEATURE_CONNECTION_KEEP_ALIVE */
- /*********************************************************************
- *
- * Function : serve
- *
- * Description : This is little more than chat. We only "serve" to
- * to close (or remember) any socket that chat may have
- * opened.
- *
- * Parameters :
- * 1 : csp = Current client state (buffers, headers, etc...)
- *
- * Returns : N/A
- *
- *********************************************************************/
- static void serve(struct client_state *csp)
- {
- int config_file_change_detected = 0; /* Only used for debugging */
- #ifdef FEATURE_CONNECTION_KEEP_ALIVE
- #ifdef FEATURE_CONNECTION_SHARING
- static int monitor_thread_running = 0;
- #endif /* def FEATURE_CONNECTION_SHARING */
- int continue_chatting = 0;
- log_error(LOG_LEVEL_CONNECT, "Accepted connection from %s on socket %d",
- csp->ip_addr_str, csp->cfd);
- do
- {
- unsigned int latency;
- #ifdef FEATURE_HTTPS_INSPECTION
- if (continue_chatting && client_use_ssl(csp))
- {
- continue_https_chat(csp);
- }
- else
- #endif
- {
- chat(csp);
- }
- /*
- * If the request has been crunched,
- * the calculated latency is zero.
- */
- latency = (unsigned)(csp->server_connection.response_received -
- csp->server_connection.request_sent) / 2;
- if ((csp->flags & CSP_FLAG_CLIENT_CONNECTION_KEEP_ALIVE)
- && (csp->flags & CSP_FLAG_CRUNCHED)
- && (csp->expected_client_content_length != 0))
- {
- csp->flags |= CSP_FLAG_SERVER_SOCKET_TAINTED;
- log_error(LOG_LEVEL_CONNECT,
- "Tainting client socket %d due to unread data.", csp->cfd);
- }
- continue_chatting = (csp->config->feature_flags
- & RUNTIME_FEATURE_CONNECTION_KEEP_ALIVE)
- && !(csp->flags & CSP_FLAG_SERVER_SOCKET_TAINTED)
- && (csp->cfd != JB_INVALID_SOCKET)
- && (csp->flags & CSP_FLAG_CLIENT_CONNECTION_KEEP_ALIVE)
- && ((csp->flags & CSP_FLAG_SERVER_CONTENT_LENGTH_SET)
- || (csp->flags & CSP_FLAG_CHUNKED));
- if (!(csp->flags & CSP_FLAG_CRUNCHED)
- && (csp->server_connection.sfd != JB_INVALID_SOCKET))
- {
- if (!(csp->flags & CSP_FLAG_SERVER_KEEP_ALIVE_TIMEOUT_SET))
- {
- csp->server_connection.keep_alive_timeout = csp->config->default_server_timeout;
- }
- if (!(csp->flags & CSP_FLAG_SERVER_CONNECTION_KEEP_ALIVE)
- || (csp->flags & CSP_FLAG_SERVER_SOCKET_TAINTED)
- || !socket_is_still_alive(csp->server_connection.sfd)
- || !(latency < csp->server_connection.keep_alive_timeout))
- {
- log_error(LOG_LEVEL_CONNECT,
- "Closing server socket %d connected to %s. "
- "Keep-alive: %u. Tainted: %u. Socket alive: %u. Timeout: %u.",
- csp->server_connection.sfd, csp->server_connection.host,
- 0 != (csp->flags & CSP_FLAG_SERVER_CONNECTION_KEEP_ALIVE),
- 0 != (csp->flags & CSP_FLAG_SERVER_SOCKET_TAINTED),
- socket_is_still_alive(csp->server_connection.sfd),
- csp->server_connection.keep_alive_timeout);
- #ifdef FEATURE_CONNECTION_SHARING
- if (csp->config->feature_flags & RUNTIME_FEATURE_CONNECTION_SHARING)
- {
- forget_connection(csp->server_connection.sfd);
- }
- #endif /* def FEATURE_CONNECTION_SHARING */
- #ifdef FEATURE_HTTPS_INSPECTION
- close_server_ssl_connection(csp);
- #endif
- close_socket(csp->server_connection.sfd);
- mark_connection_closed(&csp->server_connection);
- }
- }
- if (continue_chatting && any_loaded_file_changed(csp))
- {
- continue_chatting = 0;
- config_file_change_detected = 1;
- }
- #ifdef FEATURE_HTTPS_INSPECTION
- if (continue_chatting && client_use_ssl(csp) &&
- csp->ssl_with_client_is_opened == 0)
- {
- continue_chatting = 0;
- log_error(LOG_LEVEL_CONNECT, "Client socket %d is no longer usable. "
- "The TLS session has been terminated.", csp->cfd);
- }
- #endif
- if (continue_chatting)
- {
- if (((csp->flags & CSP_FLAG_PIPELINED_REQUEST_WAITING) != 0)
- && socket_is_still_alive(csp->cfd))
- {
- log_error(LOG_LEVEL_CONNECT, "Client request %d has been "
- "pipelined on socket %d and the socket is still alive.",
- csp->requests_received_total+1, csp->cfd);
- prepare_csp_for_next_request(csp);
- continue;
- }
- if (0 != (csp->flags & CSP_FLAG_CLIENT_CONNECTION_KEEP_ALIVE))
- {
- if (csp->server_connection.sfd != JB_INVALID_SOCKET)
- {
- log_error(LOG_LEVEL_CONNECT,
- "Waiting for the next client request on socket %d. "
- "Keeping the server socket %d to %s open.",
- csp->cfd, csp->server_connection.sfd, csp->server_connection.host);
- }
- else
- {
- log_error(LOG_LEVEL_CONNECT,
- "Waiting for the next client request on socket %d. "
- "No server socket to keep open.", csp->cfd);
- }
- }
- if ((csp->flags & CSP_FLAG_CLIENT_CONNECTION_KEEP_ALIVE)
- && data_is_available(csp->cfd, (int)csp->config->keep_alive_timeout)
- && socket_is_still_alive(csp->cfd))
- {
- log_error(LOG_LEVEL_CONNECT,
- "Data arrived in time on client socket %d. Requests so far: %u",
- csp->cfd, csp->requests_received_total);
- prepare_csp_for_next_request(csp);
- }
- else
- {
- #ifdef FEATURE_CONNECTION_SHARING
- if ((csp->config->feature_flags & RUNTIME_FEATURE_CONNECTION_SHARING)
- && (csp->server_connection.sfd != JB_INVALID_SOCKET)
- && (socket_is_still_alive(csp->server_connection.sfd))
- #ifdef FEATURE_HTTPS_INSPECTION
- && !server_use_ssl(csp)
- #endif
- )
- {
- time_t time_open = time(NULL) - csp->server_connection.timestamp;
- if (csp->server_connection.keep_alive_timeout < time_open - (time_t)latency)
- {
- break;
- }
- remember_connection(&csp->server_connection);
- csp->server_connection.sfd = JB_INVALID_SOCKET;
- drain_and_close_socket(csp->cfd);
- csp->cfd = JB_INVALID_SOCKET;
- privoxy_mutex_lock(&connection_reuse_mutex);
- if (!monitor_thread_running)
- {
- monitor_thread_running = 1;
- privoxy_mutex_unlock(&connection_reuse_mutex);
- wait_for_alive_connections();
- privoxy_mutex_lock(&connection_reuse_mutex);
- monitor_thread_running = 0;
- }
- privoxy_mutex_unlock(&connection_reuse_mutex);
- }
- #endif /* def FEATURE_CONNECTION_SHARING */
- break;
- }
- }
- else if (csp->server_connection.sfd != JB_INVALID_SOCKET)
- {
- log_error(LOG_LEVEL_CONNECT,
- "Closing server socket %d connected to %s. Keep-alive: %u. "
- "Tainted: %u. Socket alive: %u. Timeout: %u. "
- "Configuration file change detected: %u",
- csp->server_connection.sfd, csp->server_connection.host,
- 0 != (csp->flags & CSP_FLAG_SERVER_CONNECTION_KEEP_ALIVE),
- 0 != (csp->flags & CSP_FLAG_SERVER_SOCKET_TAINTED),
- socket_is_still_alive(csp->server_connection.sfd),
- csp->server_connection.keep_alive_timeout,
- config_file_change_detected);
- }
- } while (continue_chatting);
- #else
- chat(csp);
- #endif /* def FEATURE_CONNECTION_KEEP_ALIVE */
- if (csp->cfd != JB_INVALID_SOCKET)
- {
- log_error(LOG_LEVEL_CONNECT, "Closing client socket %d. "
- "Keep-alive: %u. Socket alive: %u. Data available: %u. "
- "Configuration file change detected: %u. Requests received: %u.",
- csp->cfd, 0 != (csp->flags & CSP_FLAG_CLIENT_CONNECTION_KEEP_ALIVE),
- socket_is_still_alive(csp->cfd), data_is_available(csp->cfd, 0),
- config_file_change_detected, csp->requests_received_total);
- #ifdef FEATURE_HTTPS_INSPECTION
- close_client_ssl_connection(csp);
- #endif
- drain_and_close_socket(csp->cfd);
- }
- if (csp->server_connection.sfd != JB_INVALID_SOCKET)
- {
- #ifdef FEATURE_CONNECTION_SHARING
- if (csp->config->feature_flags & RUNTIME_FEATURE_CONNECTION_SHARING)
- {
- forget_connection(csp->server_connection.sfd);
- }
- #endif /* def FEATURE_CONNECTION_SHARING */
- #ifdef FEATURE_HTTPS_INSPECTION
- close_server_ssl_connection(csp);
- #endif /* def FEATURE_HTTPS_INSPECTION */
- close_socket(csp->server_connection.sfd);
- }
- #ifdef FEATURE_CONNECTION_KEEP_ALIVE
- mark_connection_closed(&csp->server_connection);
- #endif
- free_csp_resources(csp);
- csp->flags &= ~CSP_FLAG_ACTIVE;
- }
- #ifdef __BEOS__
- /*********************************************************************
- *
- * Function : server_thread
- *
- * Description : We only exist to call `serve' in a threaded environment.
- *
- * Parameters :
- * 1 : data = Current client state (buffers, headers, etc...)
- *
- * Returns : Always 0.
- *
- *********************************************************************/
- static int32 server_thread(void *data)
- {
- serve((struct client_state *) data);
- return 0;
- }
- #endif
- #if !defined(_WIN32) || defined(_WIN_CONSOLE)
- /*********************************************************************
- *
- * Function : usage
- *
- * Description : Print usage info & exit.
- *
- * Parameters : Pointer to argv[0] for identifying ourselves
- *
- * Returns : No. ,-)
- *
- *********************************************************************/
- static void usage(const char *name)
- {
- printf("Privoxy version " VERSION " (" HOME_PAGE_URL ")\n"
- "Usage: %s [--config-test] "
- #if defined(unix)
- "[--chroot] "
- #endif /* defined(unix) */
- "[--help] "
- #if defined(unix)
- "[--no-daemon] [--pidfile pidfile] [--pre-chroot-nslookup hostname] [--user user[.group]] "
- #endif /* defined(unix) */
- "[--version] [configfile]\n",
- name);
- #ifdef FUZZ
- show_fuzz_usage(name);
- #endif
- printf("Aborting\n");
- exit(2);
- }
- #endif /* #if !defined(_WIN32) || defined(_WIN_CONSOLE) */
- #ifdef MUTEX_LOCKS_AVAILABLE
- /*********************************************************************
- *
- * Function : privoxy_mutex_lock
- *
- * Description : Locks a mutex.
- *
- * Parameters :
- * 1 : mutex = The mutex to lock.
- *
- * Returns : Void. May exit in case of errors.
- *
- *********************************************************************/
- void privoxy_mutex_lock(privoxy_mutex_t *mutex)
- {
- #ifdef FEATURE_PTHREAD
- int err = pthread_mutex_lock(mutex);
- if (err)
- {
- if (mutex != &log_mutex)
- {
- log_error(LOG_LEVEL_FATAL,
- "Mutex locking failed: %s.\n", strerror(err));
- }
- exit(1);
- }
- #else
- EnterCriticalSection(mutex);
- #endif /* def FEATURE_PTHREAD */
- }
- /*********************************************************************
- *
- * Function : privoxy_mutex_unlock
- *
- * Description : Unlocks a mutex.
- *
- * Parameters :
- * 1 : mutex = The mutex to unlock.
- *
- * Returns : Void. May exit in case of errors.
- *
- *********************************************************************/
- void privoxy_mutex_unlock(privoxy_mutex_t *mutex)
- {
- #ifdef FEATURE_PTHREAD
- int err = pthread_mutex_unlock(mutex);
- if (err)
- {
- if (mutex != &log_mutex)
- {
- log_error(LOG_LEVEL_FATAL,
- "Mutex unlocking failed: %s.\n", strerror(err));
- }
- exit(1);
- }
- #else
- LeaveCriticalSection(mutex);
- #endif /* def FEATURE_PTHREAD */
- }
- /*********************************************************************
- *
- * Function : privoxy_mutex_init
- *
- * Description : Prepares a mutex.
- *
- * Parameters :
- * 1 : mutex = The mutex to initialize.
- *
- * Returns : Void. May exit in case of errors.
- *
- *********************************************************************/
- static void privoxy_mutex_init(privoxy_mutex_t *mutex)
- {
- #ifdef FEATURE_PTHREAD
- int err = pthread_mutex_init(mutex, 0);
- if (err)
- {
- printf("Fatal error. Mutex initialization failed: %s.\n",
- strerror(err));
- exit(1);
- }
- #else
- InitializeCriticalSection(mutex);
- #endif /* def FEATURE_PTHREAD */
- }
- #endif /* def MUTEX_LOCKS_AVAILABLE */
- /*********************************************************************
- *
- * Function : initialize_mutexes
- *
- * Description : Prepares mutexes if mutex support is available.
- *
- * Parameters : None
- *
- * Returns : Void, exits in case of errors.
- *
- *********************************************************************/
- static void initialize_mutexes(void)
- {
- #ifdef MUTEX_LOCKS_AVAILABLE
- /*
- * Prepare global mutex semaphores
- */
- #ifdef FEATURE_HTTPS_INSPECTION
- privoxy_mutex_init(&certificate_mutex);
- privoxy_mutex_init(&ssl_init_mutex);
- #endif
- privoxy_mutex_init(&log_mutex);
- privoxy_mutex_init(&log_init_mutex);
- privoxy_mutex_init(&connection_reuse_mutex);
- #ifdef FEATURE_EXTERNAL_FILTERS
- privoxy_mutex_init(&external_filter_mutex);
- #endif
- #ifdef FEATURE_CLIENT_TAGS
- privoxy_mutex_init(&client_tags_mutex);
- #endif
- #ifdef FEATURE_EXTENDED_STATISTICS
- privoxy_mutex_init(&filter_statistics_mutex);
- privoxy_mutex_init(&block_statistics_mutex);
- #endif
- /*
- * XXX: The assumptions below are a bit naive
- * and can cause locks that aren't necessary.
- *
- * For example older FreeBSD versions (< 6.x?)
- * have no gethostbyname_r, but gethostbyname is
- * thread safe.
- */
- #if !defined(HAVE_GETHOSTBYADDR_R) || !defined(HAVE_GETHOSTBYNAME_R)
- privoxy_mutex_init(&resolver_mutex);
- #endif /* !defined(HAVE_GETHOSTBYADDR_R) || !defined(HAVE_GETHOSTBYNAME_R) */
- /*
- * XXX: should we use a single mutex for
- * localtime() and gmtime() as well?
- */
- #ifndef HAVE_GMTIME_R
- privoxy_mutex_init(&gmtime_mutex);
- #endif /* ndef HAVE_GMTIME_R */
- #ifndef HAVE_LOCALTIME_R
- privoxy_mutex_init(&localtime_mutex);
- #endif /* ndef HAVE_GMTIME_R */
- #if !defined(HAVE_ARC4RANDOM) && !defined(HAVE_RANDOM)
- privoxy_mutex_init(&rand_mutex);
- #endif /* !defined(HAVE_ARC4RANDOM) && !defined(HAVE_RANDOM) */
- #endif /* def MUTEX_LOCKS_AVAILABLE */
- }
- /*********************************************************************
- *
- * Function : main
- *
- * Description : Load the config file and start the listen loop.
- * This function is a lot more *sane* with the `load_config'
- * and `listen_loop' functions; although it stills does
- * a *little* too much for my taste.
- *
- * Parameters :
- * 1 : argc = Number of parameters (including $0).
- * 2 : argv = Array of (char *)'s to the parameters.
- *
- * Returns : 1 if : can't open config file, unrecognized directive,
- * stats requested in multi-thread mode, can't open the
- * log file, can't open the jar file, listen port is invalid,
- * any load fails, and can't bind port.
- *
- * Else main never returns, the process must be signaled
- * to terminate execution. Or, on Windows, use the
- * "File", "Exit" menu option.
- *
- *********************************************************************/
- #ifdef __MINGW32__
- int real_main(int argc, char **argv)
- #else
- int main(int argc, char **argv)
- #endif
- {
- int argc_pos = 0;
- int do_config_test = 0;
- #ifndef HAVE_ARC4RANDOM
- unsigned int random_seed;
- #endif
- #ifdef unix
- struct passwd *pw = NULL;
- struct group *grp = NULL;
- int do_chroot = 0;
- char *pre_chroot_nslookup_to_load_resolver = NULL;
- #endif
- #ifdef FUZZ
- char *fuzz_input_type = NULL;
- char *fuzz_input_file = NULL;
- #endif
- Argc = argc;
- Argv = argv;
- configfile =
- #if !defined(_WIN32)
- "config"
- #else
- "config.txt"
- #endif
- ;
- /* Prepare mutexes if supported and necessary. */
- initialize_mutexes();
- /* Enable logging until further notice. */
- init_log_module();
- /*
- * Parse the command line arguments
- *
- * XXX: simply printing usage information in case of
- * invalid arguments isn't particularly user friendly.
- */
- while (++argc_pos < argc)
- {
- #ifdef _WIN32
- /* Check to see if the service must be installed or uninstalled */
- if (strncmp(argv[argc_pos], "--install", 9) == 0)
- {
- const char *pName = argv[argc_pos] + 9;
- if (*pName == ':')
- pName++;
- exit((install_service(pName)) ? 0 : 1);
- }
- else if (strncmp(argv[argc_pos], "--uninstall", 11) == 0)
- {
- const char *pName = argv[argc_pos] + 11;
- if (*pName == ':')
- pName++;
- exit((uninstall_service(pName)) ? 0 : 1);
- }
- else if (strcmp(argv[argc_pos], "--service") == 0)
- {
- bRunAsService = TRUE;
- w32_set_service_cwd();
- atexit(w32_service_exit_notify);
- }
- else
- #endif /* defined(_WIN32) */
- #if !defined(_WIN32) || defined(_WIN_CONSOLE)
- if (strcmp(argv[argc_pos], "--help") == 0)
- {
- usage(argv[0]);
- }
- else if (strcmp(argv[argc_pos], "--version") == 0)
- {
- printf("Privoxy version " VERSION " (" HOME_PAGE_URL ")\n");
- exit(0);
- }
- #if defined(unix)
- else if (strcmp(argv[argc_pos], "--no-daemon") == 0)
- {
- set_debug_level(LOG_LEVEL_FATAL | LOG_LEVEL_ERROR | LOG_LEVEL_INFO);
- daemon_mode = 0;
- }
- else if (strcmp(argv[argc_pos], "--pidfile") == 0)
- {
- if (++argc_pos == argc) usage(argv[0]);
- pidfile = strdup_or_die(argv[argc_pos]);
- }
- else if (strcmp(argv[argc_pos], "--user") == 0)
- {
- char *user_arg;
- char *group_name;
- if (++argc_pos == argc) usage(argv[argc_pos]);
- user_arg = strdup_or_die(argv[argc_pos]);
- group_name = strchr(user_arg, '.');
- if (NULL != group_name)
- {
- /* Nul-terminate the user name */
- *group_name = '\0';
- /* Skip the former delimiter to actually reach the group name */
- group_name++;
- grp = getgrnam(group_name);
- if (NULL == grp)
- {
- log_error(LOG_LEVEL_FATAL, "Group '%s' not found.", group_name);
- }
- }
- pw = getpwnam(user_arg);
- if (NULL == pw)
- {
- log_error(LOG_LEVEL_FATAL, "User '%s' not found.", user_arg);
- }
- freez(user_arg);
- }
- else if (strcmp(argv[argc_pos], "--pre-chroot-nslookup") == 0)
- {
- if (++argc_pos == argc) usage(argv[0]);
- pre_chroot_nslookup_to_load_resolver = strdup_or_die(argv[argc_pos]);
- }
- else if (strcmp(argv[argc_pos], "--chroot") == 0)
- {
- do_chroot = 1;
- }
- #endif /* defined(unix) */
- else if (strcmp(argv[argc_pos], "--config-test") == 0)
- {
- do_config_test = 1;
- }
- #ifdef FUZZ
- else if (strcmp(argv[argc_pos], "--fuzz") == 0)
- {
- argc_pos++;
- if (argc < argc_pos + 2) usage(argv[0]);
- fuzz_input_type = argv[argc_pos];
- argc_pos++;
- fuzz_input_file = argv[argc_pos];
- }
- else if (strcmp(argv[argc_pos], "--stfu") == 0)
- {
- set_debug_level(LOG_LEVEL_STFU);
- }
- #endif
- else if (argc_pos + 1 != argc)
- {
- /*
- * This is neither the last command line
- * option, nor was it recognized before,
- * therefore it must be invalid.
- */
- usage(argv[0]);
- }
- else
- #endif /* defined(_WIN32) && !defined(_WIN_CONSOLE) */
- {
- configfile = argv[argc_pos];
- }
- } /* -END- while (more arguments) */
- show_version(Argv[0]);
- #if defined(unix)
- if (*configfile != '/')
- {
- char cwd[BUFFER_SIZE];
- char *abs_file;
- size_t abs_file_size;
- /* make config-filename absolute here */
- if (NULL == getcwd(cwd, sizeof(cwd)))
- {
- perror("failed to get current working directory");
- exit(1);
- }
- basedir = strdup_or_die(cwd);
- /* XXX: why + 5? */
- abs_file_size = strlen(cwd) + strlen(configfile) + 5;
- abs_file = malloc_or_die(abs_file_size);
- strlcpy(abs_file, basedir, abs_file_size);
- strlcat(abs_file, "/", abs_file_size);
- strlcat(abs_file, configfile, abs_file_size);
- configfile = abs_file;
- }
- #endif /* defined unix */
- files->next = NULL;
- clients->next = NULL;
- /* XXX: factor out initialising after the next stable release. */
- #ifdef _WIN32
- InitWin32();
- #endif
- #ifndef HAVE_ARC4RANDOM
- random_seed = (unsigned int)time(NULL);
- #ifdef HAVE_RANDOM
- srandom(random_seed);
- #else
- srand(random_seed);
- #endif /* ifdef HAVE_RANDOM */
- #endif /* ifndef HAVE_ARC4RANDOM */
- /*
- * Unix signal handling
- *
- * Catch the abort, interrupt and terminate signals for a graceful exit
- * Catch the hangup signal so the errlog can be reopened.
- *
- * Ignore the broken pipe signal as connection failures
- * are handled when and where they occur without relying
- * on a signal.
- */
- #if !defined(_WIN32)
- {
- int idx;
- const int catched_signals[] = { SIGTERM, SIGINT, SIGHUP };
- for (idx = 0; idx < SZ(catched_signals); idx++)
- {
- #ifdef sun /* FIXME: Is it safe to check for HAVE_SIGSET instead? */
- if (sigset(catched_signals[idx], sig_handler) == SIG_ERR)
- #else
- if (signal(catched_signals[idx], sig_handler) == SIG_ERR)
- #endif /* ifdef sun */
- {
- log_error(LOG_LEVEL_FATAL, "Can't set signal-handler for signal %d: %E", catched_signals[idx]);
- }
- }
- if (signal(SIGPIPE, SIG_IGN) == SIG_ERR)
- {
- log_error(LOG_LEVEL_FATAL, "Can't set ignore-handler for SIGPIPE: %E");
- }
- }
- #else /* ifdef _WIN32 */
- # ifdef _WIN_CONSOLE
- /*
- * We *are* in a windows console app.
- * Print a verbose messages about FAQ's and such
- */
- printf("%s", win32_blurb);
- # endif /* def _WIN_CONSOLE */
- #endif /* def _WIN32 */
- #ifdef FUZZ
- if (fuzz_input_type != NULL)
- {
- exit(process_fuzzed_input(fuzz_input_type, fuzz_input_file));
- }
- log_error(LOG_LEVEL_FATAL,
- "When compiled with fuzzing support, Privoxy should only be used for fuzzing. "
- "Various data structures are static which is unsafe when using threads.");
- #endif
- if (do_config_test)
- {
- exit(NULL == load_config());
- }
- /* Initialize the CGI subsystem */
- cgi_init_error_messages();
- /*
- * If running on unix and without the --no-daemon
- * option, become a daemon. I.e. fork, detach
- * from tty and get process group leadership
- */
- #if defined(unix)
- {
- if (daemon_mode)
- {
- int fd;
- pid_t pid = fork();
- if (pid < 0) /* error */
- {
- perror("fork");
- exit(3);
- }
- else if (pid != 0) /* parent */
- {
- int status;
- pid_t wpid;
- /*
- * must check for errors
- * child died due to missing files aso
- */
- sleep(1);
- wpid = waitpid(pid, &status, WNOHANG);
- if (wpid != 0)
- {
- exit(1);
- }
- exit(0);
- }
- /* child */
- setsid();
- /*
- * stderr (fd 2) will be closed later on,
- * when the config file has been parsed.
- */
- close(0);
- close(1);
- /*
- * Reserve fd 0 and 1 to prevent abort() and friends
- * from sending stuff to the clients or servers.
- */
- fd = open("/dev/null", O_RDONLY);
- if (fd == -1)
- {
- log_error(LOG_LEVEL_FATAL, "Failed to open /dev/null: %E");
- }
- else if (fd != 0)
- {
- if (dup2(fd, 0) == -1)
- {
- log_error(LOG_LEVEL_FATAL, "Failed to reserve fd 0: %E");
- }
- close(fd);
- }
- fd = open("/dev/null", O_WRONLY);
- if (fd == -1)
- {
- log_error(LOG_LEVEL_FATAL, "Failed to open /dev/null: %E");
- }
- else if (fd != 1)
- {
- if (dup2(fd, 1) == -1)
- {
- log_error(LOG_LEVEL_FATAL, "Failed to reserve fd 1: %E");
- }
- close(fd);
- }
- #ifdef FEATURE_EXTERNAL_FILTERS
- for (fd = 0; fd < 3; fd++)
- {
- mark_socket_for_close_on_execute(fd);
- }
- #endif
- chdir("/");
- } /* -END- if (daemon_mode) */
- /*
- * As soon as we have written the PID file, we can switch
- * to the user and group ID indicated by the --user option
- */
- if (pidfile != NULL)
- {
- write_pid_file(pidfile);
- }
- if (NULL != pw)
- {
- if (setgid((NULL != grp) ? grp->gr_gid : pw->pw_gid))
- {
- log_error(LOG_LEVEL_FATAL, "Cannot setgid(): Insufficient permissions.");
- }
- if (NULL != grp)
- {
- if (setgroups(1, &grp->gr_gid))
- {
- log_error(LOG_LEVEL_FATAL, "setgroups() failed: %E");
- }
- }
- else if (initgroups(pw->pw_name, pw->pw_gid))
- {
- log_error(LOG_LEVEL_FATAL, "initgroups() failed: %E");
- }
- if (do_chroot)
- {
- if (!pw->pw_dir)
- {
- log_error(LOG_LEVEL_FATAL, "Home directory for %s undefined", pw->pw_name);
- }
- /* Read the time zone file from /etc before doing chroot. */
- tzset();
- if (NULL != pre_chroot_nslookup_to_load_resolver
- && '\0' != pre_chroot_nslookup_to_load_resolver[0])
- {
- /* Initialize resolver library. */
- (void) resolve_hostname_to_ip(pre_chroot_nslookup_to_load_resolver);
- }
- if (chroot(pw->pw_dir) < 0)
- {
- log_error(LOG_LEVEL_FATAL, "Cannot chroot to %s", pw->pw_dir);
- }
- if (chdir ("/"))
- {
- log_error(LOG_LEVEL_FATAL, "Cannot chdir /");
- }
- }
- if (setuid(pw->pw_uid))
- {
- log_error(LOG_LEVEL_FATAL, "Cannot setuid(): Insufficient permissions.");
- }
- if (do_chroot)
- {
- char putenv_dummy[64];
- strlcpy(putenv_dummy, "HOME=/", sizeof(putenv_dummy));
- if (putenv(putenv_dummy) != 0)
- {
- log_error(LOG_LEVEL_FATAL, "Cannot putenv(): HOME");
- }
- snprintf(putenv_dummy, sizeof(putenv_dummy), "USER=%s", pw->pw_name);
- if (putenv(putenv_dummy) != 0)
- {
- log_error(LOG_LEVEL_FATAL, "Cannot putenv(): USER");
- }
- }
- }
- else if (do_chroot)
- {
- log_error(LOG_LEVEL_FATAL, "Cannot chroot without --user argument.");
- }
- }
- #endif /* defined unix */
- #ifdef _WIN32
- /* This will be FALSE unless the command line specified --service
- */
- if (bRunAsService)
- {
- /* Yup, so now we must attempt to establish a connection
- * with the service dispatcher. This will only work if this
- * process was launched by the service control manager to
- * actually run as a service. If this isn't the case, i've
- * known it take around 30 seconds or so for the call to return.
- */
- /* The StartServiceCtrlDispatcher won't return until the service is stopping */
- if (w32_start_service_ctrl_dispatcher(w32ServiceDispatchTable))
- {
- /* Service has run, and at this point is now being stopped, so just return */
- return 0;
- }
- #ifdef _WIN_CONSOLE
- printf("Warning: Failed to connect to Service Control Dispatcher\nwhen starting as a service!\n");
- #endif
- /* An error occurred. Usually it's because --service was wrongly specified
- * and we were unable to connect to the Service Control Dispatcher because
- * it wasn't expecting us and is therefore not listening.
- *
- * For now, just continue below to call the listen_loop function.
- */
- }
- #endif /* def _WIN32 */
- listen_loop();
- /* NOTREACHED */
- return(-1);
- }
- /*********************************************************************
- *
- * Function : bind_port_helper
- *
- * Description : Bind the listen port. Handles logging, and aborts
- * on failure.
- *
- * Parameters :
- * 1 : haddr = Host address to bind to. Use NULL to bind to
- * INADDR_ANY.
- * 2 : hport = Specifies port to bind to.
- * 3 : backlog = Listen backlog.
- *
- * Returns : Port that was opened.
- *
- *********************************************************************/
- static jb_socket bind_port_helper(const char *haddr, int hport, int backlog)
- {
- int result;
- jb_socket bfd;
- result = bind_port(haddr, hport, backlog, &bfd);
- if (result < 0)
- {
- const char *bind_address = (NULL != haddr) ? haddr : "INADDR_ANY";
- switch(result)
- {
- case -3:
- log_error(LOG_LEVEL_FATAL,
- "can't bind to %s:%d: There may be another Privoxy "
- "or some other proxy running on port %d",
- bind_address, hport, hport);
- case -2:
- log_error(LOG_LEVEL_FATAL,
- "can't bind to %s:%d: The hostname is not resolvable",
- bind_address, hport);
- default:
- log_error(LOG_LEVEL_FATAL, "can't bind to %s:%d: %E",
- bind_address, hport);
- }
- /* shouldn't get here */
- return JB_INVALID_SOCKET;
- }
- #ifndef HAVE_POLL
- #ifndef _WIN32
- if (bfd >= FD_SETSIZE)
- {
- log_error(LOG_LEVEL_FATAL,
- "Bind socket number too high to use select(): %d >= %d",
- bfd, FD_SETSIZE);
- }
- #endif
- #endif
- if (haddr == NULL)
- {
- log_error(LOG_LEVEL_INFO, "Listening on port %d on all IP addresses",
- hport);
- }
- else
- {
- log_error(LOG_LEVEL_INFO, "Listening on port %d on IP address %s",
- hport, haddr);
- }
- return bfd;
- }
- /*********************************************************************
- *
- * Function : bind_ports_helper
- *
- * Description : Bind the listen ports. Handles logging, and aborts
- * on failure.
- *
- * Parameters :
- * 1 : config = Privoxy configuration. Specifies ports
- * to bind to.
- * 2 : sockets = Preallocated array of opened sockets
- * corresponding to specification in config.
- * All non-opened sockets will be set to
- * JB_INVALID_SOCKET.
- *
- * Returns : Nothing. Inspect sockets argument.
- *
- *********************************************************************/
- static void bind_ports_helper(struct configuration_spec * config,
- jb_socket sockets[])
- {
- int i;
- for (i = 0; i < MAX_LISTENING_SOCKETS; i++)
- {
- if (config->hport[i])
- {
- sockets[i] = bind_port_helper(config->haddr[i],
- config->hport[i], config->listen_backlog);
- #if defined(FEATURE_ACCEPT_FILTER) && defined(SO_ACCEPTFILTER)
- if (config->enable_accept_filter && sockets[i] != JB_INVALID_SOCKET)
- {
- struct accept_filter_arg af_options;
- bzero(&af_options, sizeof(af_options));
- strlcpy(af_options.af_name, "httpready", sizeof(af_options.af_name));
- if (setsockopt(sockets[i], SOL_SOCKET, SO_ACCEPTFILTER, &af_options,
- sizeof(af_options)))
- {
- log_error(LOG_LEVEL_ERROR,
- "Enabling accept filter for socket %d failed: %E", sockets[i]);
- }
- }
- #endif
- }
- else
- {
- sockets[i] = JB_INVALID_SOCKET;
- }
- }
- config->need_bind = 0;
- }
- /*********************************************************************
- *
- * Function : close_ports_helper
- *
- * Description : Close listenings ports.
- *
- * Parameters :
- * 1 : sockets = Array of opened and non-opened sockets to
- * close. All sockets will be set to
- * JB_INVALID_SOCKET.
- *
- * Returns : Nothing.
- *
- *********************************************************************/
- static void close_ports_helper(jb_socket sockets[])
- {
- int i;
- for (i = 0; i < MAX_LISTENING_SOCKETS; i++)
- {
- if (JB_INVALID_SOCKET != sockets[i])
- {
- close_socket(sockets[i]);
- }
- sockets[i] = JB_INVALID_SOCKET;
- }
- }
- #ifdef _WIN32
- /* Without this simple workaround we get this compiler warning from _beginthread
- * warning C4028: formal parameter 1 different from declaration
- */
- void w32_service_listen_loop(void *p)
- {
- listen_loop();
- }
- #endif /* def _WIN32 */
- /*********************************************************************
- *
- * Function : listen_loop
- *
- * Description : bind the listen port and enter a "FOREVER" listening loop.
- *
- * Parameters : N/A
- *
- * Returns : Never.
- *
- *********************************************************************/
- static void listen_loop(void)
- {
- struct client_states *csp_list = NULL;
- struct client_state *csp = NULL;
- jb_socket bfds[MAX_LISTENING_SOCKETS];
- struct configuration_spec *config;
- unsigned int active_threads = 0;
- #if defined(FEATURE_PTHREAD)
- pthread_attr_t attrs;
- pthread_attr_init(&attrs);
- pthread_attr_setdetachstate(&attrs, PTHREAD_CREATE_DETACHED);
- #endif
- config = load_config();
- #ifdef FEATURE_CONNECTION_SHARING
- /*
- * XXX: Should be relocated once it no
- * longer needs to emit log messages.
- */
- initialize_reusable_connections();
- #endif /* def FEATURE_CONNECTION_SHARING */
- bind_ports_helper(config, bfds);
- #ifdef FEATURE_GRACEFUL_TERMINATION
- while (!g_terminate)
- #else
- for (;;)
- #endif
- {
- #if !defined(FEATURE_PTHREAD) && !defined(_WIN32) && !defined(__BEOS__)
- while (waitpid(-1, NULL, WNOHANG) > 0)
- {
- /* zombie children */
- }
- #endif /* !defined(FEATURE_PTHREAD) && !defined(_WIN32) && !defined(__BEOS__) */
- /*
- * Free data that was used by died threads
- */
- active_threads = sweep();
- #if defined(unix)
- /*
- * Re-open the errlog after HUP signal
- */
- if (received_hup_signal)
- {
- if (NULL != config->logfile)
- {
- init_error_log(Argv[0], config->logfile);
- }
- received_hup_signal = 0;
- }
- #endif
- csp_list = zalloc_or_die(sizeof(*csp_list));
- csp = &csp_list->csp;
- log_error(LOG_LEVEL_CONNECT,
- "Waiting for the next client connection. Currently active threads: %u",
- active_threads);
- /*
- * This config may be outdated, but for accept_connection()
- * it's fresh enough.
- */
- csp->config = config;
- if (!accept_connection(csp, bfds))
- {
- log_error(LOG_LEVEL_CONNECT, "accept failed: %E");
- freez(csp_list);
- continue;
- }
- csp->flags |= CSP_FLAG_ACTIVE;
- csp->server_connection.sfd = JB_INVALID_SOCKET;
- csp->config = config = load_config();
- if (config->need_bind)
- {
- /*
- * Since we were listening to the "old port", we will not see
- * a "listen" param change until the next request. So, at
- * least 1 more request must be made for us to find the new
- * setting. I am simply closing the old socket and binding the
- * new one.
- *
- * Which-ever is correct, we will serve 1 more page via the
- * old settings. This should probably be a "show-status"
- * request. This should not be a so common of an operation
- * that this will hurt people's feelings.
- */
- close_ports_helper(bfds);
- bind_ports_helper(config, bfds);
- }
- #ifdef FEATURE_TOGGLE
- if (global_toggle_state)
- #endif /* def FEATURE_TOGGLE */
- {
- csp->flags |= CSP_FLAG_TOGGLED_ON;
- }
- if (run_loader(csp))
- {
- log_error(LOG_LEVEL_FATAL, "a loader failed - must exit");
- /* Never get here - LOG_LEVEL_FATAL causes program exit */
- }
- #ifdef FEATURE_ACL
- if (block_acl(NULL,csp))
- {
- log_error(LOG_LEVEL_CONNECT,
- "Connection from %s on %s (socket %d) dropped due to ACL",
- csp->ip_addr_str, csp->listen_addr_str, csp->cfd);
- close_socket(csp->cfd);
- freez(csp->ip_addr_str);
- freez(csp->listen_addr_str);
- freez(csp_list);
- continue;
- }
- #endif /* def FEATURE_ACL */
- if ((0 != config->max_client_connections)
- && (active_threads >= config->max_client_connections))
- {
- log_error(LOG_LEVEL_CONNECT,
- "Rejecting connection from %s. Maximum number of connections reached.",
- csp->ip_addr_str);
- write_socket_delayed(csp->cfd, TOO_MANY_CONNECTIONS_RESPONSE,
- strlen(TOO_MANY_CONNECTIONS_RESPONSE), get_write_delay(csp));
- close_socket(csp->cfd);
- freez(csp->ip_addr_str);
- freez(csp->listen_addr_str);
- freez(csp_list);
- continue;
- }
- /* add it to the list of clients */
- csp_list->next = clients->next;
- clients->next = csp_list;
- if (config->multi_threaded)
- {
- int child_id;
- /* this is a switch () statement in the C preprocessor - ugh */
- #undef SELECTED_ONE_OPTION
- /* Use Pthreads in preference to native code */
- #if defined(FEATURE_PTHREAD) && !defined(SELECTED_ONE_OPTION)
- #define SELECTED_ONE_OPTION
- {
- pthread_t the_thread;
- int ret;
- ret = pthread_create(&the_thread, &attrs,
- (void * (*)(void *))serve, csp);
- child_id = ret ? -1 : 0;
- }
- #endif
- #if defined(_WIN32) && !defined(_CYGWIN) && !defined(SELECTED_ONE_OPTION)
- #define SELECTED_ONE_OPTION
- child_id = _beginthread(
- (void (*)(void *))serve,
- 64 * 1024,
- csp);
- #endif
- #if defined(__BEOS__) && !defined(SELECTED_ONE_OPTION)
- #define SELECTED_ONE_OPTION
- {
- thread_id tid = spawn_thread
- (server_thread, "server", B_NORMAL_PRIORITY, csp);
- if ((tid >= 0) && (resume_thread(tid) == B_OK))
- {
- child_id = (int) tid;
- }
- else
- {
- child_id = -1;
- }
- }
- #endif
- #if !defined(SELECTED_ONE_OPTION)
- child_id = fork();
- /* This block is only needed when using fork().
- * When using threads, the server thread was
- * created and run by the call to _beginthread().
- */
- if (child_id == 0) /* child */
- {
- int rc = 0;
- #ifdef FEATURE_TOGGLE
- int inherited_toggle_state = global_toggle_state;
- #endif /* def FEATURE_TOGGLE */
- serve(csp);
- /*
- * If we've been toggled or we've blocked the request, tell Mom
- */
- #ifdef FEATURE_TOGGLE
- if (inherited_toggle_state != global_toggle_state)
- {
- rc |= RC_FLAG_TOGGLED;
- }
- #endif /* def FEATURE_TOGGLE */
- #ifdef FEATURE_STATISTICS
- if (csp->flags & CSP_FLAG_REJECTED)
- {
- rc |= RC_FLAG_BLOCKED;
- }
- #endif /* ndef FEATURE_STATISTICS */
- _exit(rc);
- }
- else if (child_id > 0) /* parent */
- {
- /* in a fork()'d environment, the parent's
- * copy of the client socket and the CSP
- * are not used.
- */
- int child_status;
- #if !defined(_WIN32) && !defined(__CYGWIN__)
- wait(&child_status);
- /*
- * Evaluate child's return code: If the child has
- * - been toggled, toggle ourselves
- * - blocked its request, bump up the stats counter
- */
- #ifdef FEATURE_TOGGLE
- if (WIFEXITED(child_status) && (WEXITSTATUS(child_status) & RC_FLAG_TOGGLED))
- {
- global_toggle_state = !global_toggle_state;
- }
- #endif /* def FEATURE_TOGGLE */
- #ifdef FEATURE_STATISTICS
- urls_read++;
- if (WIFEXITED(child_status) && (WEXITSTATUS(child_status) & RC_FLAG_BLOCKED))
- {
- urls_rejected++;
- }
- #endif /* def FEATURE_STATISTICS */
- #endif /* !defined(_WIN32) && defined(__CYGWIN__) */
- close_socket(csp->cfd);
- csp->flags &= ~CSP_FLAG_ACTIVE;
- }
- #endif
- #undef SELECTED_ONE_OPTION
- /* end of cpp switch () */
- if (child_id < 0)
- {
- /*
- * Spawning the child failed, assume it's because
- * there are too many children running already.
- * XXX: If you assume ...
- */
- log_error(LOG_LEVEL_ERROR,
- "Unable to take any additional connections: %E. Active threads: %u",
- active_threads);
- write_socket_delayed(csp->cfd, TOO_MANY_CONNECTIONS_RESPONSE,
- strlen(TOO_MANY_CONNECTIONS_RESPONSE), get_write_delay(csp));
- close_socket(csp->cfd);
- csp->flags &= ~CSP_FLAG_ACTIVE;
- }
- }
- else
- {
- serve(csp);
- }
- }
- #if defined(FEATURE_PTHREAD)
- pthread_attr_destroy(&attrs);
- #endif
- /* NOTREACHED unless FEATURE_GRACEFUL_TERMINATION is defined */
- #ifdef FEATURE_HTTPS_INSPECTION
- /* Clean up. Aim: free all memory (no leaks) */
- ssl_release();
- #endif
- #ifdef FEATURE_GRACEFUL_TERMINATION
- log_error(LOG_LEVEL_INFO, "Graceful termination requested");
- unload_current_config_file();
- unload_current_actions_file();
- unload_current_re_filterfile();
- #ifdef FEATURE_TRUST
- unload_current_trust_file();
- #endif
- if (config->multi_threaded)
- {
- int i = 60;
- do
- {
- sleep(1);
- sweep();
- } while ((clients->next != NULL) && (--i > 0));
- if (i <= 0)
- {
- log_error(LOG_LEVEL_ERROR, "Graceful termination failed - still some live clients after 1 minute wait.");
- }
- }
- sweep();
- sweep();
- #if defined(unix)
- freez(basedir);
- #endif
- #if defined(_WIN32) && !defined(_WIN_CONSOLE)
- /* Cleanup - remove taskbar icon etc. */
- TermLogWindow();
- #endif
- exit(0);
- #endif /* FEATURE_GRACEFUL_TERMINATION */
- }
- /*
- Local Variables:
- tab-width: 3
- end:
- */
|