#include <tcl.h>
#include <tk.h>
#include <sadie.h>
#include <string.h>
#include "tclsadie.h"
#include "Sadie_Index.h"
Go to the source code of this file.
Defines | |
#define | MAX_DISPLAY_CHANNEL 3 |
The number of bands to include in pixel value displays. | |
Functions | |
int | Sadie_General_CloseCmd (ClientData client_data, Tcl_Interp *interp, int objc, Tcl_Obj *const objv[]) |
Dispose of an image and all its associated metadata such as ROIs. | |
int | Sadie_General_InitializeProgCmd (ClientData client_data, Tcl_Interp *interp, int objc, Tcl_Obj *const objv[]) |
SADIE library initialization. | |
int | Sadie_General_FinishProgCmd (ClientData client_data, Tcl_Interp *interp, int objc, Tcl_Obj *const objv[]) |
SADIE library termination. | |
int | Sadie_General_WidthCmd (ClientData client_data, Tcl_Interp *interp, int objc, Tcl_Obj *const objv[]) |
Pass the recorded width of a SADIE image to Tcl. | |
int | Sadie_General_HeightCmd (ClientData client_data, Tcl_Interp *interp, int objc, Tcl_Obj *const objv[]) |
Pass the recorded height of a SADIE image to Tcl. | |
int | Sadie_General_GminCmd (ClientData client_data, Tcl_Interp *interp, int objc, Tcl_Obj *const objv[]) |
Pass the newly determined minimum SADIE image pixel value to Tcl. | |
int | Sadie_General_GmaxCmd (ClientData client_data, Tcl_Interp *interp, int objc, Tcl_Obj *const objv[]) |
Pass the newly determined minimum SADIE image pixel value to Tcl. | |
int | Sadie_General_GetNumBandsCmd (ClientData client_data, Tcl_Interp *interp, int objc, Tcl_Obj *const objv[]) |
Pass the recorded number of bands in a SADIE image to Tcl. | |
int | Sadie_General_GetPixelCmd (ClientData client_data, Tcl_Interp *interp, int objc, Tcl_Obj *const objv[]) |
Make a Tcl list from the values of a sub-set of bands at a single point. | |
int | Sadie_General_SetNameCmd (ClientData client_data, Tcl_Interp *interp, int objc, Tcl_Obj *const objv[]) |
Set the SADIE image text from a Tcl string value. | |
int | Sadie_General_IndexImageCmd (ClientData client_data, Tcl_Interp *interp, int objc, Tcl_Obj *const objv[]) |
Register a SADIE image within the global hash table. | |
int | Sadie_General_Init (Tcl_Interp *interp) |
Make the commands defined in this file accessible to the Tcl interpreter. | |
Variables | |
sad_doclistp_t | global_doclist |
The global hash table structures, associating images and their metadata. |
A miscellaneous collection of Tcl/Tk interfaces to SADIE image data (recovering and setting image attributes, disposing of images), and to the housekeeping operations needed by the SADIE library in the context of the whole application (initialization and finalization).
Definition in file Sadie_General.c.
|
Dispose of an image and all its associated metadata such as ROIs. We delete the image's entry from the global hash table, leaving this operation to invoke the usual SADIE library image cleanup function, RELIMG.
Definition at line 54 of file Sadie_General.c. References sad_dispose_doc(). Referenced by Sadie_General_Init(). |
|
SADIE library termination. Invoke the operation to terminate the SADIE library from Tcl code.
Definition at line 93 of file Sadie_General.c. Referenced by Sadie_General_Init(). |
|
Pass the recorded number of bands in a SADIE image to Tcl. We recover the number of bands per image from the SADIE image, and assign this to the Tcl interpreter result object (as a long value).
Definition at line 245 of file Sadie_General.c. References GetSadieImageFromObj(). Referenced by Sadie_General_Init(). |
|
Make a Tcl list from the values of a sub-set of bands at a single point.
Given a particular position (pixel position within a line and line number), find the values for a sub-set of bands, of size
Definition at line 292 of file Sadie_General.c. References GetSadieImageFromObj(), GetSadieUintFromObj(), and MAX_DISPLAY_CHANNEL. Referenced by Sadie_General_Init(). |
|
Pass the newly determined minimum SADIE image pixel value to Tcl. We determine the image-wide minimum pixel value in the SADIE image, and assign this to the Tcl interpreter result object (as a double value).
Definition at line 211 of file Sadie_General.c. References GetSadieImageFromObj(). Referenced by Sadie_General_Init(). |
|
Pass the newly determined minimum SADIE image pixel value to Tcl. We determine the image-wide minimum pixel value in the SADIE image, and assign this to the Tcl interpreter result object (as a double value).
Definition at line 177 of file Sadie_General.c. References GetSadieImageFromObj(). Referenced by Sadie_General_Init(). |
|
Pass the recorded height of a SADIE image to Tcl. We recover the number of lines per band from the SADIE image, and assign this to the Tcl interpreter result object (as a long value).
Definition at line 144 of file Sadie_General.c. References GetSadieImageFromObj(). Referenced by Sadie_General_Init(). |
|
Register a SADIE image within the global hash table. We insert a new entry in the global hash table, representing the image and a table of additional properties (initially blank).
Definition at line 392 of file Sadie_General.c. References GetSadieDkeyFromObj(), GetSadieImageFromObj(), and sad_put_doc(). Referenced by Sadie_General_Init(). |
|
Make the commands defined in this file accessible to the Tcl interpreter.
Definition at line 433 of file Sadie_General.c. References Sadie_General_CloseCmd(), Sadie_General_FinishProgCmd(), Sadie_General_GetNumBandsCmd(), Sadie_General_GetPixelCmd(), Sadie_General_GmaxCmd(), Sadie_General_GminCmd(), Sadie_General_HeightCmd(), Sadie_General_IndexImageCmd(), Sadie_General_InitializeProgCmd(), Sadie_General_SetNameCmd(), and Sadie_General_WidthCmd(). Referenced by Tcl_AppInit(). |
|
SADIE library initialization. Invoke the operation to initialize the SADIE library from Tcl code.
Definition at line 76 of file Sadie_General.c. Referenced by Sadie_General_Init(). |
|
Set the SADIE image text from a Tcl string value. Replace the text in a SADIE image structure with new text taken from a Tcl string value, truncating it if it is too long. The Tcl object arguments required are passed in an array with the following arrangement:
Definition at line 359 of file Sadie_General.c. References GetSadieImageFromObj(). Referenced by Sadie_General_Init(). |
|
Pass the recorded width of a SADIE image to Tcl. We recover the number of pixels per line from the SADIE image, and assign this to the Tcl interpreter result object (as a long value).
Definition at line 111 of file Sadie_General.c. References GetSadieImageFromObj(). Referenced by Sadie_General_Init(). |