源码阅读笔记:webbench-1.5

原创
2014/11/05 18:38
阅读数 2.6K

WebBench是个比较简单的程序,只有两个源文件:webbench.c, socket.c。

对源码重新排版一下,方便阅读:

/*
 * (C) Radim Kolar 1997-2004
 * This is free software, see GNU Public License version 2 for
 * details.
 *
 * Simple forking WWW Server benchmark:
 *
 * Usage:
 *   webbench --help
 *
 * Return codes:
 *    0 - sucess
 *    1 - benchmark failed (server is not on-line)
 *    2 - bad param
 *    3 - internal error, fork failed
 * 
 */ 
#include "socket.c"
#include <unistd.h>
#include <sys/param.h>
#include <rpc/types.h>
#include <getopt.h>
#include <strings.h>
#include <time.h>
#include <signal.h>


/* 
 * 超时标记,当被设置为 1 时,所有子进程退出
 * volatile:
 *    - 让系统总是从内存读取数据,
 *    - 告诉编译器不要做任何优化,
 *    - 变量会在程序外被改变
 */
volatile int timerexpired=0;


/* 成功请求数 */
int speed  = 0;
/* 失败请求数 */
int failed = 0;
/* 读取字节总数 */
int bytes  = 0;


/* 支持的 HTTP 协议版本:0 - 0.9, 1 - 1.0, 2 - 1.1 */
int http10 = 1;


/* 支持的 HTTP 方法:GET HEAD OPTIONS TRACE */
#define METHOD_GET 0
#define METHOD_HEAD 1
#define METHOD_OPTIONS 2
#define METHOD_TRACE 3
#define PROGRAM_VERSION "1.5"
int method = METHOD_GET; /* 默认为GET方法 */


int clients      = 1; /* 默认启动一个客户端(子进程) */
int force        = 0; /* 是否等待响应数据返回,0 -等待,1 - 不等待 */
int force_reload = 0; /* 是否发送 Pragma: no-cache */
int proxyport    = 80; /* 代理端口 */
char *proxyhost  = NULL; /* 代理服务器名称 */
/*
 * 执行时间,当子进程执行时间到过这个秒数之后,
 * 发送 SIGALRM 信号,将 timerexpired 设置为 1,
 * 让所有子进程退出 
 */
int benchtime    = 30;


/* 管道,子进程完成任务后,向写端写入数据,主进程从读端读取数据 */
int mypipe[2];


char host[MAXHOSTNAMELEN]; /* 主机名(64字节) */
#define REQUEST_SIZE 2048
char request[REQUEST_SIZE]; /* 请求字符串(HTTP头) */


/* 命令行的选项配置表,细节部分查看man文档:man getopt_long */
static const struct option long_options[] = {
    {"force",   no_argument,       &force,        1},
    {"reload",  no_argument,       &force_reload, 1},
    {"time",    required_argument, NULL,          't'},
    {"help",    no_argument,       NULL,          '?'},
    {"http09",  no_argument,       NULL,          '9'},
    {"http10",  no_argument,       NULL,          '1'},
    {"http11",  no_argument,       NULL,          '2'},
    {"get",     no_argument,       &method,       METHOD_GET},
    {"head",    no_argument,       &method,       METHOD_HEAD},
    {"options", no_argument,       &method,       METHOD_OPTIONS},
    {"trace",   no_argument,       &method,       METHOD_TRACE},
    {"version", no_argument,       NULL,          'V'},
    {"proxy",   required_argument, NULL,          'p'},
    {"clients", required_argument, NULL,          'c'},
    {NULL,      0,                 NULL,          0}
};


/* 子进程执行请求任务的函数 */
static void benchcore(const char* host,const int port, const char *request);
/* 执行压测的主要入口函数 */
static int bench(void);
/* 生成 HTTP 头 */
static void build_request(const char *url);


/* 将 timerexpired 设置为1,让所有子进程退出 */
static void alarm_handler(int signal) {
    timerexpired=1;
}


/* 打印帮助 */
static void usage(void) {
    fprintf(stderr,
        "webbench [option]... URL\n"
        "  -f|--force               Don't wait for reply from server.\n"
        "  -r|--reload              Send reload request - Pragma: no-cache.\n"
        "  -t|--time <sec>          Run benchmark for <sec> seconds. Default 30.\n"
        "  -p|--proxy <server:port> Use proxy server for request.\n"
        "  -c|--clients <n>         Run <n> HTTP clients at once. Default one.\n"
        "  -9|--http09              Use HTTP/0.9 style requests.\n"
        "  -1|--http10              Use HTTP/1.0 protocol.\n"
        "  -2|--http11              Use HTTP/1.1 protocol.\n"
        "  --get                    Use GET request method.\n"
        "  --head                   Use HEAD request method.\n"
        "  --options                Use OPTIONS request method.\n"
        "  --trace                  Use TRACE request method.\n"
        "  -?|-h|--help             This information.\n"
        "  -V|--version             Display program version.\n"
    );
};


int main(int argc, char *argv[]) {
    int  opt           = 0;
    int  options_index = 0;
    char *tmp          = NULL;


    if (argc == 1) {
        usage();
        return 2;
    } 


    /* 参数解释,参见 man getopt_long */
    while ((opt = getopt_long(argc, argv, "912Vfrt:p:c:?h", long_options, &options_index)) != EOF) {
        switch(opt) {
            case  0 :
                break;
            case 'f':
                force = 1;
                break;
            case 'r': 
                force_reload = 1; 
                break; 
            case '9': 
                http10 = 0;
                break;
            case '1':
                http10 = 1;
                break;
            case '2':
                http10 = 2;
                break;
            case 'V':
                printf(PROGRAM_VERSION"\n");
                exit(0);
            case 't':
                benchtime = atoi(optarg);
                break;         
            case 'p': 
                /* proxy server parsing server:port */
                tmp       = strrchr(optarg, ':');
                proxyhost = optarg;
                if (tmp == NULL) {
                    break;
                }
                if (tmp == optarg) {
                    fprintf(stderr,"Error in option --proxy %s: Missing hostname.\n",optarg);
                    return 2;
                }
                if (tmp == optarg + strlen(optarg) - 1) {
                    fprintf(stderr,"Error in option --proxy %s Port number is missing.\n",optarg);
                    return 2;
                }
                *tmp='\0';
                proxyport = atoi(tmp + 1);
                break;
            case ':':
            case 'h':
            case '?':
                usage();
                return 2;
                break;
            case 'c':
                clients = atoi(optarg);
                break;
        }
    }
 
    if (optind == argc) {
        fprintf(stderr, "webbench: Missing URL!\n");
        usage();
        return 2;
    }


    if (clients == 0) {
        clients = 1;
    }


    if (benchtime == 0) {
        benchtime = 60;
    }


    /* Copyright */
    fprintf(stderr,
        "Webbench - Simple Web Benchmark "PROGRAM_VERSION"\n"
        "Copyright (c) Radim Kolar 1997-2004, GPL Open Source Software.\n"
    );


    build_request(argv[optind]); /* 最后一个非选项的参数,被视为URL */


    /* print bench info */
    printf("\nBenchmarking: ");
    switch(method) {
        case METHOD_GET:
        default:
            printf("GET");
            break;
        case METHOD_OPTIONS:
            printf("OPTIONS");
            break;
        case METHOD_HEAD:
            printf("HEAD");
            break;
        case METHOD_TRACE:
            printf("TRACE");
            break;
    }
    printf(" %s",argv[optind]);
    switch(http10) {
        case 0: 
            printf(" (using HTTP/0.9)");
            break;
        case 2: 
            printf(" (using HTTP/1.1)");
            break;
    }
    printf("\n");
    if (clients == 1) {
        printf("1 client");
    } else {
        printf("%d clients", clients);
    }
    printf(", running %d sec", benchtime);
    if (force) {
        printf(", early socket close");
    }
    if (proxyhost != NULL) {
        printf(", via proxy server %s:%d", proxyhost, proxyport);
    }
    if (force_reload) {
        printf(", forcing reload");
    }
    printf(".\n");


    return bench();
}


/* 生成 HTTP 头 */
void build_request (const char *url) {
    char tmp[10];
    int i;
  
    bzero(host, MAXHOSTNAMELEN);
    bzero(request, REQUEST_SIZE);
  
    /* 协议适配
     * */
    if (force_reload && proxyhost != NULL && http10 < 1) {
        http10=1;
    }
    if (method == METHOD_HEAD && http10 < 1) {
        http10=1;
    }
    if (method == METHOD_OPTIONS && http10 < 2) {
        http10=2;
    }
    if (method == METHOD_TRACE && http10 < 2) {
        http10=2;
    }
  
    switch (method) {
        default:
        case METHOD_GET:
            strcpy(request, "GET");
            break;
        case METHOD_HEAD: 
            strcpy(request, "HEAD");
            break;
        case METHOD_OPTIONS:
            strcpy(request, "OPTIONS");
            break;
        case METHOD_TRACE:
            strcpy(request, "TRACE");
            break;
    }
            
    strcat(request, " ");
  
    if (NULL == strstr(url, "://")) {
        fprintf(stderr, "\n%s: is not a valid URL.\n",url);
        exit(2);
    }
    if (strlen(url) > 1500) {
        fprintf(stderr,"URL is too long.\n");
        exit(2);
    }
    if (proxyhost == NULL) {
        if (0 != strncasecmp("http://", url, 7)) {
            fprintf(stderr,"\nOnly HTTP protocol is directly supported, set --proxy for others.\n");
            exit(2);
        }
    }
  
    /* protocol/host delimiter */
    i = strstr(url, "://") - url + 3;
    /* printf("%d\n",i); */
  
    if (strchr(url + i, '/') == NULL) {
        fprintf(stderr,"\nInvalid URL syntax - hostname don't ends with '/'.\n");
        exit(2);
    }


    if (proxyhost == NULL) {
        /* get port from hostname */
        if (index(url + i, ':') != NULL && index(url + i, ':') < index(url + i, '/')) {
            strncpy(host, url + i, strchr(url + i, ':') - url - i);
            bzero(tmp, 10);
            strncpy(tmp, index(url + i, ':') + 1, strchr(url + i, '/') - index(url + i, ':') - 1);
            /* printf("tmp=%s\n",tmp); */
            proxyport = atoi(tmp);
            if (proxyport == 0) {
                proxyport=80;
            }
        } else {
            strncpy(host, url + i, strcspn(url + i, "/"));
        }
        // printf("Host=%s\n",host);
        strcat(request + strlen(request), url + i + strcspn(url + i, "/"));
    } else {
        // printf("ProxyHost=%s\nProxyPort=%d\n",proxyhost,proxyport);
        strcat(request, url);
    }


    if (http10 == 1) {
        strcat(request, " HTTP/1.0");
    } else if (http10 == 2) {
        strcat(request, " HTTP/1.1");
    }
    strcat(request,"\r\n");


    if (http10 > 0) {
        strcat(request, "User-Agent: WebBench "PROGRAM_VERSION"\r\n");
    }
    if (proxyhost == NULL && http10 > 0) {
        strcat(request, "Host: ");
        strcat(request, host);
        strcat(request, "\r\n");
    }
    if (force_reload && proxyhost != NULL) {
        strcat(request, "Pragma: no-cache\r\n");
    }
    if (http10 > 1) {
        strcat(request, "Connection: close\r\n");
    }
    /* add empty line at end */
    if (http10 > 0) {
        strcat(request, "\r\n"); 
    }
    // printf("Req=%s\n",request);
}


/* vraci system rc error kod */
static int bench(void) {
    int   i, j, k;    
    pid_t pid = 0;
    FILE  *f;
  
    /* 测试远程主机是否能够连通 */
    i = Socket(proxyhost == NULL ? host : proxyhost, proxyport);
    if (i < 0) { 
        fprintf(stderr,"\nConnect to server failed. Aborting benchmark.\n");
        return 1;
    }
    close(i);


    /* 创建管道 */
    if (pipe(mypipe)) {
        perror("pipe failed.");
        return 3;
    }
  
    /* not needed, since we have alarm() in childrens */
    /* wait 4 next system clock tick */
    /*
    cas=time(NULL);
    while(time(NULL)==cas)
          sched_yield();
    */
  
    /* 生成子进程 */
    for (i = 0; i < clients; i++) {
        pid = fork();
        if (pid <= (pid_t)0) {
            /* child process or error*/
            sleep(1); /* make childs faster */
            /* 这个 break 很重要,它主要让子进程只能从父进程生成,
            否则子进程会再生成子进程,子子孙孙很庞大的 */
            break;
        }
    }
  
    if (pid < (pid_t)0) {
        fprintf(stderr,"problems forking worker no. %d\n",i);
        perror("fork failed.");
        return 3;
    }
  
    if (pid == (pid_t)0) {
        /* I am a child */
        /* 子进程执行请求:尽可能多的发送请求,直到超时返回为止 */
        if(proxyhost == NULL) {
            benchcore(host, proxyport, request);
        } else {
            benchcore(proxyhost, proxyport, request);
        }
        /* write results to pipe */
        f = fdopen(mypipe[1], "w");
        if (f == NULL) {
            perror("open pipe for writing failed.");
            return 3;
        }
        /* fprintf(stderr,"Child - %d %d\n",speed,failed); */
        /* 将子进程执行任务的结果写入到管道中,以便父进程读取 */
        fprintf(f, "%d %d %d\n", speed, failed, bytes);
        fclose(f);
        /* 子进程完成任务,返回退出 */
        return 0;
    } else {
        /* 父进程读取管道,打印结果 */
        printf("parent %d\n", getpid());
        f = fdopen(mypipe[0], "r");
        if (f == NULL) {
            perror("open pipe for reading failed.");
            return 3;
        }
        setvbuf(f, NULL, _IONBF, 0);
        /* 虽然子进程不能污染父进程的这几个变量,但用前重置一下,在这里是个好习惯 */
        speed  = 0;
        failed = 0;
        bytes  = 0;
        /* 从管道中读取每个子进程的任务的执行情况,并计数 */
        while(1) {
            pid = fscanf(f, "%d %d %d", &i, &j, &k);
            if (pid < 2) {
                fprintf(stderr,"Some of our childrens died.\n");
                break;
            }
            speed  += i;
            failed += j;
            bytes  += k;
            /* fprintf(stderr,"*Knock* %d %d read=%d\n",speed,failed,pid); */
            if (--clients == 0) {
                break;
            }
        }
        fclose(f);


        /* 打印结果 */
        printf("\nSpeed=%d pages/min, %d bytes/sec.\nRequests: %d susceed, %d failed.\n",
              (int)((speed + failed) / (benchtime / 60.0f)),
              (int)(bytes / (float)benchtime),
              speed,
              failed);
    }
    return i;
}


void benchcore(const char *host, const int port, const char *req) {
    int    rlen;
    char   buf[1500];
    int    s, i;
    struct sigaction sa;
   
    /* 这个是关键,当程序执行到指定的秒数之后,发送 SIGALRM 信号 */
    sa.sa_handler = alarm_handler;
    sa.sa_flags = 0;
    if (sigaction(SIGALRM, &sa, NULL)) {
        exit(3);
    }
    alarm(benchtime);
   
    rlen = strlen(req);
    /* 无限执行请求,直到接收到 SIGALRM 信号将 timerexpired 设置为 1 时 */
    nexttry:
    while (1) {
        if (timerexpired) {
            if (failed > 0) {
                /* fprintf(stderr,"Correcting failed by signal\n"); */
                failed--;
            }
            return;
        }
        /* 连接远程服务器 */
        s = Socket(host, port);
        if (s < 0) {
            failed++;
            continue;
        }
        /* 发送请求 */
        if (rlen != write(s, req, rlen)) {
            failed++;
            close(s);
            continue;
        }
        if (http10 == 0) {
            /* 如果是 http/0.9 则关闭 socket 的写操作 */
            if(shutdown(s, 1)) {
                failed++;
                close(s);
                continue;
            }
        }
        /* 如果等待响应数据返回,则读取响应数据,计算传输的字节数 */
        if (force == 0) {
            /* read all available data from socket */
            while(1) {
                if(timerexpired) {
                    break; 
                }
                i = read(s, buf, 1500);
                /* fprintf(stderr,"%d\n",i); */
                if (i < 0) { 
                    failed++;
                    close(s);
                    goto nexttry;
                } else {
                    if(i==0) {
                        break;
                    } else {
                        bytes += i;
                    }
                }
            }
        }
        /* 关闭连接 */
        if (close(s)) {
            failed++;
            continue;
        }
        /* 成功完成一次请求,并计数,继续下一次相同的请求,直到超时为止 */
        speed++;
    }
}

下面是 socket.c,很简单,不再加注释,原样贴上:

/* $Id: socket.c 1.1 1995/01/01 07:11:14 cthuang Exp $
 *
 * This module has been modified by Radim Kolar for OS/2 emx
 */

/***********************************************************************
  module:       socket.c
  program:      popclient
  SCCS ID:      @(#)socket.c    1.5  4/1/94
  programmer:   Virginia Tech Computing Center
  compiler:     DEC RISC C compiler (Ultrix 4.1)
  environment:  DEC Ultrix 4.3 
  description:  UNIX sockets code.
 ***********************************************************************/
 
#include <sys/types.h>
#include <sys/socket.h>
#include <fcntl.h>
#include <netinet/in.h>
#include <arpa/inet.h>
#include <netdb.h>
#include <sys/time.h>
#include <string.h>
#include <unistd.h>
#include <stdio.h>
#include <stdlib.h>
#include <stdarg.h>

int Socket(const char *host, int clientPort)
{
    int sock;
    unsigned long inaddr;
    struct sockaddr_in ad;
    struct hostent *hp;
    
    memset(&ad, 0, sizeof(ad));
    ad.sin_family = AF_INET;

    inaddr = inet_addr(host);
    if (inaddr != INADDR_NONE)
        memcpy(&ad.sin_addr, &inaddr, sizeof(inaddr));
    else
    {
        hp = gethostbyname(host);
        if (hp == NULL)
            return -1;
        memcpy(&ad.sin_addr, hp->h_addr, hp->h_length);
    }
    ad.sin_port = htons(clientPort);
    
    sock = socket(AF_INET, SOCK_STREAM, 0);
    if (sock < 0)
        return sock;
    if (connect(sock, (struct sockaddr *)&ad, sizeof(ad)) < 0)
        return -1;
    return sock;
}




展开阅读全文
加载中

作者的其它热门文章

打赏
2
11 收藏
分享
打赏
0 评论
11 收藏
2
分享
返回顶部
顶部
返回顶部
顶部