XWorkstation.st
changeset 1183 28cfb8ef3504
parent 1180 cebccdb0e9c0
child 1195 91fef292a475
equal deleted inserted replaced
1182:e28b15d4ef95 1183:28cfb8ef3504
   271 	 */
   271 	 */
   272 	return 0;
   272 	return 0;
   273     }
   273     }
   274 
   274 
   275     if (@global(ErrorPrinting) == true) {
   275     if (@global(ErrorPrinting) == true) {
   276 	fprintf(stderr, "XWORKSTAT: x-error cought maj=%d (0x%x) min=%d (0x%x) resource=%x\n",
   276 	fprintf(stderr, "XWorkstation [error]: x-error cought maj=%d (0x%x) min=%d (0x%x) resource=%x\n",
   277 			event->request_code, event->request_code, 
   277 			event->request_code, event->request_code, 
   278 			event->minor_code, event->minor_code, event->resourceid);
   278 			event->minor_code, event->minor_code, event->resourceid);
   279 	fprintf(stderr, "XWORKSTAT: x-error message is [%d] '%s'\n", event->error_code, lastErrorMsg);
   279 	fprintf(stderr, "XWorkstation [error]: x-error message is [%d] '%s'\n", event->error_code, lastErrorMsg);
   280     }
   280     }
   281 
   281 
   282     __errorInterruptWithIDAndParameter__(@symbol(DisplayError), __MKOBJ(dpy));
   282     __errorInterruptWithIDAndParameter__(@symbol(DisplayError), __MKOBJ(dpy));
   283     return 0;
   283     return 0;
   284 }
   284 }
  2363     (shape == #topRight)        ifTrue:[ ^ %{ __MKSMALLINT(XC_ur_angle)          %} "148" ].
  2363     (shape == #topRight)        ifTrue:[ ^ %{ __MKSMALLINT(XC_ur_angle)          %} "148" ].
  2364     (shape == #bottomLeft)      ifTrue:[ ^ %{ __MKSMALLINT(XC_ll_angle)          %} "76" ].
  2364     (shape == #bottomLeft)      ifTrue:[ ^ %{ __MKSMALLINT(XC_ll_angle)          %} "76" ].
  2365     (shape == #square)          ifTrue:[ ^ %{ __MKSMALLINT(XC_dotbox)            %} "40" ].
  2365     (shape == #square)          ifTrue:[ ^ %{ __MKSMALLINT(XC_dotbox)            %} "40" ].
  2366     (shape == #fourWay)         ifTrue:[ ^ %{ __MKSMALLINT(XC_fleur)             %} "52" ].
  2366     (shape == #fourWay)         ifTrue:[ ^ %{ __MKSMALLINT(XC_fleur)             %} "52" ].
  2367     (shape == #crossCursor)     ifTrue:[ ^ %{ __MKSMALLINT(XC_X_cursor)          %} "0" ].
  2367     (shape == #crossCursor)     ifTrue:[ ^ %{ __MKSMALLINT(XC_X_cursor)          %} "0" ].
  2368 "/    ('XWORKSTATION: invalid cursorShape:' , shape printString) infoPrintNL.
  2368 
       
  2369 "/    ('XWorkstation [info]: invalid cursorShape:' , shape printString) infoPrintNL.
  2369     ^  nil
  2370     ^  nil
  2370 ! !
  2371 ! !
  2371 
  2372 
  2372 !XWorkstation methodsFor:'drawing'!
  2373 !XWorkstation methodsFor:'drawing'!
  2373 
  2374 
  5359 			       CurrentTime);
  5360 			       CurrentTime);
  5360 	END_INTERRUPTSBLOCKED
  5361 	END_INTERRUPTSBLOCKED
  5361 	ok = 0;
  5362 	ok = 0;
  5362 	switch(result) {
  5363 	switch(result) {
  5363 	    case AlreadyGrabbed: 
  5364 	    case AlreadyGrabbed: 
  5364 		printf("XWORKSTAT: grab keyboard: AlreadyGrabbed\n");
  5365 		if (@global(ErrorPrinting) == true) {
       
  5366 		    fprintf(stderr, "XWorkstation [warning]: grab keyboard: AlreadyGrabbed\n");
       
  5367 		}
  5365 		break;
  5368 		break;
  5366 	    case GrabNotViewable: 
  5369 	    case GrabNotViewable: 
  5367 		printf("XWORKSTAT: grab keyboard: GrabNotViewable\n");
  5370 		if (@global(ErrorPrinting) == true) {
       
  5371 		    fprintf(stderr, "XWorkstation [warning]: grab keyboard: GrabNotViewable\n");
       
  5372 		}
  5368 		break;
  5373 		break;
  5369 	    case GrabInvalidTime: 
  5374 	    case GrabInvalidTime: 
  5370 		printf("XWORKSTAT: grab keyboard: InvalidTime\n");
  5375 		if (@global(ErrorPrinting) == true) {
       
  5376 		    fprintf(stderr, "XWorkstation [warning]: grab keyboard: InvalidTime\n");
       
  5377 		}
  5371 		break;
  5378 		break;
  5372 	    case GrabFrozen: 
  5379 	    case GrabFrozen: 
  5373 		printf("XWORKSTAT: grab keyboard: Frozen\n");
  5380 		if (@global(ErrorPrinting) == true) {
       
  5381 		    fprintf(stderr, "XWorkstation [warning]: grab keyboard: Frozen\n");
       
  5382 		}
  5374 		break;
  5383 		break;
  5375 	    default:
  5384 	    default:
  5376 		ok = 1;
  5385 		ok = 1;
  5377 		break;
  5386 		break;
  5378 	}
  5387 	}
  5381 	    RETURN (false);
  5390 	    RETURN (false);
  5382 	}
  5391 	}
  5383 
  5392 
  5384 	RETURN ( true );
  5393 	RETURN ( true );
  5385     }
  5394     }
  5386 %}
  5395 %}.
  5387 .
       
  5388     self primitiveFailed
  5396     self primitiveFailed
  5389 !
  5397 !
  5390 
  5398 
  5391 grabPointerIn:aWindowId withCursor:aCursorId pointerMode:pMode keyboardMode:kMode confineTo:confineId
  5399 grabPointerIn:aWindowId withCursor:aCursorId pointerMode:pMode keyboardMode:kMode confineTo:confineId
  5392     "grap the pointer - return true if ok"
  5400     "grap the pointer - return true if ok"
  5431 	END_INTERRUPTSBLOCKED
  5439 	END_INTERRUPTSBLOCKED
  5432 
  5440 
  5433 	ok = 0;
  5441 	ok = 0;
  5434 	switch (result) {
  5442 	switch (result) {
  5435 	    case AlreadyGrabbed: 
  5443 	    case AlreadyGrabbed: 
  5436 		printf("XWORKSTAT: grab pointer: AlreadyGrabbed\n");
  5444 		if (@global(ErrorPrinting) == true) {
       
  5445 		    fprintf(stderr, "XWorkstation [warning]: grab pointer: AlreadyGrabbed\n");
       
  5446 		}
  5437 		break;
  5447 		break;
  5438 	    case GrabNotViewable: 
  5448 	    case GrabNotViewable: 
  5439 		printf("XWORKSTAT: grab pointer: GrabNotViewable\n");
  5449 		if (@global(ErrorPrinting) == true) {
       
  5450 		    fprintf(stderr, "XWorkstation [warning]: grab pointer: GrabNotViewable\n");
       
  5451 		}
  5440 		break;
  5452 		break;
  5441 	    case GrabInvalidTime: 
  5453 	    case GrabInvalidTime: 
  5442 		printf("XWORKSTAT: grab pointer: InvalidTime\n");
  5454 		if (@global(ErrorPrinting) == true) {
       
  5455 		    fprintf(stderr, "XWorkstation [warning]: grab pointer: InvalidTime\n");
       
  5456 		}
  5443 		break;
  5457 		break;
  5444 	    case GrabFrozen: 
  5458 	    case GrabFrozen: 
  5445 		printf("XWORKSTAT: grab pointer: Frozen\n");
  5459 		if (@global(ErrorPrinting) == true) {
       
  5460 		    fprintf(stderr, "XWorkstation [warning]: grab pointer: Frozen\n");
       
  5461 		}
  5446 		break;
  5462 		break;
  5447 	    default:
  5463 	    default:
  5448 		ok = 1;
  5464 		ok = 1;
  5449 		break;
  5465 		break;
  5450 	}
  5466 	}
  5453 	    XUngrabPointer(myDpy, CurrentTime);
  5469 	    XUngrabPointer(myDpy, CurrentTime);
  5454 	    RETURN (false);
  5470 	    RETURN (false);
  5455 	}
  5471 	}
  5456 	RETURN ( true );
  5472 	RETURN ( true );
  5457     }
  5473     }
  5458 %}
  5474 %}.
  5459 .
       
  5460     self primitiveFailed
  5475     self primitiveFailed
  5461 !
  5476 !
  5462 
  5477 
  5463 ungrabKeyboard
  5478 ungrabKeyboard
  5464     "release the keyboard"
  5479     "release the keyboard"
  8172 ! !
  8187 ! !
  8173 
  8188 
  8174 !XWorkstation class methodsFor:'documentation'!
  8189 !XWorkstation class methodsFor:'documentation'!
  8175 
  8190 
  8176 version
  8191 version
  8177     ^ '$Header: /cvs/stx/stx/libview/XWorkstation.st,v 1.186 1997-01-10 18:22:41 cg Exp $'
  8192     ^ '$Header: /cvs/stx/stx/libview/XWorkstation.st,v 1.187 1997-01-11 11:12:58 cg Exp $'
  8178 ! !
  8193 ! !
  8179 XWorkstation initialize!
  8194 XWorkstation initialize!