landinternal.h

Go to the documentation of this file.
00001 
00002 /*  $Id: landinternal.h 355 2005-01-11 22:48:55Z andreradke $    */
00003 
00004 /******************************************************************************
00005 
00006     UserLand Frontier(tm) -- High performance Web content management,
00007     object database, system-level and Internet scripting environment,
00008     including source code editing and debugging.
00009 
00010     Copyright (C) 1992-2004 UserLand Software, Inc.
00011 
00012     This program is free software; you can redistribute it and/or modify
00013     it under the terms of the GNU General Public License as published by
00014     the Free Software Foundation; either version 2 of the License, or
00015     (at your option) any later version.
00016 
00017     This program is distributed in the hope that it will be useful,
00018     but WITHOUT ANY WARRANTY; without even the implied warranty of
00019     MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
00020     GNU General Public License for more details.
00021 
00022     You should have received a copy of the GNU General Public License
00023     along with this program; if not, write to the Free Software
00024     Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA  02111-1307  USA
00025 
00026 ******************************************************************************/
00027 
00028 #ifndef landinclude
00029 
00030     #include <land.h>
00031     
00032 #endif
00033 
00034 
00035 #define fljustfrontier
00036 
00037 #ifndef standardinclude
00038 
00039     #include <standard.h>
00040  
00041 #endif
00042  
00043 #ifndef standardinclude
00044  
00045     #ifdef fldebug
00046 
00047         short __assert(char *, char *, short);
00048         #define assert(x)   ((void) ((x) ? 0 : __assert(#x, __FILE__, __LINE__)))
00049 
00050     #else
00051 
00052         #define assert(x)   ((void) 0)
00053 
00054     #endif
00055 
00056 
00057     #define true 1
00058 
00059     #define false 0
00060 
00061     #define shortinfinity 32767
00062 
00063     #define shortminusinfinity -32768
00064 
00065     #define longinfinity (long)0x7FFFFFFF
00066 
00067     #define stringlength(bs) ((bs)[0])
00068 
00069     #define setstringlength(bs,len) (bs[0]=(char)len)
00070 
00071     #define setemptystring(bs) (setstringlength(bs,0))
00072 
00073     #define bitboolean(fl) ((fl)?true:false)
00074 
00075     #define longsizeof(x) (long)sizeof(x)
00076 
00077     #define lenbigstring 255
00078 
00079     #define bigstring Str255
00080        
00081     #define boolean Boolean 
00082 
00083     typedef unsigned char byte, *ptrbyte;   
00084 
00085 
00086     #ifdef MPWC
00087         #define quickdrawglobal(x) qd.x
00088     #endif
00089     
00090     //Code change by Timothy Paustian Sunday, May 7, 2000 11:28:10 PM
00091     //Changed to Opaque call for Carbon
00092     #ifdef TARGET_CARBON
00093         #define quickdrawglobal(x)  GetQDGlobalsThePort()
00094         //the rest will have to be ifdef out.
00095     #endif
00096     #ifdef THINKC
00097 
00098         #define quickdrawglobal(x) x
00099 
00100     #endif
00101 
00102 
00103     typedef void *ptrvoid;
00104 
00105 #endif
00106 
00107     #define idnull 0L /*a message sent to no one*/
00108 
00109     #define idnet -1L /*a message sent across the network*/
00110 
00111     #define nullclass 0L /*don't-care value for class*/
00112 
00113     #define nulltoken 0L /*a token no one handles*/
00114 
00115     #define returntoken 0L /*null token used to flag return verb*/
00116 
00117 /*prototypes*/
00118 
00119 extern pascal hdllandglobals landgetlandglobals (void);
00120 
00121 extern pascal void landsetlandglobals (hdllandglobals);
00122 
00123 extern pascal boolean landmenuscriptcompleted (void);
00124 
00125 
00126 //extern landdisposeallparams (hdlverbrecord); /*land.c*/
00127 
00128 extern boolean landhandleverb (hdlverbrecord);
00129 
00130 
00131 
00132 extern boolean landpushqueue (Handle); /*landqueue.c*/
00133 
00134 extern boolean landpopqueue (Handle *);
00135 
00136 extern boolean landpopqueueitem (landqueuepopcallback, long, Handle *);
00137 
00138 extern boolean landemptyqueue (void);
00139 
00140 
00141 extern boolean landsendreturnvalues (hdlverbrecord); /*landreturn.c*/
00142 
00143 
00144 extern boolean landsystem6apprunning (tyapplicationid); /*landsystem6.c*/
00145 
00146 extern boolean landsystem6newverb (hdlverbrecord);
00147 
00148 extern boolean landsystem6send (hdlverbrecord, hdlverbrecord *);
00149 
00150 extern boolean landsystem6returnmultiple (hdlverbrecord);
00151 
00152 extern boolean landsystem6eventfilter (EventRecord *);
00153 
00154 extern boolean landsystem6close (void);
00155 
00156 extern boolean landsystem6init (void);
00157 
00158 extern boolean landsystem6setapplicationid (tyapplicationid);
00159 
00160 
00161 extern boolean landsystem7apprunning (tyapplicationid); /*landsystem7.c*/
00162 
00163 extern boolean landsystem7newverb (hdlverbrecord, ProcessSerialNumber *);
00164 
00165 extern boolean landsystem7newnetworkverb (hdlverbrecord, tynetworkaddress *);
00166 
00167 extern boolean landsystem7send (hdlverbrecord, hdlverbrecord *);
00168 
00169 extern boolean landsystem7returnmultiple (hdlverbrecord);
00170 
00171 extern boolean landsystem7eventfilter (EventRecord *);
00172 
00173 extern boolean landsystem7close (void);
00174 
00175 extern boolean landsystem7addclass (tyverbclass);
00176 
00177 extern boolean landsystem7addfastverb (tyverbclass, tyverbtoken);
00178 
00179 extern boolean landsystem7acceptanyverb (void);
00180 
00181 extern void landsystem7disposeverb (hdlverbrecord);
00182 
00183 extern boolean landsystem7init (void);
00184 
00185 
00186 extern boolean landbreakembrace (EventRecord *); /*landops.c*/
00187     
00188 extern boolean landscalartype (typaramtype);
00189 
00190 extern boolean landdescparamtype (typaramtype);
00191 
00192 extern boolean landgetappcreator (OSType *);
00193 
00194 #ifndef fljustfrontier
00195 
00196     extern boolean landlockhandle (Handle);
00197     
00198     extern boolean landunlockhandle (Handle);
00199     
00200     extern landmoveleft (void *, void *, long); 
00201     
00202     extern landclearbytes (void *, long);
00203     
00204     extern land4bytestostring (long, bigstring);
00205     
00206     extern landsetcursortype (short);
00207     
00208     extern landcopystring (bigstring, bigstring);
00209     
00210     extern landcopyheapstring (hdlbigstring, bigstring);
00211     
00212     extern boolean landpushstring (bigstring, bigstring);
00213     
00214     extern boolean landpushlong (long, bigstring);
00215     
00216     extern boolean landequalstrings (bigstring, bigstring);
00217     
00218     extern boolean landnewfilledhandle (void *, long, Handle *);
00219     
00220     extern landdisposehandle (Handle);
00221     
00222     extern hdlbigstring landnewstring (bigstring);
00223     
00224     extern boolean landenlargehandle (Handle, long, void *);
00225     
00226     extern boolean landshrinkhandle (Handle, long);
00227     
00228     extern boolean landloadfromhandle (Handle, long *, long, void *);
00229     
00230     extern boolean landloadfromhandletohandle (Handle, long *, long, Handle *);
00231     
00232     extern boolean landcopyhandle (Handle, Handle *);
00233     
00234     extern boolean landnewclearhandle (long, Handle *);
00235     
00236     extern long landgethandlesize (Handle);
00237     
00238     extern boolean landnewemptyhandle (Handle *);
00239     
00240     extern boolean landsurrenderprocessor (EventRecord *);
00241 
00242 #else
00243 
00244     #include "memory.h"
00245     #include "strings.h"
00246     
00247     #define landlockhandle(x)           lockhandle (x)
00248     
00249     #define landunlockhandle(x)         unlockhandle (x)
00250     
00251     #define landmoveleft(p1, p2, n)     moveleft (p1, p2, n)
00252     
00253     #define landclearbytes(p1, n)       clearbytes (p1, n)
00254     
00255     #define land4bytestostring(l, s)    ostypetostring((OSType) l, s)
00256     
00257     #define landcopystring(s1, s2)      copystring (s1, s2)
00258     
00259     #define landcopyheapstring(h, s)    copyheapstring (h, s)
00260     
00261     #define landpushstring(s1, s2)      pushstring (s1, s2)
00262     
00263     #define landpushlong(l, s)          pushlong (l, s)
00264     
00265     #define landequalstrings(s1, s2)    equalstrings (s1, s2)
00266     
00267     #define landnewfilledhandle(p, n, x)    newfilledhandle (p, n, x)
00268     
00269     #define landdisposehandle(x)        disposehandle (x)
00270     
00271     #define landenlargehandle(x, n, p)  enlargehandle(x, n, p)
00272     
00273     #define landloadfromhandle(x, ix, ct, p)    loadfromhandle(x, ix, ct, p)
00274     
00275     #define landloadfromhandletohandle(x, ix, ct, h)    loadfromhandletohandle(x, ix, ct, h)
00276     
00277     #define landcopyhandle(x, h)        copyhandle (x, h)
00278     
00279     #define landnewclearhandle(n, x)    newclearhandle(n, x)
00280     
00281     #define landgethandlesize(x)        gethandlesize(x)
00282     
00283     #define landnewemptyhandle(x)       newemptyhandle(x)
00284 
00285 #endif
00286 
00287 
00288 extern boolean landverbsupported (tyverbclass, tyverbtoken); /*landverbarray.c*/
00289 
00290 
00291 extern boolean landsetstatsinfo (hdlverbrecord, boolean); /*landwindow.c*/
00292 
00293 extern boolean landstatswindowisopen (void);
00294 
00295 // extern landsetmemstats (void);
00296 
00297 extern boolean landwindoweventfilter (EventRecord *);
00298 
00299 

Generated on Wed May 31 18:19:50 2006 for frontierkernel 10.1.10a by  doxygen 1.4.6