/[cvs]/joko/Uni/BSArch/04/bmp_fractal.c
ViewVC logotype

Diff of /joko/Uni/BSArch/04/bmp_fractal.c

Parent Directory Parent Directory | Revision Log Revision Log | View Patch Patch

revision 1.3 by joko, Sat Jul 1 11:45:35 2006 UTC revision 1.13 by joko, Sun Jul 2 10:45:02 2006 UTC
# Line 15  Line 15 
15  #define YSIZE 500  #define YSIZE 500
16  #include "algorithm.h"  #include "algorithm.h"
17    
18    BOOL VERBOSE = FALSE;
19    
20    
21  /* BMP Header */  /* BMP Header */
22  unsigned char header[54]={0x42,0x4d,              // signature BM  unsigned char header[54]={0x42,0x4d,              // signature BM
# Line 47  void printErrorAndExit(const char *msg, Line 49  void printErrorAndExit(const char *msg,
49                                            0,                                            0,
50                                            NULL ))                                            NULL ))
51          {          {
52                  fprintf(stderr,"%s : %s\n",msg,lpMsgBuf);                  fprintf(stdout, "%s: %s\n", msg, lpMsgBuf);
53                  LocalFree(lpMsgBuf);                  LocalFree(lpMsgBuf);
54          }          }
55          else          else
56          {          {
57                  fprintf(stderr,"Error at FormatMesage: %d\n",err=GetLastError());                  fprintf(stdout, "Error at FormatMesage: %d\n",err=GetLastError());
58          }          }
59          exit(err);          exit(err);
60  }  }
# Line 94  void write_blank_file(char *filename) { Line 96  void write_blank_file(char *filename) {
96  }  }
97    
98    
99  int main(int argc, char *argv[]) {  // arguments for each thread
100    int len,x,y;  typedef struct _WorkerArguments {
101      int start_row;
102      int number_of_rows;
103      unsigned char * pBitmap;
104    } WORKERARGS, *PWORKERARGS;
105    
106    // worker thread - main entry function
107    DWORD WINAPI fractal_create_segment (LPVOID lpParam) {
108      
109      // thread stuff
110      int thread_id;
111      PWORKERARGS args;
112      unsigned char *pDataBitmapSegment;
113    
114      // fractal calculation
115      int x, y;
116    char bgr[3];    char bgr[3];
   short svalue;  
   int lvalue;  
117    
118    HANDLE hMap, hFile;    thread_id = GetCurrentThreadId();
   DWORD err, size;  
   int elems;  
119        
120    LPVOID pData;    // get worker arguments
121    unsigned char *pDataBitmap, *pDataBitmapCurrent;    args = (PWORKERARGS)lpParam;
122    
123      // calculate pointer to beginning of segment
124      pDataBitmapSegment = (unsigned char *)((INT_PTR)args->pBitmap + (YSIZE - (args->start_row + args->number_of_rows)) * 3 * XSIZE);
125    
126      // debugging
127      if (VERBOSE) {
128        fprintf(stdout, "----------------------------------------------\n");
129        fprintf(stdout, "thread_id: %i\n", thread_id);
130        fprintf(stdout, "arg.start_row: %i\n", args->start_row);
131        fprintf(stdout, "arg.number_of_rows: %i\n", args->number_of_rows);
132        fprintf(stdout, "segment_start: %p\n", pDataBitmapSegment);
133      }
134        
135    int offset;    // calculate fractal
136      for (y = (args->start_row + args->number_of_rows) - 1; y >= args->start_row; y--) {
137        //fprintf(stdout, "calc: thread=%i; y=%i            limits: %i,%i    p: %p\n", thread_id, y, args->start_row, args->number_of_rows, pDataBitmapSegment);
138        for (x = 0; x < XSIZE; x++) {
139          getColorValuesAt(x * (2.0 / XSIZE) - 1.5, y * (2.0 / YSIZE) - 1.0, &bgr[2], &bgr[1], &bgr[0]);
140          
141          // transfer color values to current pixel
142          pDataBitmapSegment[0] = bgr[0];
143          pDataBitmapSegment[1] = bgr[1];
144          pDataBitmapSegment[2] = bgr[2];
145          
146          // move pointer to next pixel
147          pDataBitmapSegment += 3;
148          
149        }
150        //no padding required because 1500%4 =0 ???
151      }
152    
153      if (VERBOSE)
154        fprintf(stdout, "thread finished: %i\n", thread_id);
155      return 0;
156    
157    }
158    
159    BOOL scan_argv(int argc, char *argv[], char opt_name[], char *opt_value[]) {
160      int i;
161      char * opt_current_name;
162      char * opt_current_value;
163      
164      //printf("searching for: '%s'\n", opt_name);
165      
166      for (i = 1; i < argc; i++) {
167        opt_current_name = argv[i];
168        if (strcmp(opt_current_name, opt_name) == 0) {
169          //printf("opt: %s\n", opt_current_name);
170          opt_current_value = argv[i+1];
171          //printf("opt-current-value: %s\n", opt_current_value);
172          if (opt_current_value != NULL) {
173            //*opt_value = *argv[i+1];
174            *opt_value = *opt_current_value;
175            //printf("opt-value: %s\n", opt_value);
176          }
177          return TRUE;
178        }
179      }
180      return FALSE;
181    }
182    
183    
184    int main(int argc, char *argv[]) {
185    
186      // MMF support
187      DWORD err;
188      HANDLE hMap, hFile;
189      LPVOID pData;
190      unsigned char *pDataBitmap;
191    
192      // workers
193      int workers = 5;
194      int worker_index, worker_rows, worker_startrow;
195      HANDLE *worker_handles;
196      PWORKERARGS worker_args;
197    
198      // threads or processes?
199      BOOL use_processes = FALSE;
200      BOOL is_worker_process = FALSE;
201      
202      // information for creating processes
203      STARTUPINFO si;
204      PROCESS_INFORMATION pi;
205      char szCmdline[65536];
206      
207      // command line stuff
208      char arg_option[1024];
209      char *arg_value[1024];
210      //arg_value = malloc(1024);
211        
212    // create empty file (black background)    VERBOSE = FALSE;
   write_blank_file("test.bmp");  
213        
214      // "parse" command line arguments
215    /* open file for reading and writing */    /*
216    hFile = CreateFile("test.bmp", GENERIC_WRITE|GENERIC_READ, 0, NULL, OPEN_EXISTING, FILE_ATTRIBUTE_NORMAL, NULL);    if (argc >= 2) {
217    if (INVALID_HANDLE_VALUE == hFile) {      if (strcmp(argv[1], "--worker") == 0) {
218      err = GetLastError();        is_worker_process = TRUE;
219      printErrorAndExit("Error at CreateFile",err);      }
220    }    }
221      */
222      
223      //scan_argv(argc, argv, "--worker", &arg_value);
224      //*arg_value = '\0';
225      // parse command line arguments
226      if (scan_argv(argc, argv, "--worker", arg_value)) {
227        use_processes = TRUE;
228        is_worker_process = TRUE;
229      
230      } else if (scan_argv(argc, argv, "-p", arg_value)) {
231        use_processes = TRUE;
232        is_worker_process = FALSE;
233        workers = atoi(arg_value);
234      
235      } else if (scan_argv(argc, argv, "-t", arg_value)) {
236        use_processes = FALSE;
237        is_worker_process = FALSE;
238        workers = atoi(arg_value);
239        
240      }
241      //printf("value: %s\n", arg_value);
242      //exit(0);
243      
244      
245      if (VERBOSE && use_processes) {
246        fprintf(stdout, "===================================================== ");
247        if (is_worker_process)
248          fprintf(stdout, "WORKER-PROCESS\n");
249        else
250          fprintf(stdout, "MASTER-PROCESS\n");
251      }
252      
253      // create empty bmp-file (black background)
254      if (!is_worker_process)
255        write_blank_file("test.bmp");
256    
257      // master creates memory mapped file
258      if (!is_worker_process) {
259        
260        // open file for reading and writing
261        hFile = CreateFile("test.bmp", GENERIC_WRITE|GENERIC_READ, 0, NULL, OPEN_EXISTING, FILE_ATTRIBUTE_NORMAL, NULL);
262        if (INVALID_HANDLE_VALUE == hFile) {
263          err = GetLastError();
264          printErrorAndExit("Error at CreateFile",err);
265        }
266    
267    /* create the file mapping object */      // create the file mapping object
268    hMap = CreateFileMapping(hFile, NULL, PAGE_READWRITE, 0, 0, NULL);      hMap = CreateFileMapping(hFile, NULL, PAGE_READWRITE, 0, 0, "bmp_fractal");
269    if (NULL == hMap) {      if (NULL == hMap) {
270      printErrorAndExit("Error at CreateFileMapping", GetLastError());        printErrorAndExit("Error at CreateFileMapping", GetLastError());
271        }
272      
273      // worker uses existing memory mapped file
274      } else {
275        
276        // open existing mapping object
277        hMap = OpenFileMapping(FILE_MAP_WRITE, FALSE, "bmp_fractal");
278        if (NULL == hMap)
279          printErrorAndExit("Error at OpenFileMapping", GetLastError());
280    }    }
281        
282    /* map the whole file into the process context */    // map the whole file into the process context
283    pData = MapViewOfFile(hMap, FILE_MAP_WRITE, 0, 0, 0);    pData = MapViewOfFile(hMap, FILE_MAP_WRITE, 0, 0, 0);
284    if (NULL == pData) {    if (NULL == pData) {
285      printErrorAndExit("Error at MapViewOfFile", GetLastError());      printErrorAndExit("Error at MapViewOfFile", GetLastError());
# Line 137  int main(int argc, char *argv[]) { Line 290  int main(int argc, char *argv[]) {
290    pDataBitmap = (unsigned char *)((INT_PTR)pData + sizeof(header));    pDataBitmap = (unsigned char *)((INT_PTR)pData + sizeof(header));
291        
292    // debugging    // debugging
293    printf("pos. of file: %p\n", pData);    if (VERBOSE) {
294    printf("pos. of bitmap: %p\n", pDataBitmap);      fprintf(stdout, "pos. of file: %p\n", pData);
295        fprintf(stdout, "pos. of bitmap: %p\n", pDataBitmap);
296    // pointer to current pixel    }
   pDataBitmapCurrent = pDataBitmap;  
297    
298      
299      if (use_processes && is_worker_process) {
300      
301        if (VERBOSE)
302          fprintf(stdout, "inside worker-process\n");
303        
304        // get segment information from command line
305        worker_startrow = atoi(argv[2]);
306        worker_rows = atoi(argv[3]);
307        
308        // allocate memory for one worker's arguments
309        if ((worker_args = malloc(sizeof(worker_args[0]))) == NULL)
310          perror("malloc"), exit(1);
311        
312        // assign worker's arguments
313        worker_args[0].start_row = worker_startrow;
314        worker_args[0].number_of_rows = worker_rows;
315        worker_args[0].pBitmap = pDataBitmap;
316    
317        fractal_create_segment(&worker_args[0]);
318    
319        // cleanup mmap-handle
320        if (!CloseHandle(hMap))
321          printErrorAndExit("Error at CloseHandle", GetLastError());
322        
323        return 0;
324      }
325      
326    /*    /*
327    // turn bitmap into white wand    // turn bitmap into white canvas
328    for (offset = 0; offset < 500 * 500 * 3; offset++) {    for (offset = 0; offset < 500 * 500 * 3; offset++) {
329      //pDataBitmap[offset] = 255;      *pDataBitmap = 255;
330      *pDataBitmapCurrent = 255;      pDataBitmap++;
     pDataBitmapCurrent++;  
331    }    }
332      exit(0);
333    */    */
334    
335    // calculate fractal    // allocate memory for bitmap
336    for (y=YSIZE-1; y>=0; y--) {    /*
337            for (x=0; x<XSIZE; x++) {    if ((pDataBitmap = malloc(XSIZE * YSIZE * 3 * sizeof(pDataBitmap[0]))) == NULL)
338              getColorValuesAt(x * (2.0 / XSIZE) - 1.5, y * (2.0 / YSIZE) - 1.0, &bgr[2], &bgr[1], &bgr[0]);      perror("malloc"), exit(1);
339                  */
340              // debugging    
341              //printf("pointer: %p\n", pDataBitmapCurrent);    // allocate memory for table of all worker handles
342                  if ((worker_handles = malloc(workers * sizeof(worker_handles[0]))) == NULL)
343              // transfer color values to current pixel      perror("malloc"), exit(1);
344              //*pDataBitmapCurrent = (unsigned char *)bgr;  
345              pDataBitmapCurrent[0] = bgr[0];    // allocate memory for table of all worker arguments
346              pDataBitmapCurrent[1] = bgr[1];    if ((worker_args = malloc(workers * sizeof(worker_args[0]))) == NULL)
347              pDataBitmapCurrent[2] = bgr[2];      perror("malloc"), exit(1);
348                  
349              // move pointer to next pixel    
350              pDataBitmapCurrent += 3;    // calculate bitmap segment length for workers
351                  worker_rows = YSIZE / workers;
352            }    if (VERBOSE)
353            //no padding required because 1500%4 =0      fprintf(stdout, "rows for each worker: %i\n", worker_rows);
354      
355      // start workers
356      for (worker_index = 0; worker_index < workers; worker_index++) {
357        
358        // debugging: just run single thread
359        //if (worker_index == 1)
360        //  continue;
361        
362        // number of row to start for each worker
363        worker_startrow = worker_index * worker_rows;
364        
365        // recalculate number of rows for last worker if (YSIZE mod workers) != 0
366        if (worker_index == workers - 1) {
367          worker_rows = YSIZE - worker_startrow;
368          if (VERBOSE)
369            fprintf(stdout, "rows for last worker: %i\n", worker_rows);
370        }
371        
372        // assign each worker's arguments
373        worker_args[worker_index].start_row = worker_startrow;
374        worker_args[worker_index].number_of_rows = worker_rows;
375        worker_args[worker_index].pBitmap = pDataBitmap;
376        
377        if (!use_processes) {
378        
379          worker_handles[worker_index] = CreateThread(
380            NULL,                          // LPSECURITY_ATTRIBUTES lpThreadAttributes,
381            0,                             // SIZE_T dwStackSize,
382            &fractal_create_segment,                // LPTHREAD_START_ROUTINE lpStartAddress,
383            &worker_args[worker_index],    // LPVOID lpParameter,
384            0,                             // DWORD dwCreationFlags,
385            NULL                           // LPDWORD lpThreadId
386          );
387    
388          if (!worker_handles[worker_index])
389            printErrorAndExit("CreateThread failed", GetLastError());
390          
391        } else {
392    
393          _snprintf(szCmdline, 1023, "%s %s %i %i", argv[0], "--worker", worker_startrow, worker_rows);
394          if (VERBOSE)
395            fprintf(stdout, "starting worker process: %s\n", szCmdline);
396          ZeroMemory( &si, sizeof(si) );
397          si.cb = sizeof(si);
398          ZeroMemory( &pi, sizeof(pi) );
399          
400          if (!CreateProcess(
401              NULL,           // No module name (use command line)
402              szCmdline,      // Command line
403              NULL,           // Process handle not inheritable
404              NULL,           // Thread handle not inheritable
405              FALSE,          // Set handle inheritance to FALSE
406              0,              // No creation flags
407              NULL,           // Use parent's environment block
408              NULL,           // Use parent's starting directory
409              &si,            // Pointer to STARTUPINFO structure
410              &pi             // Pointer to PROCESS_INFORMATION structure
411          ))
412            printErrorAndExit("CreateProcess failed", GetLastError());
413        
414          worker_handles[worker_index] = pi.hProcess;
415          
416        }
417    
418    }    }
419    
420        // wait for all threads
421    /* write the result into the file */    if (VERBOSE)
422        fprintf(stdout, "waiting for workers to finish...\n");
423      if (WaitForMultipleObjects(workers, worker_handles, TRUE, INFINITE) == WAIT_FAILED)
424        perror("WaitForMultipleObjects");
425    
426      // debugging: just run single thread
427      //if (WaitForSingleObject(worker_handles[0], INFINITE) == WAIT_FAILED)
428      //  perror("WaitForSingleObject");
429    
430      // close all worker handles
431      for (worker_index = 0; worker_index < workers; worker_index++)
432        CloseHandle(worker_handles[worker_index]);
433        
434      // write the result into the file
435    if (!FlushViewOfFile(pData, 0)) {    if (!FlushViewOfFile(pData, 0)) {
436      err = GetLastError();      err = GetLastError();
437      printErrorAndExit("Error at UnmapViewOfFile", err);      printErrorAndExit("Error at UnmapViewOfFile", err);
438    }    }
439    
440    /* remove the mapped file */    // remove the mapped file
441    if (!UnmapViewOfFile(pData)) {    if (!UnmapViewOfFile(pData)) {
442      err = GetLastError();      err = GetLastError();
443      printErrorAndExit("Error at UnmapViewOfFile", err);      printErrorAndExit("Error at UnmapViewOfFile", err);
444      exit(err);      exit(err);
445    }    }
446        
447    /* cleanup handles */    // cleanup handles
448    if (!CloseHandle(hMap) || !CloseHandle(hFile) ) {    if (!CloseHandle(hMap) || !CloseHandle(hFile) ) {
449      err = GetLastError();      err = GetLastError();
450      printErrorAndExit("Error at CloseHandle", err);      printErrorAndExit("Error at CloseHandle", err);
451    }    }
452    
453      free(worker_args);
454      free(worker_handles);
455      
456      return 0;
457      
458  }  }
Legend:
Removed from v.1.3  
changed lines
  Added in v.1.13
MailToCvsAdmin">MailToCvsAdmin
 ViewVC Help
Powered by ViewVC 1.1.26 RSS 2.0 feed