home *** CD-ROM | disk | FTP | other *** search
/ OpenStep 4.2J (Developer) / os42jdev.iso / NextDeveloper / OpenStepConversion / ConversionScripts / IconConversion.tops < prev    next >
Text File  |  1996-01-22  |  5KB  |  153 lines
  1. /*********** IconConversion: Header files ***********/
  2.  
  3. replace "#import <file>" with "/* #import <file> */"
  4.     where "<file>" isOneOf {
  5.     "\"tiff.h\""
  6.     "\"<AppKit/tiff.h>\""
  7.     }
  8.     
  9. /*********** IconConversion: named images - parameters ***********/
  10.  
  11. replacemethod /*+*/ "findImageNamed:" with "imageNamed:"
  12.  
  13. replace "[<token obj> setIcon:<name> position:<pos>]" with "[<obj> setImage:[NSImage imageNamed:<name>]], [<obj> setImagePosition:<pos>]"
  14.  
  15. replacemethod "<old>" with "<new>" {
  16.     replace "<image_type>" with "(NSImage *)"
  17.     replace "<image_arg>" with "[NSImage imageNamed:<image_arg>]"
  18.     }
  19.     within ("<implementation>") {
  20.     replace "<image_param>" with "[<image_param> name]"
  21.     }
  22.     where ("<old>", "<new>") isOneOf {
  23.     ("setIcon:<image> at::", "setImage:<image> atRow:column:"),
  24.     ("initIconCell:<image>", "initImageCell:<image>"),
  25.     ("setIcon:<image>", "setImage:<image>"),
  26.     ("setAltIcon:<image>", "setAltImage:<image>"),
  27.     ("setMiniwindowIcon:<image>", "setMiniwindowImage:<image>"),
  28.     ("initFrame:icon:<image> tag:target:action:key:enabled:", "initFrame:image:<image> tag:target:action:key:enabled:")
  29.     }
  30.     
  31. /*********** IconConversion: named images - return types ***********/
  32.  
  33. replacemethod "<old>" with "<new>" {
  34.     replace "<rettype>" with "(NSImage *)"
  35.     replace "<call>" with "[<call> name]"
  36.     }
  37.     within ("<implementation>") {
  38.     replace "return <retval>;" with "return [NSImage imageNamed:<retval>];"
  39.     }
  40.     where ("<old>", "<new>") isOneOf {
  41.     ("icon", "image"),
  42.     ("altIcon", "altImage"),
  43.     ("miniwindowIcon", "miniwindowImage")
  44.     }
  45.  
  46. /*********** IconConversion: simple renaming ***********/
  47.  
  48. replacemethod "<old>" with "<new>"
  49.   where ("<old>", "<new>") isOneOf {
  50.     ("getIconForFile", "iconForFile"),
  51.     ("iconPosition", "imagePosition"),
  52.     ("branchIcon", "branchImage"),
  53.     ("branchIconH", "highlightedBranchImage"),
  54.     ("setIconPosition:", "setImagePosition:"),
  55.     ("iconPosition", "imagePosition"),
  56.     ("iconRectForBounds:", "imageRectForBounds:")
  57.     }
  58.  
  59. /*********** IconConversion: reading, writing ***********/
  60.  
  61. replace "<t function>(<b args>)" with same
  62.     error "IconConversion: NXReadTIFF() and NXWriteTIFF() are obsolete; use NSBitmapImageRep methods instead"
  63.     where "<t function>" isOneOf {
  64.     "NXReadTIFF",
  65.     "NXWriteTIFF"
  66.     }
  67.  
  68. /*********** IconConversion: obsolete methods, functions, ... ***********/
  69.  
  70. replacemethod "setIcon:position:" with same
  71.     error "IconConversion: 'setIcon:position' is obsolete; use 'setImage:' and 'setImagePosition:'"
  72.  
  73. replace "NXGetTIFFInfo(<b args>)" with same
  74.     error "IconConversion: NXGetTIFFInfo() is obsolete; use NSBitmapImageRep methods instead."
  75.  
  76. replace "<token a>" with same
  77.     error "IconConversion: <tok> is obsolete.  Use NSBitmapImageRep instead."
  78.     where "<a>" isOneOf {
  79.     "NX_PAGEHEIGHT",
  80.     "NX_BIGENDIAN",
  81.     "NX_LITTLEENDIAN",
  82.     "NX_BAD_TIFF_FORMAT",
  83.     "NX_IMAGE_NOT_FOUND",
  84.     "NX_ALLOC_ERROR",
  85.     "NX_FORMAT_NOT_YET_SUPPORTED",
  86.     "NX_FILE_IO_ERROR",
  87.     "NX_COMPRESSION_NOT_YET_SUPPORTED",
  88.     "NX_TIFF_CANT_APPEND"
  89.     }
  90.     
  91. /*********** IconConversion: image names ***********/
  92.  
  93. replace "<old>" with "<new>"
  94. where ("<old>", "<new>") isOneOf {
  95.      ("\"NXswitch\"", "\"NSSwitch\""),
  96.      ("\"NXswitchH\"", "\"NSHighlightedSwitch\""),
  97.      ("\"NXradio\"", "\"NSRadioButton\""),
  98.      ("\"NXradioH\"", "\"NSHighlightedRadioButton\""),
  99.      ("\"NXreturnSign\"", "\"NSReturnSign\""),
  100.      ("\"NXmenuArrow\"", "\"NSMenuArrow\""),
  101.      ("\"NXmenuArrowH\"", "\"NSHighlightedMenuArrow\""),
  102.      ("\"NXscrollDown\"", "\"NSScrollDownButton\""),
  103.      ("\"NXscrollDownH\"", "\"NSHighlightedScrollDownButton\""),
  104.      ("\"NXscrollLeft\"", "\"NSScrollLeftButton\""),
  105.      ("\"NXscrollLeftH\"", "\"NSHighlightedScrollLeftButton\""),
  106.      ("\"NXscrollRight\"", "\"NSScrollRightButton\""),
  107.      ("\"NXscrollRightH\"", "\"NSHighlightedScrollRightButton\""),
  108.      ("\"NXscrollUp\"", "\"NSScrollUpButton\""),
  109.      ("\"NXscrollUpH\"", "\"NSHighlightedScrollUpButton\""),
  110.      ("\"NXLinkButton\"", "\"NSLinkButton\""),
  111.      ("\"NXLinkButtonH\"", "\"NSHighlightedLinkButton\""),
  112.      ("\"NXarrow\"", "\"NSArrowCursor\""),
  113.      ("\"NXibeam\"", "\"NSIBeamCursor\""),
  114. }
  115.  
  116. replace "[NSImage imageNamed:@\"app\"]" with "[NSImage imageNamed:@\"NSApplicationIcon\"]"
  117.  
  118. replace "[NSImage imageNamed:@\"NXAppTile\"]" with same
  119.     error "IconConversion: The image - NXAppTile - is no longer available in the API. Try using [NSApp setApplicationIconImage:]."
  120.  
  121. replace "[NSImage imageNamed:@<name>]" with same
  122.     error "IconConversion: The image - <name> - is no longer available in the API."
  123.     where "<name>" isOneOf {
  124.      "\"NXsquare16\"",
  125.      "\"NXsquare16H\"",
  126.      "\"NXscrollMenuDown\"",
  127.      "\"NXscrollMenuDownD\"",
  128.      "\"NXscrollMenuDownH\"",
  129.      "\"NXscrollMenuLeft\"",
  130.      "\"NXscrollMenuLeftD\"",
  131.      "\"NXscrollMenuLeftH\"",
  132.      "\"NXscrollMenuLeft\"",
  133.      "\"NXscrollMenuLeftD\"",
  134.      "\"NXscrollMenuLeftH\"",
  135.      "\"NXscrollMenuRight\"",
  136.      "\"NXscrollMenuRightD\"",
  137.      "\"NXscrollMenuRightH\"",
  138.      "\"NXscrollMenuUp\"",
  139.      "\"NXscrollMenuUpD\"",
  140.      "\"NXscrollMenuUpH\"",
  141.      "\"NXdefaultappicon\"",
  142.      "\"NXdefaulticon\""
  143.     }
  144.  
  145. replace "@\"app\"" with same
  146.     warning "IconConversion: The image named @\"app\" has been renamed @\"NSApplicationIcon\"."
  147.  
  148. /*********** IconConversion: clean up ***********/
  149.  
  150. replace "[NSImage imageNamed:[<anImage> name]]" with "<anImage>"
  151.  
  152. replace "[[NSImage imageNamed:<name>] name]" with "<name>"
  153.