home *** CD-ROM | disk | FTP | other *** search
/ Usenet 1994 October / usenetsourcesnewsgroupsinfomagicoctober1994disk2.iso / unix / volume17 / mgr / part33 < prev    next >
Text File  |  1989-01-19  |  46KB  |  1,174 lines
  1. Subject:  v17i034:  MGR, Bellcore window manager, Part33/61
  2. Newsgroups: comp.sources.unix
  3. Approved: rsalz@uunet.UU.NET
  4.  
  5. Submitted-by: Stephen A. Uhler <sau@bellcore.com>
  6. Posting-number: Volume 17, Issue 34
  7. Archive-name: mgr/part33
  8.  
  9.  
  10.  
  11.  
  12. #! /bin/sh
  13. # This is a shell archive.  Remove anything before this line, then unpack
  14. # it by saving it into a file and typing "sh file".  To overwrite existing
  15. # files, type "sh file -c".  You can also feed this as standard input via
  16. # unshar, or by typing "sh <file", e.g..  If this archive is complete, you
  17. # will see the following message at the end:
  18. #        "End of archive 33 (of 61)."
  19. # Contents:  font-16/Uoldeng22x30rI font-32/Uoldeng22x30rI src/cut.c
  20. #   src/win_stack.c
  21. # Wrapped by rsalz@papaya.bbn.com on Thu Nov 17 21:05:41 1988
  22. PATH=/bin:/usr/bin:/usr/ucb ; export PATH
  23. if test -f 'font-16/Uoldeng22x30rI' -a "${1}" != "-c" ; then 
  24.   echo shar: Will not clobber existing file \"'font-16/Uoldeng22x30rI'\"
  25. else
  26. echo shar: Extracting \"'font-16/Uoldeng22x30rI'\" \(10460 characters\)
  27. sed "s/^X//" >'font-16/Uoldeng22x30rI' <<'END_OF_FILE'
  28. Xbegin 644 oldeng22x30rI.fnt
  29. XM%A8>"%L@   #______________________?_________________________
  30. XM____________________________________________________________
  31. XM__________PO_'/S__N_8 /_',.^.=W_^[_'(?^;__\<S_'(?\<A__^[?A_N
  32. XM_]Y_PW/__>?\-Q__ __@?O\[G_W<__/Y\_G]WQW/^___________________
  33. XM___?______[______________\______]__________]___W____________
  34. XM_________________________________________\     #____________
  35. XM_________^/_________________________________________________
  36. XM______________________________________________@'^ ?!_W0_  '^
  37. XM 8 \ X'_=#^ 0-]-__X!G^ 0/X! W_\:+ _ _QP_@4%_\</X5(_^ /_  /X:
  38. XM"_C07^&@@?#\'@V%^/_O__________________^_______S______W______
  39. XM_P?_____K__________K___O____________________________________
  40. XM_________________\     #_____________________\'_____________
  41. XM______________________________________]_____________________
  42. XM______________________ 3^ \Q_N _  #^ P \!P'^X#^ F#Y&__X#'^ N
  43. XM&X"8/_R)& ^ _#H? 3C_PZ'P$\?]^'>  /^)Q_!./_B8..QX/ U#^  /____
  44. XM______________]?______C______[_______,/_____C__________C__^/
  45. XM____________________________]_______?__]_____________\     #
  46. XM_____________________^'________________________________\__\W
  47. XM__^?__Y___Q__P!__WW_^_/__/__\_____________________________?#
  48. XM^YSQ_-A_FOA^YOQ]SF/\V'^Y'G_$__[G'^Y?![D>?_F#&\=A^(</<'C_B'#W
  49. XM!\?[_ ^X ?^+Q_P>/_@XN/QX?8SC_  ?__________________\/______C_
  50. XM_____Y______^./_____C__________C__^/________________________
  51. XM____[______^___[_____________\     #______________________7_
  52. XM_______________________________X+_X/__\%__P7__Q__P!__@'_\ ?_
  53. XM^"__X+____________________________^C_\GQ^9W_\OQ_^?__]'?YGO_^
  54. XM'O_B___]'_^?C_X>_^6+'\?W\Q>/\7C_,7C_%\?[_Q_[]_^+Q_Q>/_BXN/XW
  55. XM_XWC_P ___________________\'______C______P______^/______C___
  56. XM_______C__^/____________________________C______\___S________
  57. XM_____\     #______________________O_________________________
  58. XM______^$'_T?__"#_\(/__C__@#_^ /_X ?_A!_^$'__________________
  59. XM__________BQ_S'Q\QW_XOQ_Y?__S'?S'?_Y'__B___S'_Y?W_D>_\6+'\/W
  60. XM\Q?'\7C_,7Q_%\?Y_[_W=_^+Q_Q>/_BXN/XW_XWC__]_________________
  61. XM__^/______C______X?_____^/______C__________C__^/____________
  62. XM________________C______Y___G_____________\     #____________
  63. XM__________?_______________________________^/'_\?__'C_\>/__C_
  64. XM_O__^(?__ __CQ_^/'____________________________!Q_C'Q\QW_XOQ_
  65. XMQ?__C'?S&__Q'__B___C'_Q?__$>_\6+'\/WXQ?'\7C^,7Q_%\?P/__F=_^+
  66. XMQ_Q>/_BXN/\/_XWC__]____________________?______C______\/_____
  67. XM^/______C___O__^___C__^/____________________________C______Y
  68. XM___G_____________\     #____________________________________
  69. XM__________________^/'_\?__'C_\>/__G__O__^/___]__CQ_^/'______
  70. XM______________________!X_C%SYQW_XGA_Q?__C'?G%__Q%W_B___C'_Q>
  71. XM/_$>_\6+']'WYQ?C\7C^<7X_%\?D!\?,=_^+Q_Q>/_BXN/\/_XWC__[_____
  72. XM______________________C______^'_____^/______C___'__\?__C__^/
  73. XM____________________________C______Q___'_____________\     #
  74. XM______________________________________________________^/'_\?
  75. XM__'C_\>/__'__O__^/___]__CQ_^/'_]___W______________________]X
  76. XM_#%GYQW_PH1_A8__# ?G#__A%#_"___#'_A9'^$>_X0('Y'WQQ?CX0#\<7X^
  77. XM%X_F "/,=_\(!_A /_BXN/P!_PP#__W___________________________C_
  78. XM______#_____^/______C___O__^___C__^/________________________
  79. XM____C______Q___'_____________\     #________________________
  80. XM______________________________^/'_\?__/C_\^/__+__O__^/___[__
  81. XMCQ_^/'_X___C______________________[X^#$3QQW_@OQ_!07^# ?' ?_!
  82. XM$C^"__^#'_!''\$>_P0('QCWQQ?CP7C\<7X\%C_CP#><=_X+Q_!>/_" @/P!
  83. XM_@WC__O___________________________C_______A?____^!______C___
  84. XM_______C__^/____________________________@?_____Q___'________
  85. XM_____\     #________________________________________________
  86. XM______^/'_\?___C__^/_^3__''_^/___W__CQ_^/'_P?__!____________
  87. XM__________X >#!QQQW_@OQ_! /^# ?'%G_!!C^"__^#'_!?C\$>_P0('Q@'
  88. XMQQ #P7C\<0 \$!_P^!^<=_X+Q_!>/^"XN/P!_@WC_X#_________________
  89. XM______[/__B?__Y___0__^?_^!___S__C/__-__\W__CO_^/__]]]_WW__]_
  90. XM_^[___?__-O__GO_@?__??_X]__CWW_'M_\TW_P??\     #____________
  91. XM__________________________________________^/'_\?___#__\?_^C_
  92. XM_ "_^/?__W__@!_^.'_X___C______________________P >#%QQQW_@H1_
  93. XM!??^# ?'%S_!%C^"__^#'_!?C\$>_P0('P!WQQ?CP7C\<7X\ Q_X&P\<=_X(
  94. XM!_! /^"XN/^'_@WC_X#_______________________P"__@%__P/_XX__X/_
  95. XM^#___-O_B%_^#__X/__B'_^/__XPP?C!__P__\!__\/_^ /_^ ?_@__^./_X
  96. XM0O_A#"^#!_X(/_@ _\     #____________________________________
  97. XM__________________^/'_\?__\#__X__]C__&!_^(+__G__P#_]!'_]___W
  98. XM______________________P /C%QQQW_XGA_Q??_C'?'$#_Q$#_B___C'_Q?
  99. XMG_$>_\6+']QWQQ?C\0#\<7X_!Q_\ \\<=_^+Q_Q>/^" @/]C_XWC_X#_____
  100. XM__________________Y!__B#_^ /_XX__#/_^/__X\/_AC_]'__\?__AC_^/
  101. XM__P((_ C_^,7_X8O_C%_]$/_X@__C__^,'_\,?_PPQ^P#_T<?_8!_\     #
  102. XM____________________________________________!_________^/'_\?
  103. XM__X#__\7_[C__?A_^''__/__@!__O'____________________________W^
  104. XM/C$!QQW_XOQ_Q??_C'?'%Q_Q%C_B___C'_Q>/_$>_\6+']XWQQ #\7C\<0 _
  105. XM%X__ $\<=_^+Q_Q>/_BXN/]C_XP#_]________________________]Q__CC
  106. XM_^&?_XX__C'_^/__X\?_CC__'__\?__CS_^/__XXX_CC_^./_\<?_CC__&?_
  107. XMXY__C__^./_\<?_QQQ_QG_\<?__S_\     #________________________
  108. XM___________________^#_________^/'_\?__S___^/_P ?__Q_^/'__/__
  109. XMCQ___'____________________________O^/C%QQQW_XOQ_Q??_C'?'%Q_Q
  110. XM$#_B___C'_Q8/_$>_\6+']XWYQ?G\7C^<7Y_%X__X \<=_^+Q_Q>/_BXN/[Q
  111. XM_XWC_]________________________\Q__CC_^/__XX__CC_^/__X\?_CC__
  112. XM'__\?__CG_^/__XXX_CC_^./_\<?_CC__'__X[__C__^./_\<?_QQQ_X__\<
  113. XM?__/_\     #___________________________________________\'___
  114. XM______^/'_\?__W___^/__C___Q_^/'_^/__CQ___'__________________
  115. XM__________O_'G$!XSV_XOQ_Q??_C'?G,#_Q%C_B___C'_Q''_$^_\6+']\7
  116. XMXS?G\7C^,WY_%X__[ ^,]O^+Q_Q>/_BXN/[Q_XWC_[__________________
  117. XM______Y1__CC_^/__XX__CG_^/__X\?_CC__'__\?__B'_^/__XXX_CC_^./
  118. XM_\<?_CC__'__X!__C__^./_\<?_QQQ_X__\<?_^__\     #____________
  119. XM__________________________________________^/'_\?__O___^/__C_
  120. XM__Q_^/'_^?__CQ___'____________________________?_'N-QXWV_YOQ_
  121. XMS??_G'?C=S_S-C_B___G'_S?'_-^_\6+']\7\_?/\7C_/WS_%\?_[D^-]O^+
  122. XMQ_Q>/_BXN/WX_XWC_W________________________QQ__CC_^/__XX__B?_
  123. XM^/__X\?_CC__'__\?__A'_^/__XXX_CC_^./_\<?_CC__'__^ ?_C__^./_\
  124. XM<?_QQQ_\?_\<?_P/_\     #____________________________________
  125. XM____W______]______^/'_\?__O___^/__C___Q_^/'_\?__CQ___'_]___W
  126. XM_____________________^/OC\]Q\/T_Z/Q_P/?_G'?S]G_Q=G_F__^/'_P>
  127. XMC_ ^_\6+'X^'\_?/\7C_/WS_#\?_WL_#]/^#Q_Q>/_@XN/CX_XWC_O______
  128. XM__________________QQ__CC_^/__XX__A__^/__X\?_CC__'__\?__C'_^/
  129. XM__XXX_CC_^./_\<?_CC__'___<?_C__^./_\<?_QQQ_\?_\<?_[__\     #
  130. XM________________________________________C______X______^/'_\?
  131. XM__L'__"/__C__P1_^/'_\/__CQ__A'_X___C_____________________X#?
  132. XMCP-Q\O!_X#Q_@!=^!'?S]'_@<G\N__X''_@-C^ &WPV+'D.'^/<?P7C_CW'^
  133. XM T?X ]_+P?^ Q_Q^/_@8N. T;XWC_@?[______________________QQ__CC
  134. XM_^/__XX__C__^/__X\?_CC__'__\?__CB_^/__XXX_CC_^./_\<?_CC__'__
  135. XM^<?_C__^./_\<?_QQQ_&/_\<?_[__\     #________________________
  136. XM________________!______P?_____^"'_\7__8"_^ /__B__@!_^"'_\)__
  137. XM@A__ '_P?__!_____________________P _C@!Q^ #_P A_  #\ '?X\/_ 
  138. XM!OX.__P#/_ #Q<  /@V+'0#'_#0_@1#_PD/\ .+P #_@ _\ !?P /_ ( , ,
  139. XM7XWC_  '______________________X@__1C_]'?_T8__@[_]&__X,?_!C__
  140. XM'__\?__1A_]%__P08?!A_]&/_X,?_1C__&__\$?_1?_^,'_\<?_QQQ^ -_\<
  141. XM?_P#?\     #________________________________________A______X
  142. XM______]!__X/__ !_\ ___!__ '_]!__^'__0?_^ ?_X___A____________
  143. XM_________AQ_S#@/_ '_AP/^'P'X8/?\<_^&#OP!__AA?^''PX? ? -'B#C'
  144. XM_Q#_@0__\8_X<>'F '_P!_X<(_X?_^&$/X<>/W '^  /________________
  145. XM______\9__X?__@__^'__P'__A__P ?_CG__C__^/__XC__C__XXX_CC__A_
  146. XM_P#__X#_^A__X!__X__\"/_Z#__H"/\!#_\ ?_@ _\     #____________
  147. XM____________________________U______]_______S__^?__'[_]]___S_
  148. XM_/O__S___?__\__^^__]___U_____________________/[_Z?X__PW_/\?\
  149. XM_^/S^??_#_\_G?W#__/X_\_OYS_X_<?OT?WG_\/_L3___!_S^_//8/_\-_S_
  150. XM=_^__\_N_S^_?GX/\_@?______________________^[__]___S___?__\?_
  151. XM_W___,O_WO__W___/__]W__W__]]]_WW__W__T/__]C__S___G__]___/?__
  152. XM/__\<_]SG_^?___!_\     #____________________________________
  153. XM____[______________________________________________________[
  154. XM_____________________/__^?____W_/__\___S__?___\__?W___/__\__
  155. XM_S___?__\?______\7___]_S___??___]_S______\___S___G__________
  156. XM_________________________________________^/__O______'_______
  157. XM_____________\?___C___________________________]______\     #
  158. XM________________________________________W___________________
  159. XM___________________________________W_____________________?__
  160. XM^_____W_?__]___W__?___]__OY___?__]___W___?__\_______\7___]_W
  161. XM___>____]_W______]___W___G__________________________________
  162. XM_________________^/__W______'____________________\?___C_____
  163. XM______________________]X_____\     #________________________
  164. XM____________________________________________________________
  165. XM_________________________________?__^_____W_?__]___W__?___]_
  166. XM_G^?__?__]___W___O__]_______\7___\_W___N____]_W______]___W__
  167. XM_GX/__________________________________________________/__S__
  168. XM____G____________________\?___C___________________________]P
  169. XM?____\     #________________________________________________
  170. XM____________________________________________________________
  171. XM_________?__^_____W_?__]___W__?___]__C____?__]___W___O__]___
  172. XM____\7___\]W___Q____]_W______]___W___P '____________________
  173. XM____________________________Y_/__Q______G___________________
  174. XM_\?___C___________________________\ ?____\     #____________
  175. XM____________________________________________________________
  176. XM_____________________________________________?__^_____W_?__]
  177. XM_]_W__?___]__C____?__]___W_W_S__]_______\7___\=W________]_W_
  178. XM_____]___W___P #____________________________________________
  179. XM____R>?__Q_____X/____________________\?___A_________________
  180. XM__________\'?____\     #____________________________________
  181. XM____________________________________________________________
  182. XM_____________________O___?____G_O__^_S_[_^?___^__#____O__^__
  183. XM_[_/_\?_^_______\?___^#[________Y_[______^___[___X'[________
  184. XM________________________________________TH___A_____P?_______
  185. XM_____________\____C___________________________^/?____\     #
  186. XM____________________________________________________________
  187. XM_________________________________________________________S__
  188. XM_F____'_S___//_\_\?____/_'____S___/__\\______/______\O____#\
  189. XM________Q_\_______/__\_____[________________________________
  190. XM_________________1___C_____P_____________________]____G_____
  191. XM________________________?____\     #________________________
  192. XM____________________________________________________________
  193. XM_________________________________\___Y____O_\___P___/^_____S
  194. XM_/____\___S___#______S______]_____G_/_______[__/______S___/_
  195. XM_____________________________________________________G___G__
  196. XM___V_____________________[____O____________________________\
  197. X&_____\  
  198. X 
  199. Xend
  200. END_OF_FILE
  201. # end of 'font-16/Uoldeng22x30rI'
  202. fi
  203. if test -f 'font-32/Uoldeng22x30rI' -a "${1}" != "-c" ; then 
  204.   echo shar: Will not clobber existing file \"'font-32/Uoldeng22x30rI'\"
  205. else
  206. echo shar: Extracting \"'font-32/Uoldeng22x30rI'\" \(10460 characters\)
  207. sed "s/^X//" >'font-32/Uoldeng22x30rI' <<'END_OF_FILE'
  208. Xbegin 644 oldeng22x30rI.fnt
  209. XM&!8>"%L@   #______________________?_________________________
  210. XM____________________________________________________________
  211. XM__________PO_'/S__N_8 /_',.^.=W_^[_'(?^;__\<S_'(?\<A__^[?A_N
  212. XM_]Y_PW/__>?\-Q__ __@?O\[G_W<__/Y\_G]WQW/^___________________
  213. XM___?______[______________\______]__________]___W____________
  214. XM_________________________________________\     #____________
  215. XM_________^/_________________________________________________
  216. XM______________________________________________@'^ ?!_W0_  '^
  217. XM 8 \ X'_=#^ 0-]-__X!G^ 0/X! W_\:+ _ _QP_@4%_\</X5(_^ /_  /X:
  218. XM"_C07^&@@?#\'@V%^/_O__________________^_______S______W______
  219. XM_P?_____K__________K___O____________________________________
  220. XM_________________\     #_____________________\'_____________
  221. XM______________________________________]_____________________
  222. XM______________________ 3^ \Q_N _  #^ P \!P'^X#^ F#Y&__X#'^ N
  223. XM&X"8/_R)& ^ _#H? 3C_PZ'P$\?]^'>  /^)Q_!./_B8..QX/ U#^  /____
  224. XM______________]?______C______[_______,/_____C__________C__^/
  225. XM____________________________]_______?__]_____________\     #
  226. XM_____________________^'________________________________\__\W
  227. XM__^?__Y___Q__P!__WW_^_/__/__\_____________________________?#
  228. XM^YSQ_-A_FOA^YOQ]SF/\V'^Y'G_$__[G'^Y?![D>?_F#&\=A^(</<'C_B'#W
  229. XM!\?[_ ^X ?^+Q_P>/_@XN/QX?8SC_  ?__________________\/______C_
  230. XM_____Y______^./_____C__________C__^/________________________
  231. XM____[______^___[_____________\     #______________________7_
  232. XM_______________________________X+_X/__\%__P7__Q__P!__@'_\ ?_
  233. XM^"__X+____________________________^C_\GQ^9W_\OQ_^?__]'?YGO_^
  234. XM'O_B___]'_^?C_X>_^6+'\?W\Q>/\7C_,7C_%\?[_Q_[]_^+Q_Q>/_BXN/XW
  235. XM_XWC_P ___________________\'______C______P______^/______C___
  236. XM_______C__^/____________________________C______\___S________
  237. XM_____\     #______________________O_________________________
  238. XM______^$'_T?__"#_\(/__C__@#_^ /_X ?_A!_^$'__________________
  239. XM__________BQ_S'Q\QW_XOQ_Y?__S'?S'?_Y'__B___S'_Y?W_D>_\6+'\/W
  240. XM\Q?'\7C_,7Q_%\?Y_[_W=_^+Q_Q>/_BXN/XW_XWC__]_________________
  241. XM__^/______C______X?_____^/______C__________C__^/____________
  242. XM________________C______Y___G_____________\     #____________
  243. XM__________?_______________________________^/'_\?__'C_\>/__C_
  244. XM_O__^(?__ __CQ_^/'____________________________!Q_C'Q\QW_XOQ_
  245. XMQ?__C'?S&__Q'__B___C'_Q?__$>_\6+'\/WXQ?'\7C^,7Q_%\?P/__F=_^+
  246. XMQ_Q>/_BXN/\/_XWC__]____________________?______C______\/_____
  247. XM^/______C___O__^___C__^/____________________________C______Y
  248. XM___G_____________\     #____________________________________
  249. XM__________________^/'_\?__'C_\>/__G__O__^/___]__CQ_^/'______
  250. XM______________________!X_C%SYQW_XGA_Q?__C'?G%__Q%W_B___C'_Q>
  251. XM/_$>_\6+']'WYQ?C\7C^<7X_%\?D!\?,=_^+Q_Q>/_BXN/\/_XWC__[_____
  252. XM______________________C______^'_____^/______C___'__\?__C__^/
  253. XM____________________________C______Q___'_____________\     #
  254. XM______________________________________________________^/'_\?
  255. XM__'C_\>/__'__O__^/___]__CQ_^/'_]___W______________________]X
  256. XM_#%GYQW_PH1_A8__# ?G#__A%#_"___#'_A9'^$>_X0('Y'WQQ?CX0#\<7X^
  257. XM%X_F "/,=_\(!_A /_BXN/P!_PP#__W___________________________C_
  258. XM______#_____^/______C___O__^___C__^/________________________
  259. XM____C______Q___'_____________\     #________________________
  260. XM______________________________^/'_\?__/C_\^/__+__O__^/___[__
  261. XMCQ_^/'_X___C______________________[X^#$3QQW_@OQ_!07^# ?' ?_!
  262. XM$C^"__^#'_!''\$>_P0('QCWQQ?CP7C\<7X\%C_CP#><=_X+Q_!>/_" @/P!
  263. XM_@WC__O___________________________C_______A?____^!______C___
  264. XM_______C__^/____________________________@?_____Q___'________
  265. XM_____\     #________________________________________________
  266. XM______^/'_\?___C__^/_^3__''_^/___W__CQ_^/'_P?__!____________
  267. XM__________X >#!QQQW_@OQ_! /^# ?'%G_!!C^"__^#'_!?C\$>_P0('Q@'
  268. XMQQ #P7C\<0 \$!_P^!^<=_X+Q_!>/^"XN/P!_@WC_X#_________________
  269. XM______[/__B?__Y___0__^?_^!___S__C/__-__\W__CO_^/__]]]_WW__]_
  270. XM_^[___?__-O__GO_@?__??_X]__CWW_'M_\TW_P??\     #____________
  271. XM__________________________________________^/'_\?___#__\?_^C_
  272. XM_ "_^/?__W__@!_^.'_X___C______________________P >#%QQQW_@H1_
  273. XM!??^# ?'%S_!%C^"__^#'_!?C\$>_P0('P!WQQ?CP7C\<7X\ Q_X&P\<=_X(
  274. XM!_! /^"XN/^'_@WC_X#_______________________P"__@%__P/_XX__X/_
  275. XM^#___-O_B%_^#__X/__B'_^/__XPP?C!__P__\!__\/_^ /_^ ?_@__^./_X
  276. XM0O_A#"^#!_X(/_@ _\     #____________________________________
  277. XM__________________^/'_\?__\#__X__]C__&!_^(+__G__P#_]!'_]___W
  278. XM______________________P /C%QQQW_XGA_Q??_C'?'$#_Q$#_B___C'_Q?
  279. XMG_$>_\6+']QWQQ?C\0#\<7X_!Q_\ \\<=_^+Q_Q>/^" @/]C_XWC_X#_____
  280. XM__________________Y!__B#_^ /_XX__#/_^/__X\/_AC_]'__\?__AC_^/
  281. XM__P((_ C_^,7_X8O_C%_]$/_X@__C__^,'_\,?_PPQ^P#_T<?_8!_\     #
  282. XM____________________________________________!_________^/'_\?
  283. XM__X#__\7_[C__?A_^''__/__@!__O'____________________________W^
  284. XM/C$!QQW_XOQ_Q??_C'?'%Q_Q%C_B___C'_Q>/_$>_\6+']XWQQ #\7C\<0 _
  285. XM%X__ $\<=_^+Q_Q>/_BXN/]C_XP#_]________________________]Q__CC
  286. XM_^&?_XX__C'_^/__X\?_CC__'__\?__CS_^/__XXX_CC_^./_\<?_CC__&?_
  287. XMXY__C__^./_\<?_QQQ_QG_\<?__S_\     #________________________
  288. XM___________________^#_________^/'_\?__S___^/_P ?__Q_^/'__/__
  289. XMCQ___'____________________________O^/C%QQQW_XOQ_Q??_C'?'%Q_Q
  290. XM$#_B___C'_Q8/_$>_\6+']XWYQ?G\7C^<7Y_%X__X \<=_^+Q_Q>/_BXN/[Q
  291. XM_XWC_]________________________\Q__CC_^/__XX__CC_^/__X\?_CC__
  292. XM'__\?__CG_^/__XXX_CC_^./_\<?_CC__'__X[__C__^./_\<?_QQQ_X__\<
  293. XM?__/_\     #___________________________________________\'___
  294. XM______^/'_\?__W___^/__C___Q_^/'_^/__CQ___'__________________
  295. XM__________O_'G$!XSV_XOQ_Q??_C'?G,#_Q%C_B___C'_Q''_$^_\6+']\7
  296. XMXS?G\7C^,WY_%X__[ ^,]O^+Q_Q>/_BXN/[Q_XWC_[__________________
  297. XM______Y1__CC_^/__XX__CG_^/__X\?_CC__'__\?__B'_^/__XXX_CC_^./
  298. XM_\<?_CC__'__X!__C__^./_\<?_QQQ_X__\<?_^__\     #____________
  299. XM__________________________________________^/'_\?__O___^/__C_
  300. XM__Q_^/'_^?__CQ___'____________________________?_'N-QXWV_YOQ_
  301. XMS??_G'?C=S_S-C_B___G'_S?'_-^_\6+']\7\_?/\7C_/WS_%\?_[D^-]O^+
  302. XMQ_Q>/_BXN/WX_XWC_W________________________QQ__CC_^/__XX__B?_
  303. XM^/__X\?_CC__'__\?__A'_^/__XXX_CC_^./_\<?_CC__'__^ ?_C__^./_\
  304. XM<?_QQQ_\?_\<?_P/_\     #____________________________________
  305. XM____W______]______^/'_\?__O___^/__C___Q_^/'_\?__CQ___'_]___W
  306. XM_____________________^/OC\]Q\/T_Z/Q_P/?_G'?S]G_Q=G_F__^/'_P>
  307. XMC_ ^_\6+'X^'\_?/\7C_/WS_#\?_WL_#]/^#Q_Q>/_@XN/CX_XWC_O______
  308. XM__________________QQ__CC_^/__XX__A__^/__X\?_CC__'__\?__C'_^/
  309. XM__XXX_CC_^./_\<?_CC__'___<?_C__^./_\<?_QQQ_\?_\<?_[__\     #
  310. XM________________________________________C______X______^/'_\?
  311. XM__L'__"/__C__P1_^/'_\/__CQ__A'_X___C_____________________X#?
  312. XMCP-Q\O!_X#Q_@!=^!'?S]'_@<G\N__X''_@-C^ &WPV+'D.'^/<?P7C_CW'^
  313. XM T?X ]_+P?^ Q_Q^/_@8N. T;XWC_@?[______________________QQ__CC
  314. XM_^/__XX__C__^/__X\?_CC__'__\?__CB_^/__XXX_CC_^./_\<?_CC__'__
  315. XM^<?_C__^./_\<?_QQQ_&/_\<?_[__\     #________________________
  316. XM________________!______P?_____^"'_\7__8"_^ /__B__@!_^"'_\)__
  317. XM@A__ '_P?__!_____________________P _C@!Q^ #_P A_  #\ '?X\/_ 
  318. XM!OX.__P#/_ #Q<  /@V+'0#'_#0_@1#_PD/\ .+P #_@ _\ !?P /_ ( , ,
  319. XM7XWC_  '______________________X@__1C_]'?_T8__@[_]&__X,?_!C__
  320. XM'__\?__1A_]%__P08?!A_]&/_X,?_1C__&__\$?_1?_^,'_\<?_QQQ^ -_\<
  321. XM?_P#?\     #________________________________________A______X
  322. XM______]!__X/__ !_\ ___!__ '_]!__^'__0?_^ ?_X___A____________
  323. XM_________AQ_S#@/_ '_AP/^'P'X8/?\<_^&#OP!__AA?^''PX? ? -'B#C'
  324. XM_Q#_@0__\8_X<>'F '_P!_X<(_X?_^&$/X<>/W '^  /________________
  325. XM______\9__X?__@__^'__P'__A__P ?_CG__C__^/__XC__C__XXX_CC__A_
  326. XM_P#__X#_^A__X!__X__\"/_Z#__H"/\!#_\ ?_@ _\     #____________
  327. XM____________________________U______]_______S__^?__'[_]]___S_
  328. XM_/O__S___?__\__^^__]___U_____________________/[_Z?X__PW_/\?\
  329. XM_^/S^??_#_\_G?W#__/X_\_OYS_X_<?OT?WG_\/_L3___!_S^_//8/_\-_S_
  330. XM=_^__\_N_S^_?GX/\_@?______________________^[__]___S___?__\?_
  331. XM_W___,O_WO__W___/__]W__W__]]]_WW__W__T/__]C__S___G__]___/?__
  332. XM/__\<_]SG_^?___!_\     #____________________________________
  333. XM____[______________________________________________________[
  334. XM_____________________/__^?____W_/__\___S__?___\__?W___/__\__
  335. XM_S___?__\?______\7___]_S___??___]_S______\___S___G__________
  336. XM_________________________________________^/__O______'_______
  337. XM_____________\?___C___________________________]______\     #
  338. XM________________________________________W___________________
  339. XM___________________________________W_____________________?__
  340. XM^_____W_?__]___W__?___]__OY___?__]___W___?__\_______\7___]_W
  341. XM___>____]_W______]___W___G__________________________________
  342. XM_________________^/__W______'____________________\?___C_____
  343. XM______________________]X_____\     #________________________
  344. XM____________________________________________________________
  345. XM_________________________________?__^_____W_?__]___W__?___]_
  346. XM_G^?__?__]___W___O__]_______\7___\_W___N____]_W______]___W__
  347. XM_GX/__________________________________________________/__S__
  348. XM____G____________________\?___C___________________________]P
  349. XM?____\     #________________________________________________
  350. XM____________________________________________________________
  351. XM_________?__^_____W_?__]___W__?___]__C____?__]___W___O__]___
  352. XM____\7___\]W___Q____]_W______]___W___P '____________________
  353. XM____________________________Y_/__Q______G___________________
  354. XM_\?___C___________________________\ ?____\     #____________
  355. XM____________________________________________________________
  356. XM_____________________________________________?__^_____W_?__]
  357. XM_]_W__?___]__C____?__]___W_W_S__]_______\7___\=W________]_W_
  358. XM_____]___W___P #____________________________________________
  359. XM____R>?__Q_____X/____________________\?___A_________________
  360. XM__________\'?____\     #____________________________________
  361. XM____________________________________________________________
  362. XM_____________________O___?____G_O__^_S_[_^?___^__#____O__^__
  363. XM_[_/_\?_^_______\?___^#[________Y_[______^___[___X'[________
  364. XM________________________________________TH___A_____P?_______
  365. XM_____________\____C___________________________^/?____\     #
  366. XM____________________________________________________________
  367. XM_________________________________________________________S__
  368. XM_F____'_S___//_\_\?____/_'____S___/__\\______/______\O____#\
  369. XM________Q_\_______/__\_____[________________________________
  370. XM_________________1___C_____P_____________________]____G_____
  371. XM________________________?____\     #________________________
  372. XM____________________________________________________________
  373. XM_________________________________\___Y____O_\___P___/^_____S
  374. XM_/____\___S___#______S______]_____G_/_______[__/______S___/_
  375. XM_____________________________________________________G___G__
  376. XM___V_____________________[____O____________________________\
  377. X&_____\  
  378. X 
  379. Xend
  380. END_OF_FILE
  381. # end of 'font-32/Uoldeng22x30rI'
  382. fi
  383. if test -f 'src/cut.c' -a "${1}" != "-c" ; then 
  384.   echo shar: Will not clobber existing file \"'src/cut.c'\"
  385. else
  386. echo shar: Extracting \"'src/cut.c'\" \(10755 characters\)
  387. sed "s/^X//" >'src/cut.c' <<'END_OF_FILE'
  388. X/*                        Copyright (c) 1987 Bellcore
  389. X *                            All Rights Reserved
  390. X *       Permission is granted to copy or use this program, EXCEPT that it
  391. X *       may not be sold for profit, the copyright notice must be reproduced
  392. X *       on copies, and credit should be given to Bellcore where it is due.
  393. X *       BELLCORE MAKES NO WARRANTY AND ACCEPTS NO LIABILITY FOR THIS PROGRAM.
  394. X */
  395. X/*    $Header: cut.c,v 4.2 88/06/27 11:13:00 bianchi Exp $
  396. X    $Source: /tmp/mgrsrc/src/RCS/cut.c,v $
  397. X*/
  398. Xstatic char    RCSid_[] = "$Source: /tmp/mgrsrc/src/RCS/cut.c,v $$Revision: 4.2 $";
  399. X
  400. X/* cut and paste text */
  401. X
  402. X#include <stdio.h> 
  403. X#include "bitmap.h"
  404. X#include "defs.h"
  405. X#include "font.h"
  406. X#include "window.h"
  407. X#include "event.h"
  408. X
  409. X/* stuff global buffer into input stream */
  410. X
  411. Xint 
  412. Xpaste()
  413. X   {
  414. X   if (snarf) {
  415. X      do_event(EVENT_PASTE,active,E_MAIN);
  416. X      Write(ACTIVE(to_fd),snarf,strlen(snarf));
  417. X#ifdef DEBUG
  418. X      dprintf(y)(stderr,"%s: Pasting [%s]\n",ACTIVE(tty), snarf?snarf:"EMPTY");
  419. X#endif
  420. X      }
  421. X#ifdef DEBUG
  422. X   else {
  423. X      dprintf(y)(stderr,"%s: Nothing to paste\n",ACTIVE(tty));
  424. X      }
  425. X#endif
  426. X   }
  427. X
  428. X/* cut text from a window, put in global buffer */
  429. X
  430. X
  431. X#define MAXROWS        64        /* greatest char height */
  432. X#define MAXCOLS        32        /* widest char (bits in u-long) */
  433. X
  434. XBITMAP *glyph;                /* spot for glyph comparison */
  435. Xunsigned long data[MAXROWS];        /* bit data for glyph */
  436. XBITMAP *check;                /* other spot for glyph comparison */
  437. Xunsigned long data2[MAXROWS];        /* bit data for other glyph */
  438. X
  439. Xstatic struct entry **table;        /* hash table */
  440. X
  441. X/* sweep out and cut text */
  442. X
  443. Xint
  444. Xcut()
  445. X   {
  446. X   register int i,j;
  447. X   register WINDOW *win = active;        /* window to cut text from */
  448. X   int count;                    /* # of snarfed chars */
  449. X   int errors = 0;                /* number of misses */
  450. X   int cols=1, rows=0;                /* rows and cols swept */
  451. X   int col,row;                    /* starting col and row */
  452. X   int maxcol;                    /* # of cols in row */
  453. X   int x,y;                    /* bit position in bitmap */
  454. X   int hcode;                    /* hash code */
  455. X   int button;                    /* button from move_mouse */
  456. X   char c;                    /* matched char */
  457. X   char *pntr;                    /* current char in line */
  458. X   struct entry *entry;                /* current hash table entry */
  459. X   char *line;                    /* buffer to receive text */
  460. X   char get_match(),*malloc();
  461. X   char *to_tabs(), *fixline();
  462. X
  463. X   /* return immediately if window is not snarffable */
  464. X
  465. X   if (W(flags) & W_SNARFABLE ==0)
  466. X      return(0);
  467. X
  468. X   /* initialize comparison registers */
  469. X
  470. X   glyph = bit_alloc(32,FSIZE(high),data,1);
  471. X   check = bit_alloc(32,FSIZE(high),data2,1);
  472. X   bit_blit(check,0,0,32,FSIZE(high),BIT_CLR,NULL_DATA,0,0);
  473. X
  474. X   /* build hash table */
  475. X
  476. X   if ((table = W(font)->table) == NULL) {
  477. X#ifdef DEBUG
  478. X      dprintf(C)(stderr,"building cut table\n");
  479. X#endif
  480. X      table = W(font)->table =
  481. X                    (struct entry **) malloc (sizeof (struct entry) * H_SIZE);
  482. X      bzero(table, sizeof(struct entry) * H_SIZE);
  483. X   
  484. X      for(i = FSIZE(start);i<FSIZE(start)+FSIZE(count);i++) {
  485. X         if (W(font)->glyph[i] && i >= ' ') {
  486. X            hcode = get_hash(W(font)->glyph[i],0,0,FSIZE(wide),FSIZE(high),0);
  487. X            enter(hcode,i);
  488. X            }
  489. X         }
  490. X      }
  491. X
  492. X   /* find cut region */
  493. X
  494. X   SETMOUSEICON(&mouse_cut);
  495. X   button = move_mouse(screen,mouse,&mousex,&mousey,0);
  496. X   SETMOUSEICON(&mouse_arrow);
  497. X   i = get_text(screen,mouse,mousex,mousey,&cols,&rows,win,E_SWTEXTT);
  498. X   if (i == 0) {
  499. X      do_button(0);
  500. X      return(0);
  501. X   }
  502. X
  503. X   /* find extent of cut region */
  504. X
  505. X   col = (mousex-(W(x0)+SUM_BDR+W(text.x)))/FSIZE(wide);
  506. X   maxcol = (W(text.wide) ? W(text.wide) : BIT_WIDE(W(window)))/FSIZE(wide);
  507. X   row = (mousey-(W(y0)+SUM_BDR+W(text.y)))/FSIZE(high);
  508. X
  509. X   if (W(flags)&W_SNARFLINES) {        /* snarf lines only */
  510. X#ifdef DEBUG
  511. X      dprintf(C)(stderr,"Cutting lines only\n");
  512. X#endif
  513. X      col = 0;
  514. X      cols = maxcol;
  515. X      }
  516. X
  517. X#ifdef DEBUG
  518. X   dprintf(C)(stderr,"Cut got %d,%d  %d x %d\n",col,row,cols,rows);
  519. X#endif
  520. X
  521. X   /* look up characters */
  522. X
  523. X   pntr = line = malloc(1+(1+maxcol)*(rows+1));    /* max possible cut */
  524. X   switch(rows) {
  525. X      case 0:            /* 1 row */
  526. X         y = W(text.y)+row*FSIZE(high);
  527. X         for(x=W(text.x)+col*FSIZE(wide),i=0;i<cols;i++,x+=FSIZE(wide)) {
  528. X            c = get_match(W(window),x,y,FSIZE(wide),FSIZE(high));
  529. X            *pntr++ = c ? c : (errors++,C_NOCHAR);
  530. X            }
  531. X         if (col+cols == maxcol && c==' ')
  532. X            pntr = fixline(line,pntr);
  533. X         break;
  534. X      case 1:            /* 2 rows */
  535. X         y = W(text.y)+row*FSIZE(high);
  536. X         for(x=W(text.x)+col*FSIZE(wide),i=0;i<maxcol;i++,x+=FSIZE(wide)) {
  537. X            c = get_match(W(window),x,y,FSIZE(wide),FSIZE(high));
  538. X            *pntr++ = c ? c : (errors++,C_NOCHAR);
  539. X            }
  540. X         pntr = fixline(line,pntr);
  541. X
  542. X         y += FSIZE(high);
  543. X         for(x=W(text.x),i=0;i<col+cols;i++,x+=FSIZE(wide)) {
  544. X            c = get_match(W(window),x,y,FSIZE(wide),FSIZE(high));
  545. X            *pntr++ = c ? c : (errors++,C_NOCHAR);
  546. X            }
  547. X         if (col+cols == maxcol && c==' ')
  548. X            pntr = fixline(line,pntr);
  549. X         break;
  550. X
  551. X      default:            /* > 2 rows */
  552. X         y = W(text.y)+row*FSIZE(high);
  553. X         for(x=W(text.x)+col*FSIZE(wide),i=0;i<maxcol;i++,x+=FSIZE(wide)) {
  554. X            c = get_match(W(window),x,y,FSIZE(wide),FSIZE(high));
  555. X            *pntr++ = c ? c : (errors++,C_NOCHAR);
  556. X            }
  557. X         pntr = fixline(line,pntr);
  558. X
  559. X         for(j=0;j<rows-1;j++) {
  560. X            y += FSIZE(high);
  561. X            for(x=W(text.x),i=0;i<maxcol;i++,x+=FSIZE(wide)) {
  562. X               c = get_match(W(window),x,y,FSIZE(wide),FSIZE(high));
  563. X               *pntr++ = c ? c : (errors++,C_NOCHAR);
  564. X               }
  565. X            pntr = fixline(line,pntr);
  566. X            }
  567. X
  568. X         y += FSIZE(high);
  569. X         for(x=W(text.x),i=0;i<col+cols;i++,x+=FSIZE(wide)) {
  570. X            c = get_match(W(window),x,y,FSIZE(wide),FSIZE(high));
  571. X            *pntr++ = c ? c : (errors++,C_NOCHAR);
  572. X            }
  573. X         if (col+cols == maxcol && c==' ')
  574. X            pntr = fixline(line,pntr);
  575. X
  576. X         break;
  577. X      }
  578. X   *pntr = '\0';
  579. X   bit_destroy(check);
  580. X   bit_destroy(glyph);
  581. X
  582. X   /* put text into snarf buffer */
  583. X
  584. X   count = pntr-line;
  585. X#ifdef DEBUG
  586. X   dprintf(C)(stderr,"snarfed %d chars, %d errors\n",count,errors);
  587. X   dprintf(C)(stderr,"snarfed [%s]\n",line);
  588. X#endif
  589. X
  590. X   if (!(W(flags)&W_SNARFHARD)  && errors > 0 || 2*errors > count) {
  591. X      oops();
  592. X      count = 0;
  593. X      }
  594. X   else {
  595. X      if (W(flags)&W_SNARFTABS)
  596. X         to_tabs(col,line,line);
  597. X
  598. X      if (snarf && button < BUTTON_SYS) {            /* add to cut buffer */
  599. X         char *tmp = malloc(strlen(snarf) + strlen(line) +1);
  600. X         count += strlen(snarf);
  601. X         strcpy(tmp,snarf);
  602. X         strcat(tmp,line);
  603. X         free(snarf);
  604. X         free(line);
  605. X         snarf = tmp;
  606. X         }
  607. X      else if (snarf) {                    /* replace cut buffer */
  608. X         free(snarf);
  609. X         snarf = line;
  610. X         }
  611. X      else                        /* new cut buffer */
  612. X         snarf = line;
  613. X
  614. X      /* send snarf events (if any) */
  615. X      id_message = W(pid);
  616. X      for(win=active;win != (WINDOW *) 0;win=W(next))
  617. X         do_event(EVENT_SNARFED,win,E_MAIN);
  618. X      }
  619. X   do_button(0);
  620. X   return(count);
  621. X   }
  622. X
  623. X/* given bitmap, get hash code */
  624. X
  625. Xstatic int
  626. Xget_hash(map,x,y,w,h,how)
  627. XBITMAP *map;
  628. Xint x,y,w,h;        /* where in map */  
  629. Xint how;        /* 0-> normal, 1->inverted */
  630. X   {
  631. X   register unsigned long sum = 0;
  632. X   register int i,j;
  633. X   bit_blit(glyph,0,0,32,h,BIT_CLR,NULL_DATA,0,0);
  634. X   bit_blit(glyph,32-w,0,w,h,how ? BIT_NOT(BIT_SRC) : BIT_SRC,map,x,y);
  635. X         for (j=0;j<h;j++)
  636. X            sum += data[j]*(j+1);
  637. X   return(sum%H_SIZE);
  638. X   }
  639. X
  640. X/* enter a glyph into the hash table */
  641. X
  642. Xstatic int
  643. Xenter(item,value)
  644. Xint item;
  645. Xunsigned char value;
  646. X   {
  647. X   register struct entry *entry;
  648. X   char *malloc();
  649. X
  650. X   if (table[item] == (struct entry *) 0) {
  651. X      table[item] = (struct entry *) malloc(sizeof (struct entry));
  652. X      table[item] -> value = value;
  653. X      table[item] -> next = (struct entry *) 0;
  654. X      }
  655. X   else {
  656. X      for(entry = table[item];entry->next;entry = entry -> next);
  657. X      entry -> next  = (struct entry *) malloc(sizeof (struct entry));
  658. X      entry -> next -> value = value;
  659. X      entry -> next -> next = (struct entry *) 0;
  660. X      }
  661. X   }
  662. X
  663. X/* find a character match in current font */
  664. X
  665. Xstatic char
  666. Xget_match(map,x,y,w,h)
  667. XBITMAP *map;                /* bitmap containing text */
  668. Xint x,y,w,h;                /* position of glyph in "map" */
  669. X   {
  670. X   register struct entry *entry;
  671. X   register WINDOW *win = active;
  672. X   int code;                /* hash code */
  673. X   int size = sizeof(long) * h;
  674. X
  675. X   code = get_hash(map,x,y,w,h,0);        /* leaves char in glyph */
  676. X   for(entry=table[code];entry;entry=entry->next) {
  677. X      bit_blit(check,32-w,0,w,h,BIT_SRC,W(font)->glyph[entry->value],0,0);
  678. X      if (bcmp(data,data2,size)==0) {
  679. X         return(entry->value);
  680. X         }
  681. X      }
  682. X
  683. X   /* try inverse video version */
  684. X
  685. X   code = get_hash(map,x,y,w,h,1);        /* leaves char in glyph */
  686. X   for(entry=table[code];entry;entry=entry->next) {
  687. X      bit_blit(check,32-w,0,w,h,BIT_SRC,W(font)->glyph[entry->value],0,0);
  688. X      if (bcmp(data,data2,size)==0) {
  689. X         return(entry->value);
  690. X         }
  691. X      }
  692. X   return('\0');
  693. X   }
  694. X   
  695. X/* zap a font hash table */
  696. X
  697. Xzap_fhash(fnt)
  698. Xstruct font *fnt;
  699. X   {
  700. X   register struct entry *entry, *next;
  701. X   register int i;
  702. X
  703. X   if (fnt->table) {
  704. X      for(i=0;i<H_SIZE;i++)
  705. X         for(entry=table[i];entry;entry=next) {
  706. X            next = entry->next;
  707. X            free(entry);
  708. X            }
  709. X      free(fnt->table);
  710. X      }
  711. X   }
  712. X
  713. X/* change trailing white space into \n */
  714. X
  715. Xchar *
  716. Xfixline(s,pnt)
  717. Xchar *s;
  718. Xregister char *pnt;
  719. X   {
  720. X   while (*--pnt == ' ' && pnt > s);
  721. X   *++pnt = '\n';
  722. X   return(++pnt);
  723. X   }
  724. X
  725. X/* change spaces to tabs */
  726. X
  727. Xstatic char *
  728. Xto_tabs(pos,in,out)
  729. Xregister int pos;                /* starting col # */
  730. Xregister char *in;                /* input str */
  731. Xregister char *out;                /* output str - tabs */
  732. X   {
  733. X   char *s = out;                /* start of out str */
  734. X   register char c;                /* current input char */
  735. X   register int spaces = 0;            /* # pending spaces */
  736. X   
  737. X#ifdef DEBUG
  738. X   dprintf(C)(stderr,"-> TABS");
  739. X#endif
  740. X   while(pos++,c = *in++) {
  741. X
  742. X      if (c=='\n' || c=='\r' || c=='\f')    /* reset column counter */
  743. X         pos =0;
  744. X
  745. X      if (c == ' ') {
  746. X         spaces++;
  747. X         if (pos && pos%8 == 0) {        /* ' ' -> \t */
  748. X            c = '\t';
  749. X#ifdef DEBUG
  750. X            dprintf(C)(stderr,".");
  751. X#endif
  752. X            spaces=0;
  753. X            }
  754. X         }
  755. X      else for(;spaces>0;spaces--) {        /* output spaces */
  756. X         *out++ = ' ';
  757. X         }
  758. X         
  759. X      if (spaces == 0)
  760. X         *out++ = c;
  761. X      }
  762. X   *out = '\0';
  763. X#ifdef DEBUG
  764. X   dprintf(C)(stderr,"\n");
  765. X#endif
  766. X   return(s);
  767. X   }
  768. X
  769. X/* can't cut, ring bell */
  770. X
  771. Xstatic int
  772. Xoops()
  773. X   {
  774. X   register WINDOW *win = active;
  775. X
  776. X   CLEAR(W(window),BIT_NOT(BIT_DST));
  777. X   write(2,"\007",1);
  778. X   CLEAR(W(window),BIT_NOT(BIT_DST));
  779. X   }
  780. END_OF_FILE
  781. # end of 'src/cut.c'
  782. fi
  783. if test -f 'src/win_stack.c' -a "${1}" != "-c" ; then 
  784.   echo shar: Will not clobber existing file \"'src/win_stack.c'\"
  785. else
  786. echo shar: Extracting \"'src/win_stack.c'\" \(10948 characters\)
  787. sed "s/^X//" >'src/win_stack.c' <<'END_OF_FILE'
  788. X/*                        Copyright (c) 1987 Bellcore
  789. X *                            All Rights Reserved
  790. X *       Permission is granted to copy or use this program, EXCEPT that it
  791. X *       may not be sold for profit, the copyright notice must be reproduced
  792. X *       on copies, and credit should be given to Bellcore where it is due.
  793. X *       BELLCORE MAKES NO WARRANTY AND ACCEPTS NO LIABILITY FOR THIS PROGRAM.
  794. X */
  795. X/*    $Header: win_stack.c,v 4.2 88/07/20 10:22:55 sau Exp $
  796. X    $Source: /tmp/mgrsrc/src/RCS/win_stack.c,v $
  797. X*/
  798. Xstatic char    RCSid_[] = "$Source: /tmp/mgrsrc/src/RCS/win_stack.c,v $$Revision: 4.2 $";
  799. X
  800. X/* push - pop window environment */
  801. X
  802. X#include "bitmap.h"
  803. X#include "font.h"
  804. X#include "defs.h"
  805. X#include "window.h"
  806. X#include "menu.h"
  807. X#include "event.h"
  808. X#include <stdio.h>
  809. X
  810. X#define S(x)    (stack->x)
  811. X
  812. X/* push a window on the environment stack */
  813. X
  814. Xint
  815. Xwin_push(win,level)
  816. Xregister WINDOW *win;        /* window to push */
  817. Xint level;            /* what things to push */
  818. X   {
  819. X   register WINDOW *stack;    /* pushed window goes here */
  820. X   register int i,j;
  821. X   char *malloc(), *save_line(), *print_stack();
  822. X   struct menu_state *menu_copy();
  823. X
  824. X   if ((stack = (WINDOW *) malloc(sizeof(WINDOW))) == (WINDOW *) 0)
  825. X      return(-1);
  826. X    
  827. X   if (level == 0)
  828. X      level = P_DEFAULT;
  829. X
  830. X#ifdef DEBUG
  831. X   dprintf(P)(stderr,"%s Stacking %s\n",
  832. X                   W(tty),print_stack(level));
  833. X#endif
  834. X
  835. X   /* setup stacked window */
  836. X
  837. X   *stack = *win;    /* structure assignment */
  838. X   W(stack) = stack;
  839. X
  840. X   /* bcopy(win,stack,sizeof(WINDOW)); */
  841. X
  842. X   for(j=0;j<MAXMENU;j++)
  843. X      S(menus)[j] = (struct menu_state *) 0;
  844. X   for(j=0;j<MAXEVENTS;j++)
  845. X      S(events)[j] = (char *) 0;
  846. X   for(j=0;j<MAXBITMAPS;j++)
  847. X      S(bitmaps)[j] = (BITMAP *) 0;
  848. X   S(save) = (BITMAP *) 0;
  849. X   S(clip_list) = (char *) 0;
  850. X
  851. X   /* setup each pushed item */
  852. X
  853. X   for(i=1;i!=P_MAX;i <<= 1)
  854. X      switch (level&i) {
  855. X         case P_MENU:        /* save the menus */
  856. X#ifdef DEBUG
  857. X              dprintf(P)(stderr,"  menus ");
  858. X#endif
  859. X              for(j=0;j<MAXMENU;j++)
  860. X                 if (W(menus)[j] && (level&P_CLEAR)) {
  861. X                    S(menus)[j] = W(menus)[j]; 
  862. X                    W(menus)[j] = (struct menu_state *) 0;
  863. X#ifdef DEBUG
  864. X                    dprintf(P)(stderr,"%d ",j);
  865. X#endif
  866. X                    }
  867. X                 else if (W(menus)[j]) {
  868. X                    S(menus)[j] = menu_copy(W(menus)[j]); 
  869. X#ifdef DEBUG
  870. X                    dprintf(P)(stderr,"%d ",j);
  871. X#endif
  872. X                    }
  873. X#ifdef DEBUG
  874. X              dprintf(P)(stderr,"\n");
  875. X#endif
  876. X              break;
  877. X         case P_EVENT:        /* save the events */
  878. X
  879. X#ifdef DEBUG
  880. X              dprintf(P)(stderr,"  events ");
  881. X#endif
  882. X              if (IS_EVENT(win,EVENT_STACK))
  883. X                 EVENT_SET_MASK(win,EVENT_STFLAG);
  884. X
  885. X              if (level&P_CLEAR) 
  886. X                 W(event_mask) = IS_EVENT(win,EVENT_STFLAG);
  887. X              else
  888. X                 EVENT_CLEAR_MASK(win,EVENT_STACK);
  889. X
  890. X              for(j=0;j<MAXEVENTS;j++)
  891. X                 if (W(events)[j] && (level&P_CLEAR)) {
  892. X                    S(events)[j] = W(events)[j]; 
  893. X                    W(events)[j] = (char *) 0;
  894. X#ifdef DEBUG
  895. X                    dprintf(P)(stderr,"%d ",j);
  896. X#endif
  897. X                    }
  898. X                 else if (W(events)[j]) {
  899. X                    S(events)[j] = save_line(W(events)[j]); 
  900. X#ifdef DEBUG
  901. X                    dprintf(P)(stderr,"%d ",j);
  902. X#endif
  903. X                    }
  904. X#ifdef DEBUG
  905. X              dprintf(P)(stderr,"\n");
  906. X                        
  907. X#endif
  908. X              break;
  909. X         case P_BITMAP:        /* save the bitmaps */
  910. X#ifdef DEBUG
  911. X              dprintf(P)(stderr,"  bitmaps ");
  912. X#endif
  913. X              for(j=0;j<MAXBITMAPS;j++)
  914. X                 if (W(bitmaps)[j] && level&P_CLEAR) {
  915. X                    S(bitmaps)[j] = W(bitmaps)[j];
  916. X                    W(bitmaps)[j] = (BITMAP *) 0;
  917. X#ifdef DEBUG
  918. X                    dprintf(P)(stderr,"%d ",j);
  919. X#endif
  920. X                    }
  921. X                 else if (W(bitmaps)[j]) {
  922. X                    S(bitmaps)[j] = bit_alloc(BIT_WIDE(W(bitmaps)[j]),
  923. X                                       BIT_HIGH(W(bitmaps)[j]),NULL_DATA,
  924. X                                       BIT_DEPTH(W(bitmaps)[j]));
  925. X                    bit_blit(S(bitmaps)[j],0,0,BIT_WIDE(W(bitmaps)[j]),
  926. X                             BIT_HIGH(W(bitmaps)[j]),BIT_SRC,W(bitmaps)[j],0,0);
  927. X#ifdef DEBUG
  928. X                    dprintf(P)(stderr,"%d ",j);
  929. X#endif
  930. X                    }
  931. X#ifdef DEBUG
  932. X              dprintf(P)(stderr,"\n");
  933. X#endif
  934. X              break;
  935. X         case P_WINDOW:        /* save the bit image */
  936. X#ifdef DEBUG
  937. X              dprintf(P)(stderr,"  window\n");
  938. X#endif
  939. X              S(save) = bit_alloc(BIT_WIDE(W(border)),BIT_HIGH(W(border)),
  940. X                                  NULL_DATA,DEPTH);
  941. X              if (W(save) && !(W(flags)&W_ACTIVE))
  942. X                 bit_blit(S(save),0,0,BIT_WIDE(W(save)),BIT_HIGH(W(save)),
  943. X                          BIT_SRC,W(save),0,0);
  944. X              else
  945. X                 bit_blit(S(save),0,0,BIT_WIDE(W(border)),BIT_HIGH(W(border)),
  946. X                          BIT_SRC,W(border),0,0);
  947. X              break;
  948. X         case P_POSITION:    /* save the window position */
  949. X#ifdef DEBUG
  950. X              dprintf(P)(stderr,"  position\n");
  951. X#endif
  952. X              S(esc)[1] = BIT_WIDE(W(border));
  953. X              S(esc)[2] = BIT_HIGH(W(border));
  954. X              break;
  955. X         case P_TEXT:        /* save text region */
  956. X              if (level&P_CLEAR) {
  957. X                 W(text).x = 0;
  958. X                 W(text).y = 0;
  959. X                 W(text).wide = 0;
  960. X                 W(text).high = 0;
  961. X                 }
  962. X              break;
  963. X         case P_MOUSE:        /* save mouse position */
  964. X#ifdef DEBUG
  965. X              dprintf(P)(stderr,"  mouse\n");
  966. X#endif
  967. X              S(esc)[3] = mousex;
  968. X              S(esc)[4] = mousey;
  969. X              break;
  970. X         case P_FLAGS:        /* save window flags  */
  971. X              if (level&P_CLEAR) {
  972. X                 W(flags)  &= ~W_SAVE;
  973. X                 W(flags)  |= W_BACKGROUND;
  974. X                 W(style) = NOCOLOR&BIT_SRC | GETCOLOR(BLACK);
  975. X                 W(background) = NOCOLOR&W(background) | GETCOLOR(WHITE);
  976. X                 if (win == active)
  977. X                    border(win,SUM_BDR-1,1);
  978. X                 else
  979. X                    border(win,BLK_BDR,WH_BDR);
  980. X                 }
  981. X              break;
  982. X         }
  983. X
  984. X   S(code) = level;
  985. X   S(window) = (BITMAP *) 0;
  986. X   S(border) = (BITMAP *) 0;
  987. X   S(snarf) = (char *) 0;
  988. X   S(bitmap) = (BITMAP *) 0;
  989. X   return(level);
  990. X   }
  991. X
  992. X/* pop the window stack */
  993. X
  994. Xint
  995. Xwin_pop(win)
  996. XWINDOW *win;                /* window to pop to */
  997. X   {
  998. X   register int i,j;
  999. X   register WINDOW *stack = W(stack);    /* window to pop from */
  1000. X   char *print_stack();
  1001. X
  1002. X   if (stack == (WINDOW *) 0) {
  1003. X#ifdef DEBUG
  1004. X      dprintf(P)(stderr,"  No environment to pop\n");
  1005. X#endif
  1006. X      return(-1);
  1007. X      }
  1008. X
  1009. X#ifdef DEBUG
  1010. X   dprintf(P)(stderr,"%s popping %s\n",W(tty),print_stack(S(code)));
  1011. X#endif
  1012. X
  1013. X   /* pop each item stacked */
  1014. X
  1015. X   for(i=1;i!=P_MAX;i <<= 1)
  1016. X      switch (S(code)&i) {
  1017. X         case P_MENU:        /* restore the menus */
  1018. X#ifdef DEBUG
  1019. X              dprintf(P)(stderr,"  menus ");
  1020. X#endif
  1021. X              W(menu[0]) = S(menu[0]);
  1022. X              W(menu[1]) = S(menu[1]);
  1023. X              for(j=0;j<MAXMENU;j++) {
  1024. X                 if (W(menus)[j]) {
  1025. X#ifdef DEBUG
  1026. X                    dprintf(P)(stderr,"d(%d) ",j);
  1027. X#endif
  1028. X                    menu_destroy(W(menus)[j]);
  1029. X                    }
  1030. X                 if (S(menus)[j]) {
  1031. X#ifdef DEBUG
  1032. X                    dprintf(P)(stderr,"r(%d) ",j);
  1033. X#endif
  1034. X                    W(menus)[j] = S(menus)[j];
  1035. X                    S(menus)[j] = (struct menu_state *) 0;
  1036. X                    }
  1037. X                 else
  1038. X                    W(menus)[j] = (struct menu_state *) 0;
  1039. X                 }
  1040. X#ifdef DEBUG
  1041. X              dprintf(P)(stderr,"\n");
  1042. X#endif
  1043. X              break;
  1044. X         case P_EVENT:        /* restore the events */
  1045. X
  1046. X#ifdef DEBUG
  1047. X              dprintf(P)(stderr,"  events ");
  1048. X#endif
  1049. X              for(j=0;j<MAXEVENTS;j++) {
  1050. X                 if (W(events)[j]) {
  1051. X#ifdef DEBUG
  1052. X                    dprintf(P)(stderr,"d(%d) ",j);
  1053. X#endif
  1054. X                    free(W(events)[j]);
  1055. X                    }
  1056. X                 W(events)[j] = S(events)[j];
  1057. X                 S(events)[j] = (char *) 0;
  1058. X                 }
  1059. X              W(event_mask) = S(event_mask);
  1060. X#ifdef DEBUG
  1061. X              dprintf(P)(stderr,"\n");
  1062. X#endif
  1063. X              break;
  1064. X         case P_CURSOR:        /* restore the cursor position */
  1065. X              W(x) = S(x);
  1066. X              W(y) = S(y);
  1067. X              W(gx) = S(gx);
  1068. X              W(gy) = S(gy);
  1069. X              break;
  1070. X         case P_BITMAP:        /* restore the bitmaps */
  1071. X              for(j=0;j<MAXBITMAPS;j++) {
  1072. X                 if (W(bitmaps)[j])
  1073. X                    bit_destroy(W(bitmaps)[j]);
  1074. X                 W(bitmaps)[j] = S(bitmaps)[j];
  1075. X                 S(bitmaps)[j] = (BITMAP *) 0;
  1076. X                 }
  1077. X#ifdef DEBUG
  1078. X              dprintf(P)(stderr,"  bitmaps\n");
  1079. X#endif
  1080. X              break;
  1081. X         case P_FONT:        /* restore font */
  1082. X              W(font) = S(font);
  1083. X              break;
  1084. X         case P_TEXT:        /* restore text region */
  1085. X              W(text) = S(text);
  1086. X              break;
  1087. X         case P_POSITION:    /* restore the window position */
  1088. X              if (win!= active)
  1089. X                 cursor_off();
  1090. X              ACTIVE_OFF();
  1091. X              expose(win);
  1092. X
  1093. X              shape(S(x0),S(y0),S(esc)[1],S(esc)[2]);
  1094. X
  1095. X              ACTIVE_ON();
  1096. X#ifdef DEBUG
  1097. X              dprintf(P)(stderr,"  position\n");
  1098. X#endif
  1099. X              break;
  1100. X         case P_WINDOW:        /* restore the window contents */
  1101. X              if (W(save))
  1102. X                 bit_destroy(W(save));
  1103. X              W(save) = bit_alloc(BIT_WIDE(W(border)),BIT_HIGH(W(border)),
  1104. X                                  NULL_DATA,DEPTH);
  1105. X              bit_blit(W(border),0,0,BIT_WIDE(S(save)),BIT_HIGH(S(save)),
  1106. X                       BIT_SRC,S(save),0,0);
  1107. X#ifdef DEBUG
  1108. X              dprintf(P)(stderr,"  window\n");
  1109. X#endif
  1110. X              break;
  1111. X         case P_FLAGS:        /* restore the window flags */
  1112. X              W(op) = S(op);
  1113. X              W(style) = S(style);
  1114. X              W(background) = S(background);
  1115. X              W(dup) = S(dup);
  1116. X              W(flags) = (S(flags)&W_SAVE) | (W(flags)&(~W_SAVE));
  1117. X              if (win == active)
  1118. X                 border(win,SUM_BDR-1,1);
  1119. X              else
  1120. X                 border(win,BLK_BDR,WH_BDR);
  1121. X#ifdef DEBUG
  1122. X              dprintf(P)(stderr,"  flags\n");
  1123. X#endif
  1124. X              break;
  1125. X         case P_MOUSE:        /* save mouse position */
  1126. X#ifdef DEBUG
  1127. X              dprintf(P)(stderr,"  mouse\n");
  1128. X#endif
  1129. X              mousex =S(esc)[3] ;
  1130. X              mousey =S(esc)[4] ;
  1131. X              break;
  1132. X         }
  1133. X#ifdef DEBUG
  1134. X   dprintf(P)(stderr,"%s\n",S(stack)?"another stack":"no environments stacked");
  1135. X#endif
  1136. X   W(stack) = S(stack);
  1137. X   unlink_win(stack,0);
  1138. X
  1139. X   return(0);
  1140. X   }
  1141. X
  1142. X/* in-implemented window stack manipulation */
  1143. X
  1144. Xwin_swap(win,x,y)
  1145. XWINDOW *win;
  1146. Xint x,y;        /* entries on stack to swap  1=1st stack entry */
  1147. X   {
  1148. X   register int i,j;
  1149. X   WINDOW *winx, *winy;
  1150. X   }
  1151. END_OF_FILE
  1152. # end of 'src/win_stack.c'
  1153. fi
  1154. echo shar: End of archive 33 \(of 61\).
  1155. cp /dev/null ark33isdone
  1156. MISSING=""
  1157. for I in 1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20 \
  1158.     21 22 23 24 25 26 27 28 29 30 31 32 33 34 35 36 37 \
  1159.     38 39 40 41 42 43 44 45 46 47 48 49 50 51 52 53 54 \
  1160.     55 56 57 58 59 60 61 ; do
  1161.     if test ! -f ark${I}isdone ; then
  1162.     MISSING="${MISSING} ${I}"
  1163.     fi
  1164. done
  1165. if test "${MISSING}" = "" ; then
  1166.     echo You have unpacked all 61 archives.
  1167.     rm -f ark[1-9]isdone ark[1-9][0-9]isdone
  1168. else
  1169.     echo You still need to unpack the following archives:
  1170.     echo "        " ${MISSING}
  1171. fi
  1172. ##  End of shell archive.
  1173. exit 0
  1174.