/* This file is part of lsnet. Copyright (C) 2009-2010 Sterling Pickens Lsnet 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 3 of the License, or (at your option) any later version. Lsnet 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. You should have received a copy of the GNU General Public License along with lsnet. If not, see . */ #include "gdcpuday.h" void cpuday(void) { //image_sizes(0); gdImagePtr im; FILE *out; FILE* lscpulog; //int width = image_width[0]; //int height = image_height[0]; im = gdImageCreate(1620,955); //imresized = gdImageCreate(width,height); //allocate colors int white = gdImageColorAllocate(im, 255, 255, 255); int black = gdImageColorAllocate(im, 0, 0, 0); int red = gdImageColorAllocate(im, 255, 0, 0); int blue = gdImageColorAllocate(im, 0, 0, 255); int green = gdImageColorAllocate(im, 0, 255, 0); int yellow = gdImageColorAllocate(im, 255, 255, 0); int orange = gdImageColorAllocate(im, 255, 128, 0); int purple = gdImageColorAllocate(im, 255, 0, 255); int brown = gdImageColorAllocate(im, 128, 64, 0); int grey = gdImageColorAllocate(im, 128, 128, 128); int styleDashed[8]; styleDashed[0] = blue; styleDashed[1] = blue; styleDashed[2] = orange; styleDashed[3] = orange; styleDashed[4] = gdTransparent; styleDashed[5] = yellow; styleDashed[6] = gdTransparent; styleDashed[7] = yellow; gdImageSetStyle(im, styleDashed, 8); ////declare variables char *token; char *line; char *search = " "; //char *token2; //char *line2; //char *search2 = "+"; char linestring[1000]; char copystr[1000]; //char copystr2[1000]; char hourstr[3]; char minstr[3]; char secstr[3]; char labeldate2[12]; char temp[30]; //char labeldate2[30]; char labelstring[30]; char labelstring2[30]; char datestrcurrent[30]; int i; int lastline; int isam; int minsince; int minsince2; //int minsince3; int lastminsince; int hour, min, sec; int labeldate1; int counter, counter2, counter3, counter4, counter5, count4; int modulo4; int coordinate = 60; int emptyvarstr; double difference = 0; int lastdate = 0; int stagger = 230; int y10, x10, ylines, boxes, thecorenumber; int plotnums, lowest, highest; double counter6; double processhgt = 100; double tenth; double processhgt2; double num3 = 210; double num4, num5; double user, nice, system, idle, iowait, irq, softirq, totalcycles, processes, processx; double procnum1, procnum2, procnum3, procnum4, procnum5, procnum6; //coordinate double downnum = 210; //points int num6 = 0; int coresfound = coresdetected(); //meminfo(1,memarray1); char *weblocation; struct tm *local; time_t t; //memsize = memarray1[1] / 1024; //int tenth = memsize / 10; ////////////// t = time(NULL); local = localtime(&t); memset ((void*) datestrcurrent, '\0', sizeof (datestrcurrent)); strcpy(datestrcurrent, asctime(local)); //strcat(datestrcurrent, asctime(local)); datestrcurrent[strlen(datestrcurrent)-1]='\0'; minsince2 = dates(datestrcurrent, 0); ///// search the last 1440 entries and find the highest processes occurance i = 1440; if( ( lscpulog = fopen( global_strs.cpu_log, "r" ) ) == NULL ) { fprintf( stderr, "Error opening %s\n", global_strs.cpu_log ); exit( 1 ); } memset ((void*) linestring, '\0', sizeof (linestring)); while( fgets(linestring, sizeof(linestring), lscpulog) != NULL) { strcpy(copystr, linestring); minsince = dates(copystr, 0); //if (i == 1440) //{ // lastminsince = minsince; //} if (minsince >= minsince2 - 1440) { if (i >= 0) { strcpy(copystr, linestring); token = strtok(copystr, search); token = strtok(NULL, search); token = strtok(NULL, search); token = strtok(NULL, search); token = strtok(NULL, search); token = strtok(NULL, search); processhgt2 = atof(token); //printf("processhgt2: %lf\n", processhgt2); if (processhgt2 > processhgt) { processhgt = processhgt2; } i++; } } } fclose(lscpulog); //printf("closed file\n"); tenth = processhgt / 10; //tenth = ceil(tenth); //printf("processhgt: %lf\n", processhgt); counter4 = 110; counter6 = tenth; counter5 = 0; //printf("tenth: %lf counter4: %d counter5: %d\n", tenth, counter4, counter5); emptyvarstr = sprintf( labelstring, "%.0lf", ceil(counter6)); while (counter5 < 10) { counter4 = counter4 - 10; //$im->string(gdSmallFont,25,counter4,counter5,black); gdImageString(im, gdFontTiny, 25 , counter4 , labelstring , black); gdImageLine(im, 35, counter4, 1500, counter4, gdStyled); counter6 = counter6 + tenth; emptyvarstr = sprintf( labelstring, "%.0lf", ceil(counter6)); counter5++; } //printf("passed sprintf\n"); //########### ylines = 800 / coresfound; boxes = 800 / ylines; y10 = ylines + 110; x10 = 110; tenth = ylines / 10; gdImageLine(im, 50, 110, 1500, 110, black); gdImageLine(im, 50, 10, 50, 910, black); gdImageLine(im, 50, 910, 1515, 910, black); gdImageString(im, gdFontMediumBold, 50 , 940 , "Hours" , black); gdImageString(im, gdFontMediumBold, 1520 , 900 , "CPU Usage" , black); //printf("made first image writ\n"); //#######drawl horizontal lines and % usage labels //gdImageSetStyle(im, styleDashed, 6); for (i = 1; i <= coresfound; i++ ) { counter4 = 10; counter5 = (i * ylines) + 110; emptyvarstr = sprintf( labelstring2, "%d%%", counter4); while (counter4 <= 100) { //printf("counter5: %d\n", counter5); counter5 = counter5 - tenth; if (counter4 == 50) { thecorenumber = i - 1; emptyvarstr = sprintf( labelstring, "CORE%d", thecorenumber); gdImageString(im, gdFontMediumBold, 5, counter5 , labelstring , black); }else{ gdImageString(im, gdFontLarge, 20 , counter5 , labelstring2 , black); } if (counter4 == 100) { gdImageLine(im, 30, counter5, 1515 , counter5 , black); }else{ gdImageLine(im, 30, counter5, 1500 , counter5 , gdStyled); } counter4 = counter4 + 10; emptyvarstr = sprintf( labelstring2, "%d%%", counter4); } } coordinate = 60; difference = 0; i = 1; stagger = 930; //#####determine lowest pixel for this core's box //lowest = 110 + (ylines * plotnums); //highest = lowest - ylines; if( ( lscpulog = fopen( global_strs.cpu_log, "r" ) ) == NULL ) { fprintf( stderr, "Error opening %s\n", global_strs.cpu_log ); exit( 1 ); } t = time(NULL); local = localtime(&t); memset ((void*) datestrcurrent, '\0', sizeof (datestrcurrent)); strcpy(datestrcurrent, asctime(local)); //strcat(datestrcurrent, asctime(local)); datestrcurrent[strlen(datestrcurrent)-1]='\0'; minsince2 = dates(datestrcurrent, 0); //printf("minsince2: %d\n", minsince2); //lastminsince = minsince; i = 1440; //Wed Feb 25 17:06:45 2009 128 0.750195 98.949744 0.283394 0.000000 0.000000 0.016667 0.000000+0.083333 82.550000 17.350000 0.000000 0.000000 0.000000 0.016667+ //0.733278 99.000089 0.233311 0.033322 0.000000 0.000000 0.000000+0.750000 98.966667 0.250000 0.000000 0.000000 0.000000 0.033333 while( fgets(linestring, sizeof(linestring), lscpulog) != NULL) { //printf("opened file, linestring: %s\n", linestring); strcpy(copystr, linestring); //printf("copied string\n"); minsince = dates(copystr, 0); //printf("minsince: %d\n", minsince); if (i == 1440) { lastminsince = minsince; } if (minsince >= (minsince2 - 1439) && coordinate <= 1500) { ///cores loop goes here //for (plotnums = 1; plotnums <= coresfound; plotnums++) //{ if (i >= 0) { for (plotnums = 1; plotnums <= coresfound; plotnums++) { if(plotnums == 1) { //printf("started loops\n"); //user, nice, system, idle, iowait, irq, softirq strcpy(copystr, linestring); token = strtok(copystr, search); token = strtok(NULL, search); token = strtok(NULL, search); token = strtok(NULL, search); temp[0]=token[0]; temp[1]=token[1]; temp[2]='\0'; hour = atoi(temp); temp[0]=token[3]; temp[1]=token[4]; temp[2]='\0'; min = atoi(temp); //Wed Feb 25 17:06:45 2009 128 0.750195 98.949744 0.283394 0.000000 0.000000 0.016667 0.000000+ temp[0]=token[6]; temp[1]=token[7]; temp[2]='\0'; sec = atoi(temp); token = strtok(NULL, search); token = strtok(NULL, search); processes = atof(token); //printf("Processes: %lf\n", processes); token = strtok(NULL, search); user = atof(token); token = strtok(NULL, search); nice = atof(token); token = strtok(NULL, search); system = atof(token); token = strtok(NULL, search); idle = atof(token); token = strtok(NULL, search); iowait = atof(token); token = strtok(NULL, search); irq = atof(token); token = strtok(NULL, search); ///take only the first 8 elements(might have to fix later for sizeof(double) temp[0]=token[0]; temp[1]=token[1]; temp[2]=token[2]; temp[3]=token[3]; temp[4]=token[4]; temp[5]=token[5]; temp[6]=token[6]; temp[7]=token[7]; temp[8]='\0'; softirq = atof(temp); processx = 110 - ((processes / processhgt) * 100); gdImageLine(im, coordinate, processx, coordinate , 110 , black); //if (difference >= 2) //{ //difference = lastminsince - minsince; // difference = ceil(difference); //#leave a blank line for each 1min lost // for (counter3 = 1; counter3 < difference; counter3++) // { // coordinate++; // } //} difference = minsince - lastminsince; difference = ceil(difference); if (difference >= 2) { //#leave a blank line for each 1min lost for (counter3 = 1; counter3 < difference; counter3++) { coordinate++; } } //if multiple of 60 drawl date labels modulo4 = coordinate % 60; if (modulo4 == 0) { labeldate1 = hourhash(hour); isam = ampm(hour); if (labeldate1 < 10) { emptyvarstr = sprintf( hourstr, "0%d", labeldate1); }else{ emptyvarstr = sprintf( hourstr, "%d", labeldate1); } if (min < 10) { emptyvarstr = sprintf( minstr, "0%d", min); }else{ emptyvarstr = sprintf( minstr, "%d", min); } if (sec < 10) { emptyvarstr = sprintf( secstr, "0%d", sec); }else{ emptyvarstr = sprintf( secstr, "%d", sec); } if (isam == 1) { emptyvarstr = sprintf( labeldate2, "%s:%s:%s AM", hourstr, minstr, secstr); }else{ emptyvarstr = sprintf( labeldate2, "%s:%s:%s PM", hourstr, minstr, secstr); } if (stagger == 930) { stagger = 920; }else{ stagger = 930; } gdImageString(im, gdFontSmall, coordinate - 30 , stagger , labeldate2 , black); gdImageLine(im, coordinate, 910, coordinate , stagger, black); } counter5 = 2; }else{ //+0.750000 98.966667 0.250000 0.000000 0.000000 0.000000 0.033333 //token = strtok(copystr, search); ///take only the last 8 elements (might have to fix later for sizeof(double) temp[0]=token[9]; temp[1]=token[10]; temp[2]=token[11]; temp[3]=token[12]; temp[4]=token[13]; temp[5]=token[14]; temp[6]=token[15]; temp[7]=token[16]; temp[8]='\0'; user = atof(temp); token = strtok(NULL, search); nice = atof(token); token = strtok(NULL, search); system = atof(token); token = strtok(NULL, search); idle = atof(token); token = strtok(NULL, search); iowait = atof(token); token = strtok(NULL, search); irq = atof(token); token = strtok(NULL, search); ///grab only the first 8 elements temp[0]=token[0]; temp[1]=token[1]; temp[2]=token[2]; temp[3]=token[3]; temp[4]=token[4]; temp[5]=token[5]; temp[6]=token[6]; temp[7]=token[7]; temp[8]='\0'; softirq = atof(temp); //printf("Hour: %d Min:%d Sec:%d\n",hour, min, sec); } //printf("Core: %lf user:%lf nice:%lf system: %lf idle: %lf iowait: %lf irq: %lf softirq: %lf\n",plotnums, user, nice, system, idle, iowait, irq, softirq); //difference = minsince - lastminsince; //printf("Difference: %d Minsince: %d Lastminsince: %d\n", difference, minsince, lastminsince); lowest = 110 + (ylines * plotnums); highest = lowest - ylines; procnum1 = ((ylines * plotnums) + 110); procnum1 = procnum1 - ((softirq / 100) * ylines); //#irq purple, procnum2 = procnum1; procnum2 = procnum2 - ((irq / 100) * ylines); //#$iowait orange procnum3 = procnum2; procnum3 = procnum3 - ((iowait / 100) * ylines); //#$system red procnum4 = procnum3; procnum4 = procnum4 - ((system / 100) * ylines); //#$user blue procnum5 = procnum4; procnum5 = procnum5 - ((user / 100) * ylines); //#$nice grey procnum6 = procnum5; procnum6 = procnum6 - ((nice / 100) * ylines); //#total, what's not overwritten will show idle green gdImageLine(im, coordinate, lowest, coordinate , highest, green); //#softirq brown gdImageLine(im, coordinate, procnum1, coordinate , lowest, brown); //#irq purple gdImageLine(im, coordinate, procnum2, coordinate , procnum1, purple); //#$iowait orange gdImageLine(im, coordinate, procnum3, coordinate , procnum2, orange); //#$system red gdImageLine(im, coordinate, procnum4, coordinate , procnum3, red); //#$user blue gdImageLine(im, coordinate, procnum5, coordinate , procnum4, blue); //#$nice grey gdImageLine(im, coordinate, procnum6, coordinate , procnum5, grey); } coordinate++; //lastminsince = minsince; i--; } lastminsince = minsince; //coordinate++; } } gdImageFilledRectangle(im, 1520, 65, 1540, 85, black); gdImageString(im, gdFontSmall, 1545 , 85 , "Processes" , black); gdImageFilledRectangle(im, 1520, 365, 1540, 385, green); gdImageString(im, gdFontSmall, 1545 , 385 , "Idle" , green); gdImageFilledRectangle(im, 1520, 405, 1540, 425, red); gdImageString(im, gdFontSmall, 1545 , 425 , "System" , red); gdImageFilledRectangle(im, 1520, 445, 1540, 465, blue); gdImageString(im, gdFontSmall, 1545 , 465 , "User" , blue); gdImageFilledRectangle(im, 1520, 485, 1540, 505, grey); gdImageString(im, gdFontSmall, 1545 , 505 , "Nice" , grey); gdImageFilledRectangle(im, 1520, 525, 1540, 545, orange); gdImageString(im, gdFontSmall, 1545 , 545 , "IOWait" , orange); gdImageFilledRectangle(im, 1520, 565, 1540, 585, purple); gdImageString(im, gdFontSmall, 1545 , 585 , "Irq" , purple); gdImageFilledRectangle(im, 1520, 605, 1540, 625, brown); gdImageString(im, gdFontSmall, 1545 , 625 , "SoftIrq" , brown); //plot date/time for last entry if it hasn't been done already if (modulo4 != 0 && i < 1430) { labeldate1 = hourhash(hour); isam = ampm(hour); if (labeldate1 < 10) { emptyvarstr = sprintf( hourstr, "0%d", labeldate1); }else{ emptyvarstr = sprintf( hourstr, "%d", labeldate1); } if (min < 10) { emptyvarstr = sprintf( minstr, "0%d", min); }else{ emptyvarstr = sprintf( minstr, "%d", min); } if (sec < 10) { emptyvarstr = sprintf( secstr, "0%d", sec); }else{ emptyvarstr = sprintf( secstr, "%d", sec); } if (isam == 1) { emptyvarstr = sprintf( labeldate2, "%s:%s:%s AM", hourstr, minstr, secstr); }else{ emptyvarstr = sprintf( labeldate2, "%s:%s:%s PM", hourstr, minstr, secstr); } if (stagger == 930) { stagger = 920; }else{ stagger = 930; } gdImageString(im, gdFontSmall, 1470 , stagger , labeldate2 , black); gdImageLine(im, coordinate, 910, 1500 , stagger, black); } // weblocation = (char *)malloc(strlen(global_strs.web_dir) + strlen("/cpu.png") + 1); strcpy(weblocation, global_strs.web_dir); strcat(weblocation, "/cpu.png"); //gdImageCopyResized(imresized,im,0,0,0,0,width,height,im->sx,im->sy); out = fopen(weblocation, "w"); //out = fopen("/var/www/htdocs/lsnet/cpu.png", "w"); gdImageInterlace(im, 1); //gdImageJpeg(im, out, -1); gdImagePng(im, out); fclose(lscpulog); fclose(out); gdImageDestroy(im); free(weblocation); //gdImageDestroy(imresized); //return (0); }