北大旮旯zz

快毕业时, 听黄兄读过, 当时只知道理教.

以下转载....
判断你是不是北大学生的10个问题
1 图书馆前面狮子的秘密是什么?
2 物美的厕所在什么地方?
3 红湖在什么地方?
4 理科二号楼有哪几层可以通往理科一号楼/理教?
5 北招在什么地方?
6 燕南咖啡厅在什么地方?
7 北大北门在什么地方?
8 图书馆新馆地上有几层?
9 北大微电子所在什么地方?
0 理教2056C在什么地方?

记前日小聚

RH 兄将去香港, 行前五人一聚于老蜀人.  几个月不见, RH发型小变.

在点菜时, 我和RH都说不吃辣, 最后还是吃得不亦乐乎, 倒是蜀人NJ兄不敌. 因为要毕业的缘故, 席间所聊, 大抵不离工作.

再晚去听EMC的宣讲, 另见一人. 讲得十分拖踏. 或许因为有抽奖, 很多人听到了最后.

第二天起得很早, 图书馆未开门, 就先去未名湖转了一圈. 湖水很脏, 想起几年前曾在这洗过脚, 那时比现在稍干净些. 或许是洗脚的人多了? 稍晚时W兄亦到图书馆. 他于前一天有所遇, 仍然到同一个地方等着. 听着不像这个年龄做的事. 然后一起回来, 终未等至.

晚上出去又碰见RH, 也见着另一个吹笛子的人.

今日笔试冲突. 工作难找, 也不很想工作. 同学似乎并没有这样的情绪.

太平广记中酒

除了泛称以外, 以下还有些意思

元藏几: 乃出菖蒲花桃花酒饮之,而神气清爽 ...
崔希真: 间又献松花酒。老父曰:"花涩无味。某野人也,能令其醇美。"乃于怀中取一丸药,色黄而坚。老人以石碎之,置于酒中,则顿甘美矣挂素上,如有所涂,瞬息而罢
唐宪宗皇帝: 龙膏酒黑如纯漆,饮之令人神爽
嵩岳嫁女: 可各赐薰髓酒一杯。璆、韶饮讫,觉肌肤温润,稍异常人,呼吸皆异香气
红线: 时里有孕妇,忽患盅症,某以芫花酒下之,妇人与腹中二子俱毙, ...,
高骈: 乃置患者于密室中,饮以乳香酒数升,则懵然无知,以利刀开其脑缝

千日酒
昔有人名玄石,从中山酒家沽酒。酒家与千日酒,忘语其节。至家醉卧,不醒数日。家人不知,以为死也,具棺殓葬之。酒家至千日,乃忆玄石前来沽酒,醉当醒矣。遂往索玄石家而问之,云:"石亡已三年,今服阕矣。"于是与家人至玄石墓,掘冢开视,玄始醒,起于棺中.

擒奸酒
河东人刘白坠者善于酿酒。六月中时暑赫,刘以罂贮酒,曝于日中。经一旬,酒味不动,饮之香美,醉而不易醒。京师朝贵出郡者,远相饷餽,逾于千里。以其可至远,号曰"鹤觞",亦名"骑驴酒"。永熙中,青州刺史毛鸿宾带酒之任。路中夜逢劫盗,盗饮之皆醉,遂备擒获。因此复名"擒奸酒"。游侠语曰:"不畏张弓拔刀,唯畏白坠春醪。"

若下酒
《舆地志》:村人取若下水以酿酒,醇美。俗称"若下酒"。张协士所云:"荆州乌程,豫北竹叶。"即此是也。

昆仑觞
魏贾摪家累千金,博学善著作。有苍头善别水,常令乘小舟于黄河中。以瓠匏接河源水,一日不过七八升。经宿,器中色如绛。以酿酒,名"昆仑觞",酒之芳味,世间所绝。曾以三十斛上魏庄帝。

碧筒酒
历城北有使君林。魏正始中,郑公悫三伏之际,每率宾僚避暑于此。取大莲叶置砚格上。盛酒三升。以簪刺叶,令与柄通。屈茎上,轮菌如象鼻。传吸之,名为"碧筒"。历下效之,言酒味杂莲气,香冷胜于冰。

九酝酒
张华既贵,有少时知识来候之。华与共饮九酝酒,为酣畅,其夜醉眠。华常饮此酒,醉眠后,辄敕左右,转侧至觉。是夕,忘敕之。左右依常时为张公转侧,其友人无人为之。至明,友人犹不起。华咄云:"此必死矣。"使视之,酒果穿肠流,床下滂沱。

消肠酒
张华为醇酒,煮三薇以渍曲蘖。蘖出西羌,曲出北胡。胡中有指星麦,四月火星出,获麦而食之。蘖用水渍,三夕而麦生萌芽。以平旦时鸡初鸣而用之,俗人呼为鸡鸣麦。以酿酒,清美鬯。久含令人齿动,若大醉不摇荡,使人肝肠烂,当时谓之消肠酒。或云,醇酒可为长宵之乐。二说声同而事异焉。

青田酒
乌孙国有青田核,莫知其树与实。而核大如五六升瓠,空之盛水,俄而成酒。刘章曾得二枚,集宾设之,可供二十人。一核方尽,一核所盛,复中饮矣。唯不可久置,久则味苦难饮。因名其核曰"青田壶",酒曰"青田酒"。

读太平广记: 东风与酒之感应

淮南子曰:"东风至而酒泛溢。"许慎云:"东风震方也。酒泛清酒也。木味酸,相感故也。"高诱云:"酒泛为米面曲之泛者,风至而沸动。"李淳风又按:今酒初熟,瓮上澄清时,恒随日转。在旦则清者在东畔,午时在南,日落在西,夜半在子。恒清者随日所在。又春夏间,于地荫下停春酒者,瓮上蚁泛,皆逐风而移。虽居深密,非风所至,而感召动也。
今人看来, 大概是天气暖了, 细菌易成活的缘故.

记小学时, 母亲曾几次将馍霉制, 加些黄豆, 放些做馍用的酵饼, 和水, 晒成酱. 说用来做菜, 比买来的酱油香. 或许是当时的酱油加水太多? 我当时小, 做菜吃不出来, 但很是喜欢吃这酱. 常常在晒制的过程就去吃. 母亲劝说, 中午别去, 外面太热, 翻动后, 酱就酸了. 我不知道是酱真的会酸, 还是母亲怕中午太热, 但听她话后, 也就早晚吃些, 带帮着和动.

今如此比对, 大概会酸也是真的.

痴且不讳

今日与友人聊, 听其管窥取舍人物于情痴.

回来后想起异史氏的一段话, 查录如下:

性痴则其智凝,  故书痴者文必工, 技痴者艺良; 世之落拓而无成者, 皆自谓不痴者也. 且如粉花荡家, 卢雉倾家, 顾痴人事哉! 以是知慧黠而过, 乃是真痴, 彼孙子何痴乎!

异史氏将痴归为慧黠而过, 虽说痴且不讳, 终有一个过字. 依常想法, 痴与黠相抵, 倒与执相似. 迷执于一事, 心无它念, 即为痴者.

论情, 情痴者当解为痴于人者, 以与滥情者分.

情痴者, 古来不扬. 如幽纣倾国, 尾生守信, 范蠡捐官(避祸?), 三郎乱伦, 萧郎赠诗, 再如绿珠坠楼, 红拂夜奔, 或有其痴处, 却不见得全是情.

当代, 只知道徐志摩剩下些情诗.

情痴的无典型, 也许是因为以情为上的价值观与圣贤程朱之道相背. 然而, 我们不可以想象么?

可以, 只是我实在想象不出.


perl script to parse HTTP through tcpdump

This is buggy. The most difficulty is the gzip processing — since in that case, the order of packet is important.
I'll not rewrite this, since it already resolved the problem, which cause me write this snippet code. If you have change/fix something, an email is very appreciated.
If you need this, it's a headache.
This is also useful for sniff password or email(with arpspoof), :-).
#!/usr/bin/perl -w
#
# Author: jiangzuoyan@gmail.com
# 2008-07-22
#
# parse http get/send through
# tcpdump -S -lnx -s 40960 'tcp port 80 and (((ip[2:2] - ((ip[0]&0xf)<<2)) - ((tcp[12]&0xf0)>>2)) != 0)'
#
# this is buggy.
use Getopt::Long;
use warnings;
use strict;

#open (STDIN,"/usr/sbin/tcpdump -lnx -s 40960 'tcp port 80 and (((ip[2:2] - ((ip[0]&0xf)<<2)) - ((tcp[12]&0xf0)>>2)) != 0)'|");
my ($srchost, $dsthost, $seqstart, $seqend, $ack, $packet);

# packet = {srchost: dsthost:, seqstart:, seqend:, ack:}
my @packets;

sub add_packet {
  return unless $_[5] && length($_[5]) && $_[0] && length($_[0]);
  my @tmp = @_;
  $packets[@packets] = \@tmp;
  #print "add packet (" , join(",", @_[0..4]) , "), lidx=", $#packets, "\n";
}
sub is_following {
  my ($a, $b) = (shift, shift); #@_;
  return ($$a[0] eq $$b[0]) &&
    ($$a[1] eq $$b[1]) &&
    ($$a[4] eq $$b[4]) &&
    ($$a[3] eq $$b[2]);
}

sub compare_packet() {
  my ($a, $b) = (shift, shift);
  my ($ret, $idx) = 0;
  for ($idx = 0; !$ret && $idx < 5; ++$idx) {
    $ret =  $$a[$idx] cmp $$b[$idx];
  }
  return $ret;
}

sub print_packets {
  return unless @packets;
  my $idx = 0;
  my ($srchost, $dsthost, $seqstart, $seqend, $ack, $packet) = @{$packets[$idx]};
  for ($idx = 1; $idx < @packets; ++$idx) {
    #print "check is_following (", join(",", @{$packets[$idx-1]}[0..4]), ") , (", join(",", @{$packets[$idx]}[0..4]), ")\n";
    if (&is_following($packets[$idx-1], $packets[$idx])) {
      $packet .= $packets[$idx][5];
      $seqend = $packets[$idx][3];
    } else {
      #print $idx, " is not following...\n";
      while ($packet && length($packet)) {
        $packet = &print_packet($srchost, $dsthost, $seqstart, $seqend, $ack, $packet);
      }
      ($srchost, $dsthost, $seqstart, $seqend, $ack, $packet) = @{$packets[$idx]};
    }
  }
  while ($packet && length($packet)) {
    $packet = &print_packet($srchost, $dsthost, $seqstart, $seqend, $ack, $packet);
  }
}
sub print_packet{
  #print "on print packet, (", join(",", @_[0..4]), ")\n";
  my ($srchost, $dsthost, $seqstart, $seqend, $ack, $packet) = @_;
  return unless $packet && $srchost && $dsthost;
  print "##FROM-TO:$srchost -> $dsthost $seqstart,$seqend ack $ack\n";
  my $hp = index($packet, "\r\n\r\n");
  if ($hp != -1) {
    my $header = substr($packet, 0, $hp);
    print "##GOT HEAD\n", $header, "\n\n";
    my ($clen) = $header =~ /[\r\n]Content-Length: +([0-9]+)\s/;
    $clen = 0 unless $clen;
    my  $data;
    if ($clen) {
      $data = substr($packet, $hp + 4, $clen);
      $packet = substr($packet, $hp + 4 + $clen);
    } else {
      $data = substr($packet, $hp+4);
      $packet = "";
    }
    if ($header =~ /[\r\n]Content-Encoding: +gzip\s/) {
      print "##got gzip content len=$clen\n";
      open(GZIP, "| gunzip");
      print GZIP $data;
      close(GZIP);
    } elsif($header =~ /[\r\n]Content-Type: image\//) {
      print "##got a image ....\n";
    } else {
      print "##got plain content len=$clen\n";
      print $data;
    }
  } else {
    print "##UNFOUND HEADER PACKET\n";
    print $packet;
    $packet = "";
  }
  print "\n##EFROM-TO:$srchost -> $dsthost\n";
  return $packet;
}
binmode STDOUT;
while (<>) {
  if (/^\S/) {
    &add_packet($srchost, $dsthost, $seqstart, $seqend, $ack, $packet);
    ($srchost, $dsthost, $seqstart, $seqend, $ack)
      = /(\d+(?:\.\d+){4})\s+>\s+(\d+(?:\.\d+){4}):[^0-9]+([0-9]+):([0-9]+)\([0-9]+\) ack ([0-9]+)/;
    $packet = "";
  } else {
    next if /\s+0x00[012]0:\s+/;
    s/^(\s+0x[0-9a-f]+:\s+[0-9a-f\s]{0,40}).*$/$1/;
    s/^(\s+0x0030:\s+)(?:[0-9a-f]{4}\s+){1,2}/$1/;
    s/^\s+0x[0-9a-f]+:\s+//;
    s/\s*$//;
    s/([0-9a-f]{2})\s?/chr(hex($1))/eg;
    $packet .= $_;
  }
}
@packets = sort {&compare_packet($a, $b) } @packets;
&print_packets();

比尔盖茨名言大搜集 zz

不知道真实性, 有些话还是不错的.......

"我应为王"

"公平不是总存在的,在生活学习的各个方面总有一些不能如意的地方.但只要适应它,并坚持到底,总能收到意想不到的成效."

"在这个世界上,没有人能使你倒下.如果你自己的信念还站立的话."

"轻率和疏忽所造成的祸患不相上下.有许多青年人之所以失败,就是败在做事轻率这一点上."

"有非凡志向,才有非凡成就."

"很多人喜欢拖延,他们对手头的事情不是做不好,而是不去做,这是最大的恶习."

"一旦做出决定就不要拖延.任何事情想到就去做!立即行动!"

"好的习惯是一笔财富,一旦你拥有它,你就会受益终生.养成"立即行动"的习惯,你的人生将变得更有意义."

"切实执行你的梦想,以便发挥它的价值,不管梦想有多好,除非真正身体力行,否则,永远没有收获."

"成功开始于想法,但是,只有这样的想法,却没有付出行动,还是不可能成功的."

"成功者一遇到问题就马上动手去解决.他们不花费时间去发愁,因为发愁不能解决任何问题,只会不断增加忧虑、浪费时间."

"人们所认识到的是成功者往往经历了更多的失败,只是他们从失败中站起来并继续向前."

"失败并非坏事,一次失败能教会你许多,甚至比你大学里所学的还有用."

"破产是一种暂时的困境,贫困是一种思想的状态."

"花费数百元买一本书,便可以获得别人的智慧经验.然而,如果你全盘模仿,不加思考,那有时就会画虎不成反类犬."

"年轻人欠缺经验,但请不要忘记:年轻是你最大的本钱.不要怕犯错,也不要畏惧挑战,你应该坚持到底,在出人头地的过程中努力再努力."

"获得成功有两个重要的前题:一是坚决,二是忍耐."

"只要有坚强的持久心,一个庸俗平凡的人也会有成功的一天,否则即使是一个才识卓越的人,也只能遭遇失败的命运."

"当你在事业上遇到挫折,有"打退堂鼓"的念头时,你应该加以注意,这是最危险的时候!"

"坚持下去,成功就在下一个街角处等着你."

"机会并不会自动地转化为钞票——其中还必须有其他因素.简单地说,你必须能够看到它,然后必须相信你能抓住它."

"强烈的欲望也是非常重要的.人需要有强大的动力才能在好的职业中获得成功.你必须在心中有非分之想,你必须尽力抓住那个机会."

"企业发展需要的是机会,而机会对于有眼光的领导人来说,一次也就够了."

"科学技术的进步将会给人们的生活带来巨大的影响,而人们要不断适应这种时代的变化,而不要坐等未来,失去自我发展的良好机会."

"每一天都会有一个机遇,每一天都会有一个对某个人有用的机遇,每一天都会有一个前所未有的、绝不会再来的机会."

"幸运之神会光顾世界上的每一个人,但如果她发现这个人并没有准备好要迎接她时,她就会从大门里走进来,然后从窗子里飞出去."

"最有希望的成功者,并不是才华最出众的人,而是那些最善于利用每一时机发掘开拓的人."

"一个人想要成功,就要学会在机遇从头顶上飞过时跳起来抓住它.这样逮到机遇的机会就会增大."

"人生的选择决定一切"

"每项事业成功都离不开选择,而只有不同寻常的选择才会获取不同寻常的成功."

"成功的轨迹作为一种策略路线,从一开始就应该走上正轨."

"失败是成大事者之母."

"这个世界并不在乎你的自尊,只在乎你做出来的成绩,然后再去强调你的感受."

"他之所以为自己所领导的微软而感到自豪,是因为在这个团体中聚集了一大批与他一样热爱微软事业的人."

"一个管理者如果不了解其下属的工作,那他就无法有效地管理他们."

"对人才的运用,仅仅限于收罗是远远不够的,重要的是对人才不仅要善于识别其长处,而且要敢于大胆地使用,以让其充分显示自己的才能."

"微软公司在用人上所表现出的胆略与气魄是别的公司无可比拟的."

"对于一个大公司而言,没有一支强有力的服务队伍,给用户提供全面、周到的服务,那简直是难以想象的."

"公司可以想出一些主意让员工自己寻找更好的办事方法,而绝不应该命令说"你必须选择这样的过程,你必须这么做",这肯定行不通."

"经过每一个里程碑式的重要阶段时,我们都力争做到没有任何瑕疵,就像做项目评估工作那样."

"我们没有不懂技术的管理人员,因为,去寻求技术和管理之间的平衡毫不费力."

"千万不要错过那些好小子,一旦发现必须下定决心,不然你会与他们失之交臂!"

"人生是不公平的,习惯接受吧."

"你不会一离开学校就有百万年薪,你不会马上就是拥有公司配属手机的副总裁,二者你都必须靠努力赚来."

"盖茨运用的管理风格既不是美国的个人主义式,也不是日本的共识主义式,而是独树一帜的达尔文式——适都生存"

"我工作是为了乐趣"

"微软公司雇用工作狂真是眼光独到."

"每周经常工作72小时,有时甚至达到90小时;不工作的时候,他就像一个黑洞吸收光线那样,大量吸收信息."

"没有热忱的经营者,也就教育不出敬业的员工."

"如果你觉得你的老板很凶,等你做了老板就知道,老板是没有工作任期保障的."

"要赞扬某人,最好用白纸黑字写下来;若要训斥某人,则要用电话的方式,不留痕迹."

"在快餐店打工并不可耻,你的祖父对煎汉堡有不同的看法:机会."

"由于缺乏团队合作而失败的工商企业,比由于其他原因而失败的要多."

"如果你一事无成,不是你父母的错,所以不要对自己犯的错发牢骚,从错误中去学习."

"要办好一个企业,固然必须摆平自上而下的利益关系,让处于企业内部各个层次的人,在发挥自己在企业中作用的同时,有一个相应的回报;但是建立良好的劳资关系,取得相互尊重,享受人与人之间的温暖和快乐同样是企业管理的大事."

"看一下老板是不是善于管理他的员工,从他给员工支付的报酬毫无疑问地可以做出判断."

"在学校里可能有赢家输家,在人生中却还言之过早.学校会不断给你机会找到正确的答案,真实人生中却完全不是这么回事."

"在我们这里,体现员工地位和贡献,不是他的职务,而是他的业绩.他取得了成绩,大家都赞扬他,尊重他,以他为榜样,他就会有一种满足感."

"我们需要的是世界上最优秀的人才!"

"人生没有寒署候,人生不是学期制,没有哪个雇主有兴趣帮你寻找自我,请用自己的时间来做这件事吧."

"落后就是耻辱."

"在计算机领域内,技术与应用发展更新极快,对其技术的掌握很难做到一劳永逸.有些人掌握了某种技能,生产出某种产品,就以为能一劳永逸,万事大吉了,这样非常危险的."

"电视上演的并非真实人生.现实生活中每人都要离开咖啡馆去工作."

"管理者在任何时候,任何情况下都有使员工们更加成熟的使命."

"知道学习的重要性,知道该向谁学和学习什么,这正是比尔先生及其微软不断取得成功的重要经验.""孜孜以求进步的精神,是一个人的优越的标记与胜利的征兆."

"养成每天读十分钟书的习惯.这样每天十分钟,二十年之后,他的知识水平一定前后判若两人.只要他所读的都是好的东西." "创新是做大公司唯一之路."

"我很幸远,年纪轻轻就发现我的兴趣,而且令我如此着迷,至今仍是如此."

"对书呆子好一点,你未来很可能就为其中一个工作."

"失败是不可避免的,但只要坚持到底,总能收到意想不到的成效."

"我们应该接受迅速失败,而不是缓缓失败,最不该接受的则是没有失败.如果有人从不犯错误,那只能说明他们努力不够.失败的结果是试图去尝试其它的可能."

"巨大的成功靠的不是力量是韧性.社会竞争常常是持久力的竞争,有恒心和毅力的成功者往往成为笑到最后、笑得最好的人."

"时间管理不仅是独乐,也是众乐的一场赛事,和时间赛跑,人人都有可能是胜利者.只有不参加的人,才是失败者."

"我的工作其实是一场竞赛,我喜欢在事情到了紧要的关头时全力以赴的感觉.在这个时候,人往往有超水准的表现."

"好的习惯主要是依赖于人的自我约束,或者说靠人对自我欲望的否定."

"因为说话一定要诚实,所以一个好的领导者不能随意滥用奖赏和表扬,我会特别小心地对待我对员工所承诺的事情."

"每天早晨醒来,一想到所从事的工作和所开发的技术将会给人类生活带来巨大的影响和变化,我就会无比的兴奋与激动."

"成功都并没有什么秘密,他们只不过是适应了时代发展的变化."

"当你的努力与时代同步时,你就会对社会产生不可忽略的影响."

"可以说,我们对今后十年的主要见解是这样的:如果数字通讯是免费的,会出现什么情况呢?回答是,我们学习、采购、社交、做生意和娱乐的方式截然不同.我们希望软件和软件标准在其中起重大作用."

"每隔三年左右,企业必须对自己业务的方方面面进行一次全方位的严格评估,这点至为关键."

"当你了解客户的需求后,你必须乐于思考如何让产品更贴近并帮助客户."

"对客户信守承诺,这一服务准则非常重要."

"与其做一株绿洲中的小草,还不如做一棵秃丘中的橡树,因为小草毫无个性,而橡树昂首天穹."

"科学技术的进步将会给人们的生活带来巨大的影响,而人们要不断地适应这种时代的变化,而不要坐等未来,失去自我发展的良好时机."

"虽然行动不一定能带来令人满意的结果,但不采取行动就绝无满意的结果而言."

"微软离破产只有18个月.他的意思是说,如果企业无法不断的创新进步,也许一年后就不复存在了.企业如此,人亦如此."

"任何时候,人的脑子都会有很大一部分没有使用,因此,当你放眼四周时,就可以充分利用大脑."

"最可怕的敌人,就是没有坚强的信念."

"直觉助你发现职业,而选择职业就像盖房子,如果你选择的职业是坚实的河床,你会喜欢你的产品."

"运气是一个因素,然而我想最重要的因素还是我们的远见和高度的洞察力.我从来都是戴着望远镜看这个世界的."

"一个成功的商人,不应该仅仅是干练、能吃苦,还要有协调周围关系的能力,将不利因素化解到最小最少.做生意需要激情,但更要理智驾驭,意气用事、浮躁冲动是商家之大忌.什么是商人?商人就是关键时刻始终维护自己利益的人."

"创办一个公司就像建立一座大厦,没有蓝图,就不可能顺利地施工,谁都不能在没有蓝图的情况下施工.建立事业的蓝图,就是订一份企业计划."

"大多数的合伙人都采取五十对五十的分配法,这是最糟的方法,因为总得有人拥有做决策的能力才行.一旦公司开始赚钱,冲突必定随之产生,两倍合伙人意见必然相左,尤其是在问题牵涉到金钱时,双方争执愈烈."

"你用于计划的时间越长,你完成工作所需要的时间就越短."

"没有悟性的创业者,反应就不够灵敏,很难把自己的公司办得火起来."

"增强团队精神是每位公司管理人必须做到的,只有强大的团队才能在市场的浪潮中立于不败之地,才能做大公司.没有强大的团队,新管理人的工作能力怎能得到下属的认可呢?"

"在你出生前,你的父母并不像现在这般无趣,他们变成这样是因为忙着付你的开销、洗你的衣服、听你吹嘘你有多了不起.所以在你拯救被父母这代人破坏的热带雨淋前先整理一下自己的房间吧."

"优柔寡断是会传染的,它能使整个组织感染上这种病,引起人们犹豫不决,失去信心,甚至造成混乱."

"了解我的公司在各区、各产品门类和各客户群体中的经营情况,对于我这个首席执行官来说是很重要的."

"我认为做一个经营者有一个不可或缺的条件,那就是有经营兴趣."