package gammu

  1. Overview
  2. Docs
Legend:
Library
Module
Module type
Parameter
Class
Class type
type state =
  1. | Sent
  2. | Unsent
  3. | Read
  4. | Unread
type udh =
  1. | No_udh
  2. | ConcatenatedMessages
  3. | ConcatenatedMessages16bit
  4. | DisableVoice
  5. | DisableFax
  6. | DisableEmail
  7. | EnableVoice
  8. | EnableFax
  9. | EnableEmail
  10. | VoidSMS
  11. | NokiaRingtone
  12. | NokiaRingtoneLong
  13. | NokiaOperatorLogoLong
  14. | NokiaWAP
  15. | NokiaWAPLong
  16. | NokiaCalendarLong
  17. | NokiaProfileLong
  18. | NokiaPhonebookLong
  19. | UserUDH
  20. | MMSIndicatorLong
type udh_header = {
  1. udh : udh;
  2. udh_text : string;
  3. id8bit : int;
  4. id16bit : int;
  5. part_number : int;
  6. all_parts : int;
}
type format =
  1. | Pager
  2. | Fax
  3. | Email
  4. | Text
type validity =
  1. | Not_available
  2. | Relative of char
type smsc = {
  1. smsc_location : int;
  2. smsc_name : string;
  3. smsc_number : string;
  4. validity : validity;
  5. format : format;
  6. default_number : string;
}
type message_type =
  1. | Deliver
  2. | Status_Report
  3. | Submit
type coding =
  1. | Unicode_No_Compression
  2. | Unicode_Compression
  3. | Default_No_Compression
  4. | Default_Compression
  5. | Eight_bit
type message = {
  1. replace : char;
  2. reject_duplicates : bool;
  3. udh_header : udh_header;
  4. number : string;
  5. other_numbers : string array;
  6. smsc : smsc;
  7. memory : memory_type;
  8. message_number : int;
  9. folder : int;
  10. inbox_folder : bool;
  11. state : state;
  12. nokia_name : string;
  13. text : string;
  14. pdu : message_type;
  15. coding : coding;
  16. date_time : DateTime.t;
  17. smsc_time : DateTime.t;
  18. delivery_status : char;
  19. reply_via_same_smsc : bool;
  20. sms_class : char;
  21. message_reference : char;
}
type multi_sms = message array
val default_received : message
val get : t -> folder:int -> message_number:int -> multi_sms
val fold : t -> ?folder:int -> ?n:int -> ?retries:int -> ?on_err:(int -> error -> unit) -> ('a -> multi_sms -> 'a) -> 'a -> 'a
val set : t -> message -> int * int
val add : t -> message -> int * int
val send : t -> message -> unit
type folder = {
  1. box : folder_box;
  2. folder_memory : memory_type;
  3. name : string;
}
and folder_box =
  1. | Inbox
  2. | Outbox
val folders : t -> folder array
type memory_status = {
  1. sim_unread : int;
  2. sim_used : int;
  3. sim_size : int;
  4. templates_used : int;
  5. phone_unread : int;
  6. phone_used : int;
  7. phone_size : int;
}
val get_status : t -> memory_status
val set_incoming_sms : t -> bool -> unit
val delete : t -> folder:int -> message_number:int -> unit
type encode_part_type_id =
  1. | Text
  2. | ConcatenatedTextLong
  3. | ConcatenatedAutoTextLong
  4. | ConcatenatedTextLong16bit
  5. | ConcatenatedAutoTextLong16bit
  6. | NokiaProfileLong
  7. | NokiaPictureImageLong
  8. | NokiaScreenSaverLong
  9. | NokiaRingtone
  10. | NokiaRingtoneLong
  11. | NokiaOperatorLogoLong
  12. | NokiaWAPBookmarkLong
  13. | NokiaWAPSettingsLong
  14. | NokiaMMSSettingsLong
  15. | NokiaVCARD10Long
  16. | NokiaVCARD21Long
  17. | NokiaVCALENDAR10Long
  18. | NokiaVTODOLong
  19. | VCARD10Long
  20. | VCARD21Long
  21. | DisableVoice
  22. | DisableFax
  23. | DisableEmail
  24. | EnableVoice
  25. | EnableFax
  26. | EnableEmail
  27. | VoidSMS
  28. | EMSSound10
  29. | EMSSound12
  30. | EMSSonyEricssonSound
  31. | EMSSound10Long
  32. | EMSSound12Long
  33. | EMSSonyEricssonSoundLong
  34. | EMSPredefinedSound
  35. | EMSPredefinedAnimation
  36. | EMSAnimation
  37. | EMSFixedBitmap
  38. | EMSVariableBitmap
  39. | EMSVariableBitmapLong
  40. | MMSIndicatorLong
  41. | WAPIndicatorLong
  42. | AlcatelMonoBitmapLong
  43. | AlcatelMonoAnimationLong
  44. | AlcatelSMSTemplateName
  45. | SiemensFile
type info = {
  1. id : encode_part_type_id;
  2. nbr : int;
  3. protected : bool;
  4. buffer : string;
  5. left : bool;
  6. right : bool;
  7. center : bool;
  8. large : bool;
  9. small : bool;
  10. bold : bool;
  11. italic : bool;
  12. underlined : bool;
  13. strikethrough : bool;
  14. ringtone_notes : int;
}
type multipart_info = {
  1. unicode_coding : bool;
  2. info_class : int;
  3. replace_message : char;
  4. unknown : bool;
  5. entries : info array;
}
val decode_multipart : ?debug:Debug.info -> ?ems:bool -> multi_sms -> multipart_info
OCaml

Innovation. Community. Security.